~ chicken-core (chicken-5) 3d9ac22b4ac0d0e11e5cc491780d2f67f94dfe72
commit 3d9ac22b4ac0d0e11e5cc491780d2f67f94dfe72
Author: felix <felix@call-with-current-continuation.org>
AuthorDate: Sat Dec 5 19:45:52 2009 +0100
Commit: felix <felix@call-with-current-continuation.org>
CommitDate: Sat Dec 5 19:45:52 2009 +0100
- replaced bootstrap-tarball with set of files in `bootstrap'
- bumped version to 4.2.13
diff --git a/NEWS b/NEWS
index 53f1bdbf..61fe0dbb 100644
--- a/NEWS
+++ b/NEWS
@@ -1,3 +1,10 @@
+4.2.13
+
+- added new floating-point primitives `fpsin`, `fpcos', `fptan',
+ `fpasin', `fpacos', `fpatan', `fpatan2', `fpexp', `fplog',
+ `fpexpt' and `fpsqrt'
+- heavy cleanup of floating math library functions
+
4.2.12
- removed tracing facility and apply-hook (see the "trace" egg
diff --git a/README b/README
index 8ab792c3..140876e7 100644
--- a/README
+++ b/README
@@ -3,7 +3,7 @@
(c) 2008-2009, The Chicken Team
(c) 2000-2007, Felix L. Winkelmann
- version 4.2.12
+ version 4.2.13
1. Introduction:
@@ -80,10 +80,10 @@
make PLATFORM=<platform> PREFIX=<destination> bootstrap
- which will unpack a tarball containing precompiled C sources
+ which will copy precompiled C sources into the build-directory
that are recent enough to generate the current version. After
building a statically linked compiler executable (named
- "chicken-boot") all *.scm files are marked for rebuilt. By
+ "chicken-boot") all *.scm files are marked for rebuild. By
passing "CHICKEN=./chicken-boot" to "make", you can force
using this bootstrapped compiler to build the system.
diff --git a/bootstrap.tar.gz b/bootstrap.tar.gz
deleted file mode 100644
index eb1718e1..00000000
Binary files a/bootstrap.tar.gz and /dev/null differ
diff --git a/bootstrap/batch-driver.c b/bootstrap/batch-driver.c
new file mode 100644
index 00000000..52166b67
--- /dev/null
+++ b/bootstrap/batch-driver.c
@@ -0,0 +1,9208 @@
+/* Generated from batch-driver.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:29
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: batch-driver.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 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[403];
+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_1498)
+static void C_ccall f_1498(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_noret;
+C_noret_decl(f_1506)
+static void C_ccall f_1506(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1510)
+static void C_ccall f_1510(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_1518)
+static void C_ccall f_1518(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_1524)
+static void C_ccall f_1524(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1524)
+static void C_ccall f_1524r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1560)
+static void C_ccall f_1560(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_4793)
+static void C_ccall f_4793(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4789)
+static void C_ccall f_4789(C_word c,C_word t0,C_word t1) 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_4749)
+static void C_fcall f_4749(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_1576)
+static void C_ccall f_1576(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4745)
+static void C_ccall f_4745(C_word c,C_word t0,C_word t1) 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_4708)
+static void C_fcall f_4708(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_1579)
+static void C_ccall f_1579(C_word c,C_word t0,C_word t1) 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_4687)
+static void C_ccall f_4687(C_word c,C_word t0,C_word t1) 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_4679)
+static void C_ccall f_4679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2040)
+static void C_fcall f_2040(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2043)
+static void C_fcall f_2043(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_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_4608)
+static void C_ccall f_4608(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4616)
+static void C_ccall f_4616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4618)
+static void C_fcall f_4618(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_2050)
+static void C_ccall f_2050(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4558)
+static void C_ccall f_4558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4560)
+static void C_fcall f_4560(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4595)
+static void C_ccall f_4595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4599)
+static void C_ccall f_4599(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2058)
+static void C_ccall f_2058(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_fcall f_2067(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_2073)
+static void C_fcall f_2073(C_word t0,C_word t1) 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_2079)
+static void C_fcall f_2079(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_fcall f_2091(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_4463)
+static void C_fcall f_4463(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4492)
+static void C_ccall f_4492(C_word c,C_word t0,C_word t1) 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_4456)
+static void C_ccall f_4456(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2098)
+static void C_fcall f_2098(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2101)
+static void C_fcall f_2101(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2104)
+static void C_fcall f_2104(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2107)
+static void C_fcall f_2107(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2110)
+static void C_fcall f_2110(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2113)
+static void C_fcall f_2113(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2116)
+static void C_fcall f_2116(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_4411)
+static void C_ccall f_4411(C_word c,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_4396)
+static void C_ccall f_4396(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4399)
+static void C_ccall f_4399(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_2137)
+static void C_fcall f_2137(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_4389)
+static void C_ccall f_4389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2140)
+static void C_ccall f_2140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2143)
+static void C_ccall f_2143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4344)
+static void C_ccall f_4344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2146)
+static void C_ccall f_2146(C_word c,C_word t0,C_word t1) 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_2149)
+static void C_ccall f_2149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4329)
+static void C_ccall f_4329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2152)
+static void C_ccall f_2152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4311)
+static void C_ccall f_4311(C_word c,C_word t0,C_word t1) 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_4317)
+static void C_ccall f_4317(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_2155)
+static void C_ccall f_2155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4270)
+static void C_ccall f_4270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4272)
+static void C_fcall f_4272(C_word t0,C_word t1,C_word t2) 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_4266)
+static void C_ccall f_4266(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_4215)
+static void C_ccall f_4215(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4217)
+static void C_fcall f_4217(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4246)
+static void C_ccall f_4246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2168)
+static void C_ccall f_2168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2171)
+static void C_fcall f_2171(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2174)
+static void C_fcall f_2174(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2177)
+static void C_fcall f_2177(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2180)
+static void C_fcall f_2180(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4112)
+static void C_fcall f_4112(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4126)
+static void C_ccall f_4126(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_4156)
+static void C_ccall f_4156(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4184)
+static void C_ccall f_4184(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_4027)
+static void C_fcall f_4027(C_word t0,C_word t1,C_word t2) 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_4066)
+static void C_ccall f_4066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4071)
+static void C_ccall f_4071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4099)
+static void C_ccall f_4099(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_4016)
+static void C_ccall f_4016(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_word t2) C_noret;
+C_noret_decl(f_3983)
+static void C_ccall f_3983(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_word t2) C_noret;
+C_noret_decl(f_3995)
+static void C_ccall f_3995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2186)
+static void C_ccall f_2186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2193)
+static void C_ccall f_2193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2196)
+static void C_ccall f_2196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2199)
+static void C_ccall f_2199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3946)
+static void C_fcall f_3946(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3962)
+static void C_ccall f_3962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3965)
+static void C_ccall f_3965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2202)
+static void C_ccall f_2202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2206)
+static void C_ccall f_2206(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_2218)
+static void C_ccall f_2218(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_noret;
+C_noret_decl(f_3911)
+static void C_fcall f_3911(C_word t0,C_word t1,C_word t2) 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_2221)
+static void C_ccall f_2221(C_word c,C_word t0,C_word t1) 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_3872)
+static void C_fcall f_3872(C_word t0,C_word t1,C_word t2) 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_3866)
+static void C_ccall f_3866(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_3812)
+static void C_fcall f_3812(C_word t0,C_word t1,C_word t2) 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_2225)
+static void C_ccall f_2225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2229)
+static void C_ccall f_2229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2232)
+static void C_fcall f_2232(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3785)
+static void C_ccall f_3785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2236)
+static void C_ccall f_2236(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3778)
+static void C_ccall f_3778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2240)
+static void C_ccall f_2240(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3771)
+static void C_ccall f_3771(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2244)
+static void C_ccall f_2244(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3764)
+static void C_ccall f_3764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2248)
+static void C_ccall f_2248(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3744)
+static void C_ccall f_3744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2252)
+static void C_ccall f_2252(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_2266)
+static void C_fcall f_2266(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_3703)
+static void C_ccall f_3703(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_2296)
+static void C_fcall f_2296(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2324)
+static void C_ccall f_2324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2330)
+static void C_ccall f_2330(C_word c,C_word t0,C_word t1) 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_2337)
+static void C_ccall f_2337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2340)
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2343)
+static void C_ccall f_2343(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_2354)
+static void C_ccall f_2354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2357)
+static void C_ccall f_2357(C_word c,C_word t0,C_word t1) 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_3679)
+static void C_ccall f_3679(C_word c,C_word t0,C_word t1) 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_2363)
+static void C_ccall f_2363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3516)
+static void C_fcall f_3516(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3615)
+static void C_ccall f_3615(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_noret;
+C_noret_decl(f_3632)
+static void C_ccall f_3632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3636)
+static void C_ccall f_3636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3641)
+static void C_fcall f_3641(C_word t0,C_word t1,C_word t2) 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_3627)
+static void C_ccall f_3627(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3618)
+static void C_ccall f_3618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3576)
+static void C_fcall f_3576(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3605)
+static void C_ccall f_3605(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_3541)
+static void C_fcall f_3541(C_word t0,C_word t1,C_word t2) 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_3539)
+static void C_ccall f_3539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3527)
+static void C_ccall f_3527(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_3511)
+static void C_ccall f_3511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2366)
+static void C_ccall f_2366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2369)
+static void C_ccall f_2369(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3465)
+static void C_ccall f_3465(C_word c,C_word t0,C_word t1) 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_3500)
+static void C_ccall f_3500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3469)
+static void C_ccall f_3469(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2372)
+static void C_fcall f_2372(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_3442)
+static void C_ccall f_3442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3462)
+static void C_ccall f_3462(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2381)
+static void C_fcall f_2381(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3400)
+static void C_ccall f_3400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3402)
+static void C_fcall f_3402(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3431)
+static void C_ccall f_3431(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_2387)
+static void C_ccall f_2387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3334)
+static void C_fcall f_3334(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3140)
+static void C_ccall f_3140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3290)
+static void C_fcall f_3290(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3144)
+static void C_ccall f_3144(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3148)
+static void C_fcall f_3148(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3167)
+static void C_fcall f_3167(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3152)
+static void C_ccall f_3152(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_3079)
+static void C_ccall f_3079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3084)
+static void C_fcall f_3084(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3096)
+static void C_ccall f_3096(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_noret;
+C_noret_decl(f_3102)
+static void C_ccall f_3102(C_word c,C_word t0,C_word t1) 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_3119)
+static void C_ccall f_3119(C_word c,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_3073)
+static void C_ccall f_3073(C_word c,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_3067)
+static void C_ccall f_3067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2402)
+static void C_ccall f_2402(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_3052)
+static void C_ccall f_3052(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_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_2998)
+static void C_ccall f_2998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3010)
+static void C_fcall f_3010(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3039)
+static void C_ccall f_3039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3005)
+static void C_ccall f_3005(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_2995)
+static void C_ccall f_2995(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_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_2937)
+static void C_ccall f_2937(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_2969)
+static void C_ccall f_2969(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2940)
+static void C_ccall f_2940(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2948)
+static void C_ccall f_2948(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_2960)
+static void C_ccall f_2960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2963)
+static void C_ccall f_2963(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2966)
+static void C_ccall f_2966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2442)
+static void C_fcall f_2442(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2928)
+static void C_ccall f_2928(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_2910)
+static void C_ccall f_2910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2916)
+static void C_ccall f_2916(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_2922)
+static void C_ccall f_2922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2445)
+static void C_fcall f_2445(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_2448)
+static void C_ccall f_2448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2897)
+static void C_ccall f_2897(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_2861)
+static void C_fcall f_2861(C_word t0,C_word t1,C_word t2) 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_2859)
+static void C_ccall f_2859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2804)
+static void C_ccall f_2804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2806)
+static void C_fcall f_2806(C_word t0,C_word t1,C_word t2) 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_2814)
+static void C_fcall f_2814(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2841)
+static void C_ccall f_2841(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_2818)
+static void C_ccall f_2818(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_2454)
+static void C_ccall f_2454(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_2768)
+static void C_fcall f_2768(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_2776)
+static void C_fcall f_2776(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2780)
+static void C_ccall f_2780(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_2466)
+static void C_ccall f_2466(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_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_2483)
+static void C_fcall f_2483(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2490)
+static void C_ccall f_2490(C_word c,C_word t0,C_word t1) 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_2721)
+static void C_ccall f_2721(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_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_2595)
+static void C_ccall f_2595(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_2598)
+static void C_ccall f_2598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2604)
+static void C_ccall f_2604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2607)
+static void C_ccall f_2607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2610)
+static void C_ccall f_2610(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_ccall f_2616(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_2633)
+static void C_ccall f_2633(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_2637)
+static void C_ccall f_2637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2643)
+static void C_ccall f_2643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2646)
+static void C_ccall f_2646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2649)
+static void C_ccall f_2649(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_2655)
+static void C_ccall f_2655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f5114)
+static void C_ccall f5114(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_2658)
+static void C_ccall f_2658(C_word c,C_word t0,C_word t1) 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_2627)
+static void C_ccall f_2627(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_2523)
+static void C_ccall f_2523(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_2549)
+static void C_ccall f_2549(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_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_2517)
+static void C_ccall f_2517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2315)
+static void C_ccall f_2315(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_2284)
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1961)
+static void C_fcall f_1961(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1991)
+static void C_fcall f_1991(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1986)
+static void C_fcall f_1986(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1963)
+static void C_fcall f_1963(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1967)
+static void C_ccall f_1967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1981)
+static void C_ccall f_1981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1975)
+static void C_ccall f_1975(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1970)
+static void C_ccall f_1970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1955)
+static void C_fcall f_1955(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1926)
+static void C_fcall f_1926(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1933)
+static void C_ccall f_1933(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1936)
+static void C_ccall f_1936(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1939)
+static void C_ccall f_1939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1942)
+static void C_ccall f_1942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1916)
+static C_word C_fcall f_1916(C_word t0);
+C_noret_decl(f_1881)
+static void C_fcall f_1881(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1887)
+static void C_fcall f_1887(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1895)
+static void C_fcall f_1895(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1903)
+static void C_ccall f_1903(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1907)
+static void C_ccall f_1907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1801)
+static void C_fcall f_1801(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_1866)
+static void C_ccall f_1866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1850)
+static void C_ccall f_1850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1842)
+static void C_ccall f_1842(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_1752)
+static void C_ccall f_1752(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_1765)
+static void C_fcall f_1765(C_word t0,C_word t1) 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_1776)
+static void C_ccall f_1776(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_1798)
+static void C_ccall f_1798(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1717)
+static void C_fcall f_1717(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1724)
+static void C_ccall f_1724(C_word c,C_word t0,C_word t1) 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_1739)
+static void C_ccall f_1739(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1693)
+static void C_fcall f_1693(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1700)
+static void C_ccall f_1700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1703)
+static void C_ccall f_1703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1706)
+static void C_ccall f_1706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1709)
+static void C_ccall f_1709(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_1671)
+static void C_fcall f_1671(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1678)
+static void C_ccall f_1678(C_word c,C_word t0,C_word t1) 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_1647)
+static void C_fcall f_1647(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1651)
+static void C_ccall f_1651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1660)
+static void C_ccall f_1660(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_1666)
+static void C_ccall f_1666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1669)
+static void C_ccall f_1669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1632)
+static void C_fcall f_1632(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1639)
+static void C_ccall f_1639(C_word c,C_word t0,C_word t1) 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_1527)
+static void C_fcall f_1527(C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_4749)
+static void C_fcall trf_4749(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4749(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4749(t0,t1,t2);}
+
+C_noret_decl(trf_4708)
+static void C_fcall trf_4708(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4708(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4708(t0,t1,t2);}
+
+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_2040)
+static void C_fcall trf_2040(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2040(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2040(t0,t1);}
+
+C_noret_decl(trf_2043)
+static void C_fcall trf_2043(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2043(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2043(t0,t1);}
+
+C_noret_decl(trf_4618)
+static void C_fcall trf_4618(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4618(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4618(t0,t1,t2);}
+
+C_noret_decl(trf_4560)
+static void C_fcall trf_4560(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4560(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4560(t0,t1,t2);}
+
+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_2067)
+static void C_fcall trf_2067(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2067(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2067(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2073(t0,t1);}
+
+C_noret_decl(trf_2079)
+static void C_fcall trf_2079(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2079(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2079(t0,t1);}
+
+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_2091)
+static void C_fcall trf_2091(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2091(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2091(t0,t1);}
+
+C_noret_decl(trf_4463)
+static void C_fcall trf_4463(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4463(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4463(t0,t1,t2);}
+
+C_noret_decl(trf_2098)
+static void C_fcall trf_2098(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2098(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2098(t0,t1);}
+
+C_noret_decl(trf_2101)
+static void C_fcall trf_2101(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2101(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2101(t0,t1);}
+
+C_noret_decl(trf_2104)
+static void C_fcall trf_2104(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2104(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2104(t0,t1);}
+
+C_noret_decl(trf_2107)
+static void C_fcall trf_2107(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2107(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2107(t0,t1);}
+
+C_noret_decl(trf_2110)
+static void C_fcall trf_2110(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2110(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2110(t0,t1);}
+
+C_noret_decl(trf_2113)
+static void C_fcall trf_2113(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2113(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2113(t0,t1);}
+
+C_noret_decl(trf_2116)
+static void C_fcall trf_2116(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2116(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2116(t0,t1);}
+
+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_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_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_4272)
+static void C_fcall trf_4272(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4272(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4272(t0,t1,t2);}
+
+C_noret_decl(trf_4217)
+static void C_fcall trf_4217(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4217(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4217(t0,t1,t2);}
+
+C_noret_decl(trf_2171)
+static void C_fcall trf_2171(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2171(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2171(t0,t1);}
+
+C_noret_decl(trf_2174)
+static void C_fcall trf_2174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2174(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2174(t0,t1);}
+
+C_noret_decl(trf_2177)
+static void C_fcall trf_2177(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2177(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2177(t0,t1);}
+
+C_noret_decl(trf_2180)
+static void C_fcall trf_2180(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2180(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2180(t0,t1);}
+
+C_noret_decl(trf_4112)
+static void C_fcall trf_4112(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4112(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4112(t0,t1,t2);}
+
+C_noret_decl(trf_4027)
+static void C_fcall trf_4027(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4027(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4027(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3985(t0,t1,t2);}
+
+C_noret_decl(trf_3946)
+static void C_fcall trf_3946(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3946(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3946(t0,t1,t2);}
+
+C_noret_decl(trf_3911)
+static void C_fcall trf_3911(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3911(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3911(t0,t1,t2);}
+
+C_noret_decl(trf_3872)
+static void C_fcall trf_3872(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3872(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3872(t0,t1,t2);}
+
+C_noret_decl(trf_3812)
+static void C_fcall trf_3812(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3812(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3812(t0,t1,t2);}
+
+C_noret_decl(trf_2232)
+static void C_fcall trf_2232(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2232(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2232(t0,t1);}
+
+C_noret_decl(trf_2266)
+static void C_fcall trf_2266(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2266(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2266(t0,t1);}
+
+C_noret_decl(trf_2296)
+static void C_fcall trf_2296(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2296(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2296(t0,t1);}
+
+C_noret_decl(trf_3516)
+static void C_fcall trf_3516(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3516(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3516(t0,t1,t2);}
+
+C_noret_decl(trf_3641)
+static void C_fcall trf_3641(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3641(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3641(t0,t1,t2);}
+
+C_noret_decl(trf_3576)
+static void C_fcall trf_3576(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3576(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3576(t0,t1,t2);}
+
+C_noret_decl(trf_3541)
+static void C_fcall trf_3541(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3541(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3541(t0,t1,t2);}
+
+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_2372)
+static void C_fcall trf_2372(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2372(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2372(t0,t1);}
+
+C_noret_decl(trf_2381)
+static void C_fcall trf_2381(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2381(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2381(t0,t1);}
+
+C_noret_decl(trf_3402)
+static void C_fcall trf_3402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3402(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3402(t0,t1,t2);}
+
+C_noret_decl(trf_3334)
+static void C_fcall trf_3334(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3334(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3334(t0,t1,t2);}
+
+C_noret_decl(trf_3290)
+static void C_fcall trf_3290(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3290(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3290(t0,t1,t2);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3148(t0,t1);}
+
+C_noret_decl(trf_3167)
+static void C_fcall trf_3167(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3167(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3167(t0,t1,t2);}
+
+C_noret_decl(trf_3084)
+static void C_fcall trf_3084(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3084(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3084(t0,t1,t2);}
+
+C_noret_decl(trf_3010)
+static void C_fcall trf_3010(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3010(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3010(t0,t1,t2);}
+
+C_noret_decl(trf_2442)
+static void C_fcall trf_2442(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2442(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2442(t0,t1);}
+
+C_noret_decl(trf_2445)
+static void C_fcall trf_2445(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2445(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2445(t0,t1);}
+
+C_noret_decl(trf_2861)
+static void C_fcall trf_2861(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2861(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2861(t0,t1,t2);}
+
+C_noret_decl(trf_2806)
+static void C_fcall trf_2806(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2806(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2806(t0,t1,t2);}
+
+C_noret_decl(trf_2814)
+static void C_fcall trf_2814(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2814(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2814(t0,t1,t2);}
+
+C_noret_decl(trf_2768)
+static void C_fcall trf_2768(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2768(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2768(t0,t1,t2);}
+
+C_noret_decl(trf_2776)
+static void C_fcall trf_2776(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2776(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2776(t0,t1,t2);}
+
+C_noret_decl(trf_2483)
+static void C_fcall trf_2483(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2483(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_2483(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1961)
+static void C_fcall trf_1961(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1961(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_1961(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1991)
+static void C_fcall trf_1991(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1991(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1991(t0,t1);}
+
+C_noret_decl(trf_1986)
+static void C_fcall trf_1986(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1986(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1986(t0,t1,t2);}
+
+C_noret_decl(trf_1963)
+static void C_fcall trf_1963(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1963(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_1963(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1955)
+static void C_fcall trf_1955(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1955(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1955(t0,t1,t2);}
+
+C_noret_decl(trf_1926)
+static void C_fcall trf_1926(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1926(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1926(t0,t1,t2);}
+
+C_noret_decl(trf_1881)
+static void C_fcall trf_1881(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1881(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1881(t0,t1,t2);}
+
+C_noret_decl(trf_1887)
+static void C_fcall trf_1887(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1887(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1887(t0,t1,t2);}
+
+C_noret_decl(trf_1895)
+static void C_fcall trf_1895(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1895(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1895(t0,t1,t2);}
+
+C_noret_decl(trf_1801)
+static void C_fcall trf_1801(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1801(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1801(t0,t1);}
+
+C_noret_decl(trf_1765)
+static void C_fcall trf_1765(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1765(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1765(t0,t1);}
+
+C_noret_decl(trf_1717)
+static void C_fcall trf_1717(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1717(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_1717(t0,t1,t2,t3,t4);}
+
+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_1693)
+static void C_fcall trf_1693(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1693(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_1693(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_1671)
+static void C_fcall trf_1671(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1671(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_1671(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1647)
+static void C_fcall trf_1647(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1647(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_1647(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1632)
+static void C_fcall trf_1632(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1632(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_1632(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1527)
+static void C_fcall trf_1527(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1527(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1527(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(3145)){
+C_save(t1);
+C_rereclaim2(3145*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,403);
+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],7,"nursery");
+lf[30]=C_h_intern(&lf[30],10,"stack-size");
+lf[31]=C_h_intern(&lf[31],19,"\003sysstandard-output");
+lf[32]=C_h_intern(&lf[32],16,"\003sysflush-output");
+lf[33]=C_h_intern(&lf[33],19,"\003syswrite-char/port");
+lf[34]=C_h_intern(&lf[34],7,"fprintf");
+lf[35]=C_h_intern(&lf[35],26,"\010compilerdebugging-chicken");
+lf[36]=C_h_intern(&lf[36],7,"display");
+lf[37]=C_decode_literal(C_heaptop,"\376B\000\000\010pass: ~a");
+lf[38]=C_h_intern(&lf[38],19,"\010compilerdump-nodes");
+lf[39]=C_h_intern(&lf[39],12,"pretty-print");
+lf[40]=C_h_intern(&lf[40],30,"\010compilerbuild-expression-tree");
+lf[41]=C_h_intern(&lf[41],34,"\010compilerdisplay-analysis-database");
+lf[42]=C_h_intern(&lf[42],5,"write");
+lf[43]=C_decode_literal(C_heaptop,"\376B\000\000\013(iteration ");
+lf[44]=C_h_intern(&lf[44],26,"\003sysdefault-read-info-hook");
+lf[45]=C_h_intern(&lf[45],19,"\003syshash-table-set!");
+lf[46]=C_h_intern(&lf[46],24,"\003sysline-number-database");
+lf[47]=C_h_intern(&lf[47],10,"alist-cons");
+lf[48]=C_h_intern(&lf[48],18,"\003syshash-table-ref");
+lf[49]=C_h_intern(&lf[49],9,"list-info");
+lf[50]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid numeric argument ~S");
+lf[51]=C_h_intern(&lf[51],9,"substring");
+lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\003: \011");
+lf[53]=C_decode_literal(C_heaptop,"\376B\000\000\030milliseconds needed for ");
+lf[54]=C_h_intern(&lf[54],8,"\003sysread");
+lf[55]=C_h_intern(&lf[55],12,"\010compilerget");
+lf[56]=C_h_intern(&lf[56],13,"\010compilerput!");
+lf[57]=C_h_intern(&lf[57],27,"\010compileranalyze-expression");
+lf[58]=C_h_intern(&lf[58],9,"\003syserror");
+lf[59]=C_h_intern(&lf[59],1,"D");
+lf[60]=C_h_intern(&lf[60],25,"\010compilerimport-libraries");
+lf[61]=C_h_intern(&lf[61],26,"\010compilerdisabled-warnings");
+lf[62]=C_h_intern(&lf[62],16,"emit-inline-file");
+lf[63]=C_h_intern(&lf[63],12,"inline-limit");
+lf[64]=C_h_intern(&lf[64],21,"\010compilerverbose-mode");
+lf[65]=C_h_intern(&lf[65],31,"\003sysread-error-with-line-number");
+lf[66]=C_h_intern(&lf[66],21,"\003sysinclude-pathnames");
+lf[67]=C_h_intern(&lf[67],19,"\000compiler-extension");
+lf[68]=C_h_intern(&lf[68],12,"\003sysfeatures");
+lf[69]=C_h_intern(&lf[69],10,"\000compiling");
+lf[70]=C_h_intern(&lf[70],28,"\003sysexplicit-library-modules");
+lf[71]=C_h_intern(&lf[71],25,"\010compilertarget-heap-size");
+lf[72]=C_h_intern(&lf[72],33,"\010compilertarget-initial-heap-size");
+lf[73]=C_h_intern(&lf[73],27,"\010compilertarget-heap-growth");
+lf[74]=C_h_intern(&lf[74],30,"\010compilertarget-heap-shrinkage");
+lf[75]=C_h_intern(&lf[75],26,"\010compilertarget-stack-size");
+lf[76]=C_h_intern(&lf[76],8,"no-trace");
+lf[77]=C_h_intern(&lf[77],24,"\010compileremit-trace-info");
+lf[78]=C_h_intern(&lf[78],29,"disable-stack-overflow-checks");
+lf[79]=C_h_intern(&lf[79],40,"\010compilerdisable-stack-overflow-checking");
+lf[80]=C_h_intern(&lf[80],7,"version");
+lf[81]=C_h_intern(&lf[81],7,"newline");
+lf[82]=C_h_intern(&lf[82],22,"\010compilerprint-version");
+lf[83]=C_h_intern(&lf[83],4,"help");
+lf[84]=C_h_intern(&lf[84],20,"\010compilerprint-usage");
+lf[85]=C_h_intern(&lf[85],7,"release");
+lf[86]=C_h_intern(&lf[86],15,"chicken-version");
+lf[87]=C_h_intern(&lf[87],24,"\010compilersource-filename");
+lf[88]=C_h_intern(&lf[88],28,"\010compilerprofile-lambda-list");
+lf[89]=C_h_intern(&lf[89],31,"\010compilerline-number-database-2");
+lf[90]=C_h_intern(&lf[90],4,"node");
+lf[91]=C_h_intern(&lf[91],6,"lambda");
+lf[92]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\016\376\377\016");
+lf[93]=C_h_intern(&lf[93],23,"\010compilerconstant-table");
+lf[94]=C_h_intern(&lf[94],21,"\010compilerinline-table");
+lf[95]=C_h_intern(&lf[95],23,"\010compilerfirst-analysis");
+lf[96]=C_h_intern(&lf[96],41,"\010compilerperform-high-level-optimizations");
+lf[97]=C_h_intern(&lf[97],37,"\010compilerinline-substitutions-enabled");
+lf[98]=C_h_intern(&lf[98],22,"optimize-leaf-routines");
+lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\031leaf routine optimization");
+lf[100]=C_h_intern(&lf[100],34,"\010compilertransform-direct-lambdas!");
+lf[101]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[102]=C_h_intern(&lf[102],4,"leaf");
+lf[103]=C_h_intern(&lf[103],18,"\010compilerdebugging");
+lf[104]=C_h_intern(&lf[104],1,"p");
+lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\025rewritings enabled...");
+lf[106]=C_decode_literal(C_heaptop,"\376B\000\000\023optimized-iteration");
+lf[107]=C_h_intern(&lf[107],1,"5");
+lf[108]=C_decode_literal(C_heaptop,"\376B\000\000\014optimization");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\021optimization pass");
+lf[110]=C_h_intern(&lf[110],36,"\010compilerprepare-for-code-generation");
+lf[111]=C_decode_literal(C_heaptop,"\376B\000\000\025compilation finished.");
+lf[112]=C_h_intern(&lf[112],30,"\010compilercompiler-cleanup-hook");
+lf[113]=C_h_intern(&lf[113],1,"t");
+lf[114]=C_h_intern(&lf[114],17,"\003sysdisplay-times");
+lf[115]=C_h_intern(&lf[115],14,"\003sysstop-timer");
+lf[116]=C_decode_literal(C_heaptop,"\376B\000\000\017code generation");
+lf[117]=C_h_intern(&lf[117],17,"close-output-port");
+lf[118]=C_h_intern(&lf[118],22,"\010compilergenerate-code");
+lf[119]=C_decode_literal(C_heaptop,"\376B\000\000\023generating `~A\047 ...");
+lf[120]=C_h_intern(&lf[120],16,"open-output-file");
+lf[121]=C_h_intern(&lf[121],19,"current-output-port");
+lf[122]=C_decode_literal(C_heaptop,"\376B\000\000\013preparation");
+lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\021closure-converted");
+lf[124]=C_h_intern(&lf[124],1,"9");
+lf[125]=C_h_intern(&lf[125],4,"exit");
+lf[126]=C_h_intern(&lf[126],20,"\003syswarnings-enabled");
+lf[127]=C_decode_literal(C_heaptop,"\376B\000\000#(don\047t worry - still compiling...)\012");
+lf[128]=C_decode_literal(C_heaptop,"\376B\000\000\016final-analysis");
+lf[129]=C_h_intern(&lf[129],1,"8");
+lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\022closure conversion");
+lf[131]=C_h_intern(&lf[131],35,"\010compilerperform-closure-conversion");
+lf[132]=C_h_intern(&lf[132],27,"\010compilerinline-output-file");
+lf[133]=C_h_intern(&lf[133],32,"\010compileremit-global-inline-file");
+lf[134]=C_decode_literal(C_heaptop,"\376B\000\000&Generating global inline file `~a\047 ...");
+lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\011optimized");
+lf[136]=C_h_intern(&lf[136],1,"7");
+lf[137]=C_h_intern(&lf[137],1,"s");
+lf[138]=C_h_intern(&lf[138],33,"\010compilerprint-program-statistics");
+lf[139]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[140]=C_h_intern(&lf[140],1,"4");
+lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[142]=C_h_intern(&lf[142],1,"v");
+lf[143]=C_h_intern(&lf[143],25,"\010compilerdump-global-refs");
+lf[144]=C_h_intern(&lf[144],1,"d");
+lf[145]=C_h_intern(&lf[145],29,"\010compilerdump-defined-globals");
+lf[146]=C_h_intern(&lf[146],1,"u");
+lf[147]=C_h_intern(&lf[147],31,"\010compilerdump-undefined-globals");
+lf[148]=C_h_intern(&lf[148],3,"opt");
+lf[149]=C_decode_literal(C_heaptop,"\376B\000\000\003cps");
+lf[150]=C_h_intern(&lf[150],1,"3");
+lf[151]=C_decode_literal(C_heaptop,"\376B\000\000\016cps conversion");
+lf[152]=C_h_intern(&lf[152],31,"\010compilerperform-cps-conversion");
+lf[153]=C_h_intern(&lf[153],6,"unsafe");
+lf[154]=C_h_intern(&lf[154],34,"\010compilerscan-toplevel-assignments");
+lf[155]=C_h_intern(&lf[155],24,"\010compilerinline-globally");
+lf[156]=C_h_intern(&lf[156],23,"\010compilerinline-locally");
+lf[157]=C_h_intern(&lf[157],25,"\010compilerload-inline-file");
+lf[158]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
+lf[159]=C_h_intern(&lf[159],19,"consult-inline-file");
+lf[160]=C_h_intern(&lf[160],28,"\010compilerenable-inline-files");
+lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\032Loading inline file ~a ...");
+lf[162]=C_h_intern(&lf[162],12,"file-exists\077");
+lf[163]=C_h_intern(&lf[163],28,"\003sysresolve-include-filename");
+lf[164]=C_h_intern(&lf[164],13,"make-pathname");
+lf[165]=C_decode_literal(C_heaptop,"\376B\000\000\006inline");
+lf[166]=C_h_intern(&lf[166],14,"symbol->string");
+lf[167]=C_h_intern(&lf[167],11,"concatenate");
+lf[168]=C_h_intern(&lf[168],3,"cdr");
+lf[169]=C_h_intern(&lf[169],2,"pp");
+lf[170]=C_h_intern(&lf[170],1,"M");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\017; requirements:");
+lf[172]=C_h_intern(&lf[172],12,"vector->list");
+lf[173]=C_h_intern(&lf[173],26,"\010compilerfile-requirements");
+lf[174]=C_h_intern(&lf[174],26,"\010compilerdo-lambda-lifting");
+lf[175]=C_decode_literal(C_heaptop,"\376B\000\000\015lambda lifted");
+lf[176]=C_h_intern(&lf[176],1,"L");
+lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\016lambda lifting");
+lf[178]=C_h_intern(&lf[178],32,"\010compilerperform-lambda-lifting!");
+lf[179]=C_h_intern(&lf[179],22,"\010compilerdo-scrutinize");
+lf[180]=C_decode_literal(C_heaptop,"\376B\000\000\032pre-analysis (lambda-lift)");
+lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[182]=C_h_intern(&lf[182],1,"0");
+lf[183]=C_h_intern(&lf[183],4,"lift");
+lf[184]=C_decode_literal(C_heaptop,"\376B\000\000\010scrutiny");
+lf[185]=C_h_intern(&lf[185],19,"\010compilerscrutinize");
+lf[186]=C_decode_literal(C_heaptop,"\376B\000\000\023performing scrutiny");
+lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\014pre-analysis");
+lf[188]=C_decode_literal(C_heaptop,"\376B\000\000\010analysis");
+lf[189]=C_h_intern(&lf[189],8,"scrutiny");
+lf[190]=C_h_intern(&lf[190],27,"\010compilerload-type-database");
+lf[191]=C_h_intern(&lf[191],12,"\003sysfor-each");
+lf[192]=C_h_intern(&lf[192],5,"types");
+lf[193]=C_h_intern(&lf[193],17,"ignore-repository");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\010types.db");
+lf[195]=C_h_intern(&lf[195],37,"\010compilerinitialize-analysis-database");
+lf[196]=C_decode_literal(C_heaptop,"\376B\000\000\021initial node tree");
+lf[197]=C_h_intern(&lf[197],1,"T");
+lf[198]=C_h_intern(&lf[198],25,"\010compilerbuild-node-graph");
+lf[199]=C_h_intern(&lf[199],32,"\010compilercanonicalize-begin-body");
+lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\011user pass");
+lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\014User pass...");
+lf[202]=C_h_intern(&lf[202],12,"check-syntax");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\015canonicalized");
+lf[204]=C_h_intern(&lf[204],1,"2");
+lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\020canonicalization");
+lf[206]=C_h_intern(&lf[206],25,"\010compilercompiler-warning");
+lf[207]=C_h_intern(&lf[207],5,"style");
+lf[208]=C_decode_literal(C_heaptop,"\376B\000\000Icompiling extensions in unsafe mode is bad practice and should be avoided");
+lf[209]=C_h_intern(&lf[209],8,"feature\077");
+lf[210]=C_h_intern(&lf[210],19,"compiling-extension");
+lf[211]=C_h_intern(&lf[211],18,"\010compilerunit-name");
+lf[212]=C_h_intern(&lf[212],5,"usage");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000*library unit `~a\047 compiled in dynamic mode");
+lf[214]=C_h_intern(&lf[214],37,"\010compilerdisplay-line-number-database");
+lf[215]=C_h_intern(&lf[215],1,"n");
+lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\025line number database:");
+lf[217]=C_h_intern(&lf[217],32,"\010compilerdisplay-real-name-table");
+lf[218]=C_h_intern(&lf[218],1,"N");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\020real name table:");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\002\011\011");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
+lf[222]=C_h_intern(&lf[222],35,"\010compilercompiler-syntax-statistics");
+lf[223]=C_h_intern(&lf[223],1,"S");
+lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\030applied compiler syntax:");
+lf[225]=C_h_intern(&lf[225],6,"append");
+lf[226]=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[227]=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[228]=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[229]=C_h_intern(&lf[229],5,"quote");
+lf[230]=C_h_intern(&lf[230],33,"\010compilerprofile-info-vector-name");
+lf[231]=C_h_intern(&lf[231],28,"\003sysset-profile-info-vector!");
+lf[232]=C_h_intern(&lf[232],21,"\010compileremit-profile");
+lf[233]=C_h_intern(&lf[233],25,"\003sysregister-profile-info");
+lf[234]=C_h_intern(&lf[234],4,"set!");
+lf[235]=C_h_intern(&lf[235],13,"\004corecallunit");
+lf[236]=C_h_intern(&lf[236],19,"\010compilerused-units");
+lf[237]=C_h_intern(&lf[237],28,"\010compilerimmutable-constants");
+lf[238]=C_h_intern(&lf[238],6,"gensym");
+lf[239]=C_h_intern(&lf[239],32,"\010compilercanonicalize-expression");
+lf[240]=C_h_intern(&lf[240],4,"uses");
+lf[241]=C_h_intern(&lf[241],7,"declare");
+lf[242]=C_h_intern(&lf[242],10,"\003sysappend");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\006source");
+lf[244]=C_h_intern(&lf[244],1,"1");
+lf[245]=C_decode_literal(C_heaptop,"\376B\000\000\032User preprocessing pass...");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\021User read pass...");
+lf[247]=C_h_intern(&lf[247],21,"\010compilerstring->expr");
+lf[248]=C_h_intern(&lf[248],7,"reverse");
+lf[249]=C_h_intern(&lf[249],27,"\003syscurrent-source-filename");
+lf[250]=C_h_intern(&lf[250],33,"\010compilerclose-checked-input-file");
+lf[251]=C_h_intern(&lf[251],16,"\003sysdynamic-wind");
+lf[252]=C_h_intern(&lf[252],34,"\010compilercheck-and-open-input-file");
+lf[253]=C_h_intern(&lf[253],8,"epilogue");
+lf[254]=C_h_intern(&lf[254],8,"prologue");
+lf[255]=C_h_intern(&lf[255],8,"postlude");
+lf[256]=C_h_intern(&lf[256],7,"prelude");
+lf[257]=C_h_intern(&lf[257],11,"make-vector");
+lf[258]=C_h_intern(&lf[258],34,"\010compilerline-number-database-size");
+lf[259]=C_h_intern(&lf[259],1,"r");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\021target stack size");
+lf[261]=C_decode_literal(C_heaptop,"\376B\000\000\020target heap size");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\021debugging options");
+lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\007options");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\022compiling `~a\047 ...");
+lf[265]=C_decode_literal(C_heaptop,"\376B\000\0009\012Enter \042chicken -help\042 for information on how to use it.\012");
+lf[266]=C_h_intern(&lf[266],5,"-help");
+lf[267]=C_h_intern(&lf[267],1,"h");
+lf[268]=C_h_intern(&lf[268],2,"-h");
+lf[269]=C_h_intern(&lf[269],33,"\010compilerload-identifier-database");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\012modules.db");
+lf[271]=C_h_intern(&lf[271],18,"accumulate-profile");
+lf[272]=C_h_intern(&lf[272],28,"\010compilerprofiled-procedures");
+lf[273]=C_h_intern(&lf[273],3,"all");
+lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\024Generating ~aprofile");
+lf[275]=C_decode_literal(C_heaptop,"\376B\000\000\014accumulated ");
+lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[277]=C_h_intern(&lf[277],39,"\010compilerdefault-profiling-declarations");
+lf[278]=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[279]=C_decode_literal(C_heaptop,"\376B\000\000\022debugging info: ~A");
+lf[280]=C_decode_literal(C_heaptop,"\376B\000\000\011calltrace");
+lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
+lf[282]=C_h_intern(&lf[282],21,"no-usual-integrations");
+lf[283]=C_h_intern(&lf[283],17,"standard-bindings");
+lf[284]=C_h_intern(&lf[284],34,"\010compilerdefault-standard-bindings");
+lf[285]=C_h_intern(&lf[285],17,"extended-bindings");
+lf[286]=C_h_intern(&lf[286],34,"\010compilerdefault-extended-bindings");
+lf[287]=C_h_intern(&lf[287],1,"m");
+lf[288]=C_h_intern(&lf[288],14,"set-gc-report!");
+lf[289]=C_h_intern(&lf[289],42,"\010compilerdefault-default-target-stack-size");
+lf[290]=C_h_intern(&lf[290],41,"\010compilerdefault-default-target-heap-size");
+lf[291]=C_h_intern(&lf[291],14,"compile-syntax");
+lf[292]=C_h_intern(&lf[292],25,"\003sysenable-runtime-macros");
+lf[293]=C_h_intern(&lf[293],22,"\004corerequire-extension");
+lf[294]=C_h_intern(&lf[294],14,"string->symbol");
+lf[295]=C_h_intern(&lf[295],17,"require-extension");
+lf[296]=C_h_intern(&lf[296],16,"static-extension");
+lf[297]=C_h_intern(&lf[297],28,"\010compilerpostponed-initforms");
+lf[298]=C_h_intern(&lf[298],6,"delete");
+lf[299]=C_h_intern(&lf[299],3,"eq\077");
+lf[300]=C_h_intern(&lf[300],4,"load");
+lf[301]=C_h_intern(&lf[301],12,"load-verbose");
+lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\036Loading compiler extensions...");
+lf[303]=C_h_intern(&lf[303],6,"extend");
+lf[304]=C_h_intern(&lf[304],17,"register-feature!");
+lf[305]=C_h_intern(&lf[305],12,"string-split");
+lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[307]=C_h_intern(&lf[307],10,"append-map");
+lf[308]=C_h_intern(&lf[308],7,"feature");
+lf[309]=C_h_intern(&lf[309],38,"no-procedure-checks-for-usual-bindings");
+lf[310]=C_h_intern(&lf[310],8,"\003sysput!");
+lf[311]=C_h_intern(&lf[311],21,"\010compileralways-bound");
+lf[312]=C_h_intern(&lf[312],34,"\010compileralways-bound-to-procedure");
+lf[313]=C_h_intern(&lf[313],19,"no-procedure-checks");
+lf[314]=C_h_intern(&lf[314],28,"\010compilerno-procedure-checks");
+lf[315]=C_h_intern(&lf[315],15,"no-bound-checks");
+lf[316]=C_h_intern(&lf[316],24,"\010compilerno-bound-checks");
+lf[317]=C_h_intern(&lf[317],14,"no-argc-checks");
+lf[318]=C_h_intern(&lf[318],23,"\010compilerno-argc-checks");
+lf[319]=C_h_intern(&lf[319],20,"keep-shadowed-macros");
+lf[320]=C_h_intern(&lf[320],33,"\010compilerundefine-shadowed-macros");
+lf[321]=C_decode_literal(C_heaptop,"\376B\000\000(source- and output-filename are the same");
+lf[322]=C_h_intern(&lf[322],23,"\010compilerchop-separator");
+lf[323]=C_h_intern(&lf[323],12,"include-path");
+lf[324]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014-r5rs-syntax\376\377\016");
+lf[325]=C_h_intern(&lf[325],13,"symbol-escape");
+lf[326]=C_h_intern(&lf[326],20,"parentheses-synonyms");
+lf[327]=C_h_intern(&lf[327],5,"\000none");
+lf[328]=C_h_intern(&lf[328],14,"case-sensitive");
+lf[329]=C_decode_literal(C_heaptop,"\376B\000\000.Disabled the Chicken extensions to R5RS syntax");
+lf[330]=C_h_intern(&lf[330],16,"no-symbol-escape");
+lf[331]=C_decode_literal(C_heaptop,"\376B\000\000$Disabled support for escaped symbols");
+lf[332]=C_h_intern(&lf[332],23,"no-parenthesis-synonyms");
+lf[333]=C_h_intern(&lf[333],20,"parenthesis-synonyms");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000)Disabled support for parenthesis synonyms");
+lf[335]=C_decode_literal(C_heaptop,"\376B\000\000\006prefix");
+lf[336]=C_h_intern(&lf[336],7,"\000prefix");
+lf[337]=C_decode_literal(C_heaptop,"\376B\000\000\004none");
+lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\006suffix");
+lf[339]=C_h_intern(&lf[339],7,"\000suffix");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000+invalid argument to `-keyword-style\047 option");
+lf[341]=C_h_intern(&lf[341],17,"compress-literals");
+lf[342]=C_decode_literal(C_heaptop,"\376B\000\000+`the -compress-literals\047 option is obsolete");
+lf[343]=C_h_intern(&lf[343],16,"case-insensitive");
+lf[344]=C_decode_literal(C_heaptop,"\376B\000\000,Identifiers and symbols are case insensitive");
+lf[345]=C_h_intern(&lf[345],24,"\010compilerinline-max-size");
+lf[346]=C_decode_literal(C_heaptop,"\376B\000\0000invalid argument to `-inline-limit\047 option: `~A\047");
+lf[347]=C_h_intern(&lf[347],26,"\010compilerlocal-definitions");
+lf[348]=C_h_intern(&lf[348],6,"inline");
+lf[349]=C_h_intern(&lf[349],30,"emit-external-prototypes-first");
+lf[350]=C_h_intern(&lf[350],30,"\010compilerexternal-protos-first");
+lf[351]=C_h_intern(&lf[351],5,"block");
+lf[352]=C_h_intern(&lf[352],26,"\010compilerblock-compilation");
+lf[353]=C_h_intern(&lf[353],17,"fixnum-arithmetic");
+lf[354]=C_h_intern(&lf[354],11,"number-type");
+lf[355]=C_h_intern(&lf[355],6,"fixnum");
+lf[356]=C_h_intern(&lf[356],18,"disable-interrupts");
+lf[357]=C_h_intern(&lf[357],28,"\010compilerinsert-timer-checks");
+lf[358]=C_h_intern(&lf[358],10,"setup-mode");
+lf[359]=C_h_intern(&lf[359],14,"\003syssetup-mode");
+lf[360]=C_h_intern(&lf[360],16,"unsafe-libraries");
+lf[361]=C_h_intern(&lf[361],27,"\010compileremit-unsafe-marker");
+lf[362]=C_h_intern(&lf[362],11,"no-warnings");
+lf[363]=C_decode_literal(C_heaptop,"\376B\000\000\025Warnings are disabled");
+lf[364]=C_h_intern(&lf[364],15,"disable-warning");
+lf[365]=C_h_intern(&lf[365],13,"inline-global");
+lf[366]=C_h_intern(&lf[366],5,"local");
+lf[367]=C_h_intern(&lf[367],18,"no-compiler-syntax");
+lf[368]=C_h_intern(&lf[368],32,"\010compilercompiler-syntax-enabled");
+lf[369]=C_h_intern(&lf[369],14,"no-lambda-info");
+lf[370]=C_h_intern(&lf[370],26,"\010compileremit-closure-info");
+lf[371]=C_h_intern(&lf[371],3,"raw");
+lf[372]=C_h_intern(&lf[372],12,"emit-exports");
+lf[373]=C_h_intern(&lf[373],7,"warning");
+lf[374]=C_decode_literal(C_heaptop,"\376B\000\000(deprecated compiler option: emit-exports");
+lf[375]=C_h_intern(&lf[375],1,"b");
+lf[376]=C_h_intern(&lf[376],15,"\003sysstart-timer");
+lf[377]=C_h_intern(&lf[377],10,"scrutinize");
+lf[378]=C_h_intern(&lf[378],11,"lambda-lift");
+lf[379]=C_h_intern(&lf[379],25,"emit-all-import-libraries");
+lf[380]=C_h_intern(&lf[380],29,"\010compilerall-import-libraries");
+lf[381]=C_h_intern(&lf[381],13,"string-append");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[383]=C_h_intern(&lf[383],19,"emit-import-library");
+lf[384]=C_h_intern(&lf[384],16,"\003sysstring->list");
+lf[385]=C_h_intern(&lf[385],5,"debug");
+lf[386]=C_h_intern(&lf[386],18,"\003sysdload-disabled");
+lf[387]=C_h_intern(&lf[387],15,"repository-path");
+lf[388]=C_h_intern(&lf[388],30,"\010compilerstandalone-executable");
+lf[389]=C_h_intern(&lf[389],29,"\010compilerstring->c-identifier");
+lf[390]=C_h_intern(&lf[390],18,"\010compilerstringify");
+lf[391]=C_decode_literal(C_heaptop,"\376B\000\000\001;");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[393]=C_h_intern(&lf[393],24,"get-environment-variable");
+lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\024CHICKEN_INCLUDE_PATH");
+lf[395]=C_h_intern(&lf[395],9,"to-stdout");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
+lf[397]=C_h_intern(&lf[397],13,"pathname-file");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\003out");
+lf[399]=C_h_intern(&lf[399],29,"\010compilerdefault-declarations");
+lf[400]=C_h_intern(&lf[400],30,"\010compilerunits-used-by-default");
+lf[401]=C_h_intern(&lf[401],28,"\010compilerinitialize-compiler");
+lf[402]=C_h_intern(&lf[402],14,"make-parameter");
+C_register_lf2(lf,403,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c338 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1498,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
+
+/* k1496 */
+static void C_ccall f_1498(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1498,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k1499 in k1496 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1501,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1506,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 38 make-parameter");
+((C_proc3)C_retrieve_symbol_proc(lf[402]))(3,*((C_word*)lf[402]+1),t2,C_SCHEME_FALSE);}
+
+/* k1504 in k1499 in k1496 */
+static void C_ccall f_1506(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_1506,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_1510,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 39 make-parameter");
+((C_proc3)C_retrieve_symbol_proc(lf[402]))(3,*((C_word*)lf[402]+1),t3,C_SCHEME_FALSE);}
+
+/* k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1510(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_1510,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_1514,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 40 make-parameter");
+((C_proc3)C_retrieve_symbol_proc(lf[402]))(3,*((C_word*)lf[402]+1),t3,C_SCHEME_FALSE);}
+
+/* k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1514,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_1518,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 41 make-parameter");
+((C_proc3)C_retrieve_symbol_proc(lf[402]))(3,*((C_word*)lf[402]+1),t3,C_SCHEME_FALSE);}
+
+/* k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1518,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_1522,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 42 make-parameter");
+((C_proc3)C_retrieve_symbol_proc(lf[402]))(3,*((C_word*)lf[402]+1),t3,C_SCHEME_FALSE);}
+
+/* k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[2],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1522,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_1524,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 k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1524(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_1524r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_1524r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1524r(C_word 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_1527,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1560,a[2]=t2,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+C_trace("batch-driver.scm: 55 initialize-compiler");
+((C_proc2)C_retrieve_symbol_proc(lf[401]))(2,*((C_word*)lf[401]+1),t5);}
+
+/* k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1560(C_word c,C_word t0,C_word 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_1560,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_4789,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_4793,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[12]))){
+C_trace("batch-driver.scm: 58 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),t5,C_retrieve(lf[399]),C_SCHEME_END_OF_LIST);}
+else{
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4808,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("##sys#append");
+t7=*((C_word*)lf[242]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,C_retrieve(lf[400]),C_SCHEME_END_OF_LIST);}}
+
+/* k4806 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4808,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[240],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+C_trace("batch-driver.scm: 58 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),((C_word*)t0)[2],C_retrieve(lf[399]),t3);}
+
+/* k4791 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4793(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[242]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4789(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_4789,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_1576,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_4749,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("g7778");
+t10=t9;
+f_4749(t10,t8,t7);}
+else{
+if(C_truep((C_word)C_i_memq(lf[395],((C_word*)t0)[5]))){
+t9=t8;
+f_1576(2,t9,C_SCHEME_FALSE);}
+else{
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4778,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(((C_word*)t0)[2])){
+C_trace("batch-driver.scm: 71 pathname-file");
+((C_proc3)C_retrieve_symbol_proc(lf[397]))(3,*((C_word*)lf[397]+1),t9,((C_word*)t0)[2]);}
+else{
+C_trace("batch-driver.scm: 71 make-pathname");
+((C_proc5)C_retrieve_symbol_proc(lf[164]))(5,*((C_word*)lf[164]+1),t8,C_SCHEME_FALSE,lf[398],lf[396]);}}}}
+
+/* k4776 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4778(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 71 make-pathname");
+((C_proc5)C_retrieve_symbol_proc(lf[164]))(5,*((C_word*)lf[164]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[396]);}
+
+/* g77 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4749(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_4749,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4753,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 66 option-arg");
+f_1527(t3,t2);}
+
+/* k4751 in g77 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+if(C_truep((C_word)C_i_symbolp(t1))){
+C_trace("batch-driver.scm: 68 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[166]+1)))(3,*((C_word*)lf[166]+1),((C_word*)t0)[2],t1);}
+else{
+t2=t1;
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1576(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_1576,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_1579,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_4706,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_4745,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 72 get-environment-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[393]))(3,*((C_word*)lf[393]+1),t8,lf[394]);}
+
+/* k4743 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4745(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("batch-driver.scm: 72 string-split");
+((C_proc4)C_retrieve_symbol_proc(lf[305]))(4,*((C_word*)lf[305]+1),((C_word*)t0)[2],t2,lf[391]);}
+else{
+C_trace("batch-driver.scm: 72 string-split");
+((C_proc4)C_retrieve_symbol_proc(lf[305]))(4,*((C_word*)lf[305]+1),((C_word*)t0)[2],lf[392],lf[391]);}}
+
+/* k4704 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4706,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_4708,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_4708(t5,((C_word*)t0)[2],t1);}
+
+/* loop83 in k4704 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4708(C_word t0,C_word 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_4708,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[322]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4737,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));
+C_trace("g99100");
+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);}}
+
+/* k4735 in loop83 in k4704 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t8;
+C_word t9;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4737,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));
+C_trace("loop8396");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4708(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));
+C_trace("loop8396");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4708(t6,((C_word*)t0)[3],t5);}}
+
+/* k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1579(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_1579,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_1585,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_1585(t13,t11);}
+else{
+t13=(C_word)C_i_memq(lf[271],((C_word*)t0)[8]);
+t14=t12;
+f_1585(t14,(C_truep(t13)?t13:(C_word)C_i_memq(lf[19],((C_word*)t0)[8])));}}
+
+/* k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1585(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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 ab[116],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_1585,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_SCHEME_FALSE;
+t16=(*a=C_VECTOR_TYPE|1,a[1]=t15,tmp=(C_word)a,a+=2,tmp);
+t17=C_SCHEME_FALSE;
+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=(C_word)C_i_memq(lf[29],((C_word*)t0)[13]);
+t22=(C_truep(t21)?t21:(C_word)C_i_memq(lf[30],((C_word*)t0)[13]));
+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_set_block_item(t24,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1632,a[2]=((C_word*)t0)[12],tmp=(C_word)a,a+=3,tmp));
+t48=C_set_block_item(t26,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1647,a[2]=t24,tmp=(C_word)a,a+=3,tmp));
+t49=C_set_block_item(t28,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1671,a[2]=t26,a[3]=t16,tmp=(C_word)a,a+=4,tmp));
+t50=C_set_block_item(t30,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1693,a[2]=t26,tmp=(C_word)a,a+=3,tmp));
+t51=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1717,a[2]=t26,tmp=(C_word)a,a+=3,tmp));
+t52=C_set_block_item(t34,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1752,tmp=(C_word)a,a+=2,tmp));
+t53=C_set_block_item(t36,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1801,tmp=(C_word)a,a+=2,tmp));
+t54=C_set_block_item(t38,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1881,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[11],tmp=(C_word)a,a+=4,tmp));
+t55=C_set_block_item(t40,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1916,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t56=C_set_block_item(t42,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1926,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t57=C_set_block_item(t44,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1955,a[2]=t34,tmp=(C_word)a,a+=3,tmp));
+t58=C_set_block_item(t46,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1961,a[2]=t20,tmp=(C_word)a,a+=3,tmp));
+t59=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2040,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]=t36,a[11]=t22,a[12]=t1,a[13]=t44,a[14]=((C_word*)t0)[3],a[15]=t4,a[16]=((C_word*)t0)[4],a[17]=t32,a[18]=t38,a[19]=t30,a[20]=t13,a[21]=t14,a[22]=((C_word*)t0)[5],a[23]=t24,a[24]=t28,a[25]=t46,a[26]=t42,a[27]=t40,a[28]=t18,a[29]=((C_word*)t0)[6],a[30]=((C_word*)t0)[7],a[31]=((C_word*)t0)[8],a[32]=t20,a[33]=t11,a[34]=((C_word*)t0)[12],a[35]=((C_word*)t0)[13],a[36]=t16,tmp=(C_word)a,a+=37,tmp);
+if(C_truep(t12)){
+t60=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4679,a[2]=t59,tmp=(C_word)a,a+=3,tmp);
+t61=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4683,a[2]=t60,tmp=(C_word)a,a+=3,tmp);
+t62=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4687,a[2]=t61,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 169 option-arg");
+f_1527(t62,t12);}
+else{
+t60=t59;
+f_2040(t60,C_SCHEME_UNDEFINED);}}
+
+/* k4685 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4687(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 169 stringify");
+((C_proc3)C_retrieve_symbol_proc(lf[390]))(3,*((C_word*)lf[390]+1),((C_word*)t0)[2],t1);}
+
+/* k4681 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4683(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 169 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[389]))(3,*((C_word*)lf[389]+1),((C_word*)t0)[2],t1);}
+
+/* k4677 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4679(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[211]+1 /* (set! unit-name ...) */,t1);
+t3=((C_word*)t0)[2];
+f_2040(t3,t2);}
+
+/* k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2040(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[37],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2040,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2043,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=C_retrieve(lf[211]);
+if(C_truep(t3)){
+if(C_truep(t3)){
+t4=C_set_block_item(lf[388] /* standalone-executable */,0,C_SCHEME_FALSE);
+t5=t2;
+f_2043(t5,t4);}
+else{
+t4=t2;
+f_2043(t4,C_SCHEME_UNDEFINED);}}
+else{
+if(C_truep(((C_word*)t0)[21])){
+t4=C_set_block_item(lf[388] /* standalone-executable */,0,C_SCHEME_FALSE);
+t5=t2;
+f_2043(t5,t4);}
+else{
+t4=t2;
+f_2043(t4,C_SCHEME_UNDEFINED);}}}
+
+/* k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2043(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_2043,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[193],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[386] /* dload-disabled */,0,C_SCHEME_TRUE);
+C_trace("batch-driver.scm: 174 repository-path");
+((C_proc3)C_retrieve_symbol_proc(lf[387]))(3,*((C_word*)lf[387]+1),t2,C_SCHEME_FALSE);}
+else{
+t3=t2;
+f_2046(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2046(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[43],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|36,a[1]=(C_word)f_2050,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4608,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4664,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 180 collect-options");
+t5=((C_word*)((C_word*)t0)[18])[1];
+f_1881(t5,t4,lf[385]);}
+
+/* k4662 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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("batch-driver.scm: 176 append-map");
+((C_proc4)C_retrieve_symbol_proc(lf[307]))(4,*((C_word*)lf[307]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a4607 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4608(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_4608,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_4616,a[2]=t1,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+C_trace("string->list");
+t8=C_retrieve(lf[384]);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t2);}
+
+/* k4614 in a4607 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4616(C_word c,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_4616,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_4618,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_4618(t5,((C_word*)t0)[2],t1);}
+
+/* loop352 in k4614 in a4607 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4618(C_word t0,C_word 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_4618,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_4656,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);
+C_trace("batch-driver.scm: 178 string->symbol");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[294]+1)))(3,*((C_word*)lf[294]+1),t3,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4654 in loop352 in k4614 in a4607 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t8;
+C_word t9;
+C_word ab[3],*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,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));
+C_trace("loop352365");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4618(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));
+C_trace("loop352365");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4618(t6,((C_word*)t0)[3],t5);}}
+
+/* k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2050(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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[45],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2050,2,t0,t1);}
+t2=C_mutate((C_word*)lf[35]+1 /* (set! debugging-chicken ...) */,t1);
+t3=(C_word)C_i_memq(lf[59],C_retrieve(lf[35]));
+t4=C_mutate(((C_word *)((C_word*)t0)[36])+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|35,a[1]=(C_word)f_2058,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4558,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 186 collect-options");
+t11=((C_word*)((C_word*)t0)[18])[1];
+f_1881(t11,t10,lf[383]);}
+
+/* k4556 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4558(C_word c,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_4558,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_4560,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_4560(t5,((C_word*)t0)[2],t1);}
+
+/* loop376 in k4556 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4560(C_word 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_4560,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_4595,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);
+C_trace("batch-driver.scm: 184 string->symbol");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[294]+1)))(3,*((C_word*)lf[294]+1),t4,t3);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4593 in loop376 in k4556 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4595(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_4595,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4599,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);
+C_trace("batch-driver.scm: 185 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[381]+1)))(4,*((C_word*)lf[381]+1),t2,((C_word*)t0)[2],lf[382]);}
+
+/* k4597 in k4593 in loop376 in k4556 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4599(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_4599,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));
+C_trace("loop376389");
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_4560(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));
+C_trace("loop376389");
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_4560(t7,((C_word*)t0)[3],t6);}}
+
+/* k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2058(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2058,2,t0,t1);}
+t2=C_mutate((C_word*)lf[60]+1 /* (set! import-libraries ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2061,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[379],((C_word*)t0)[35]))){
+if(C_truep(((C_word*)t0)[20])){
+t4=t3;
+f_2061(t4,C_SCHEME_UNDEFINED);}
+else{
+t4=C_set_block_item(lf[380] /* all-import-libraries */,0,C_SCHEME_TRUE);
+t5=t3;
+f_2061(t5,t4);}}
+else{
+t4=t3;
+f_2061(t4,C_SCHEME_UNDEFINED);}}
+
+/* k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2061,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,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],tmp=(C_word)a,a+=36,tmp);
+if(C_truep((C_word)C_i_memq(lf[378],((C_word*)t0)[35]))){
+t3=C_set_block_item(lf[174] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2064(t4,t3);}
+else{
+t3=t2;
+f_2064(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2064,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,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],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[179] /* do-scrutinize */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2067(t4,t3);}
+else{
+t3=t2;
+f_2067(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2067(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_2067,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|35,a[1]=(C_word)f_2070,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[113],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 192 ##sys#start-timer");
+t3=*((C_word*)lf[376]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+t3=t2;
+f_2070(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2073,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)C_i_memq(lf[375],C_retrieve(lf[35])))){
+t3=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
+t4=t2;
+f_2073(t4,t3);}
+else{
+t3=t2;
+f_2073(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2073(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*)trf_2073,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2076,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[372],((C_word*)t0)[34]))){
+C_trace("batch-driver.scm: 195 warning");
+((C_proc3)C_retrieve_symbol_proc(lf[373]))(3,*((C_word*)lf[373]+1),t2,lf[374]);}
+else{
+t3=t2;
+f_2076(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2076,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[371],((C_word*)t0)[34]))){
+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)[30],0,C_SCHEME_END_OF_LIST);
+t6=t2;
+f_2079(t6,t5);}
+else{
+t3=t2;
+f_2079(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2079(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2079,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[369],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[370] /* emit-closure-info */,0,C_SCHEME_FALSE);
+t4=t2;
+f_2082(t4,t3);}
+else{
+t3=t2;
+f_2082(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2082,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[367],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[368] /* compiler-syntax-enabled */,0,C_SCHEME_FALSE);
+t4=t2;
+f_2085(t4,t3);}
+else{
+t3=t2;
+f_2085(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2085,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[366],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[347] /* local-definitions */,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 k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2088(C_word t0,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_2088,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[365],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[160] /* enable-inline-files */,0,C_SCHEME_TRUE);
+t4=C_set_block_item(lf[156] /* inline-locally */,0,C_SCHEME_TRUE);
+t5=C_set_block_item(lf[155] /* inline-globally */,0,C_SCHEME_TRUE);
+t6=t2;
+f_2091(t6,t5);}
+else{
+t3=t2;
+f_2091(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2091(C_word t0,C_word t1){
+C_word 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[44],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2091,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|34,a[1]=(C_word)f_2095,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4461,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 210 collect-options");
+t8=((C_word*)((C_word*)t0)[17])[1];
+f_1881(t8,t7,lf[364]);}
+
+/* k4459 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4461,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_4463,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_4463(t5,((C_word*)t0)[2],t1);}
+
+/* loop428 in k4459 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4463(C_word t0,C_word 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_4463,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[294]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4492,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));
+C_trace("g444445");
+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);}}
+
+/* k4490 in loop428 in k4459 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4492(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4492,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));
+C_trace("loop428441");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4463(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));
+C_trace("loop428441");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4463(t6,((C_word*)t0)[3],t5);}}
+
+/* k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[38],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2095,2,t0,t1);}
+t2=C_mutate((C_word*)lf[61]+1 /* (set! disabled-warnings ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2098,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[362],((C_word*)t0)[34]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4456,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 212 dribble");
+t5=((C_word*)((C_word*)t0)[22])[1];
+f_1632(t5,t4,lf[363],C_SCHEME_END_OF_LIST);}
+else{
+t4=t3;
+f_2098(t4,C_SCHEME_UNDEFINED);}}
+
+/* k4454 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=C_set_block_item(lf[126] /* warnings-enabled */,0,C_SCHEME_FALSE);
+t3=((C_word*)t0)[2];
+f_2098(t3,t2);}
+
+/* k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2098(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2098,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2101,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[98],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[98] /* optimize-leaf-routines */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2101(t4,t3);}
+else{
+t3=t2;
+f_2101(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2101(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2101,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2104,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[153],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[153] /* unsafe */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2104(t4,t3);}
+else{
+t3=t2;
+f_2104(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2104(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2104,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2107,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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*)t0)[20])){
+if(C_truep((C_word)C_i_memq(lf[360],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[361] /* emit-unsafe-marker */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2107(t4,t3);}
+else{
+t3=t2;
+f_2107(t3,C_SCHEME_UNDEFINED);}}
+else{
+t3=t2;
+f_2107(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2107(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2107,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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]=((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[358],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[359] /* setup-mode */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2110(t4,t3);}
+else{
+t3=t2;
+f_2110(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2110(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2110,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,a[1]=(C_word)f_2113,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[356],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[357] /* insert-timer-checks */,0,C_SCHEME_FALSE);
+t4=t2;
+f_2113(t4,t3);}
+else{
+t3=t2;
+f_2113(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2113(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2113,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[353],((C_word*)t0)[34]))){
+t3=C_mutate((C_word*)lf[354]+1 /* (set! number-type ...) */,lf[355]);
+t4=t2;
+f_2116(t4,t3);}
+else{
+t3=t2;
+f_2116(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2116(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2116,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[351],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[352] /* block-compilation */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2119(t4,t3);}
+else{
+t3=t2;
+f_2119(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2119,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[349],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[350] /* external-protos-first */,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 k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[35],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2122,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[348],((C_word*)t0)[34]))){
+t3=C_set_block_item(lf[156] /* inline-locally */,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 k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word t6;
+C_word t7;
+C_word ab[38],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2125,NULL,2,t0,t1);}
+t2=(C_word)C_i_memq(lf[62],((C_word*)t0)[34]);
+t3=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep(t2)){
+t4=C_set_block_item(lf[156] /* inline-locally */,0,C_SCHEME_TRUE);
+t5=C_set_block_item(lf[347] /* local-definitions */,0,C_SCHEME_TRUE);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4411,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 230 option-arg");
+f_1527(t6,t2);}
+else{
+t4=t3;
+f_2131(t4,C_SCHEME_FALSE);}}
+
+/* k4409 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=C_mutate((C_word*)lf[132]+1 /* (set! inline-output-file ...) */,t1);
+t3=((C_word*)t0)[2];
+f_2131(t3,t2);}
+
+/* k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word ab[38],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2131,NULL,2,t0,t1);}
+t2=(C_word)C_i_memq(lf[63],((C_word*)t0)[34]);
+t3=(*a=C_CLOSURE_TYPE|34,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)[34],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);
+if(C_truep(t2)){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4396,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 233 option-arg");
+f_1527(t4,t2);}
+else{
+t4=t3;
+f_2137(t4,C_SCHEME_FALSE);}}
+
+/* k4394 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4396(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_4396,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4399,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 234 string->number");
+C_string_to_number(3,0,t2,t1);}
+
+/* k4397 in k4394 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4399(C_word c,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_4399,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4402,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[345]+1 /* (set! inline-max-size ...) */,t3);
+t5=((C_word*)t0)[3];
+f_2137(t5,t4);}
+else{
+C_trace("batch-driver.scm: 235 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[346],((C_word*)t0)[2]);}}
+
+/* k4400 in k4397 in k4394 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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_mutate((C_word*)lf[345]+1 /* (set! inline-max-size ...) */,t1);
+t3=((C_word*)t0)[2];
+f_2137(t3,t2);}
+
+/* k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[38],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2137,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[343],((C_word*)t0)[30]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4386,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 237 dribble");
+t4=((C_word*)((C_word*)t0)[22])[1];
+f_1632(t4,t3,lf[344],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2140(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4384 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4386,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4389,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 238 register-feature!");
+((C_proc3)C_retrieve_symbol_proc(lf[304]))(3,*((C_word*)lf[304]+1),t2,lf[343]);}
+
+/* k4387 in k4384 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4389(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 239 case-sensitive");
+((C_proc3)C_retrieve_symbol_proc(lf[328]))(3,*((C_word*)lf[328]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2140(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_2140,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|34,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],tmp=(C_word)a,a+=35,tmp);
+if(C_truep((C_word)C_i_memq(lf[341],((C_word*)t0)[30]))){
+C_trace("batch-driver.scm: 241 compiler-warning");
+((C_proc4)C_retrieve_symbol_proc(lf[206]))(4,*((C_word*)lf[206]+1),t2,lf[212],lf[342]);}
+else{
+t3=t2;
+f_2143(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2143(C_word c,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*)tr2,(void*)f_2143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2146,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])){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4344,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 243 option-arg");
+f_1527(t3,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_2146(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4342 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4344(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[335],t1))){
+C_trace("batch-driver.scm: 244 keyword-style");
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[336]);}
+else{
+if(C_truep((C_word)C_i_string_equal_p(lf[337],t1))){
+C_trace("batch-driver.scm: 245 keyword-style");
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[327]);}
+else{
+if(C_truep((C_word)C_i_string_equal_p(lf[338],t1))){
+C_trace("batch-driver.scm: 246 keyword-style");
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),((C_word*)t0)[2],lf[339]);}
+else{
+C_trace("batch-driver.scm: 247 quit");
+((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),((C_word*)t0)[2],lf[340]);}}}}
+
+/* k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2146(C_word c,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*)tr2,(void*)f_2146,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,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]=((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[332],((C_word*)t0)[29]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4338,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 249 dribble");
+t4=((C_word*)((C_word*)t0)[21])[1];
+f_1632(t4,t3,lf[334],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2149(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4336 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4338(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 250 parenthesis-synonyms");
+((C_proc3)C_retrieve_symbol_proc(lf[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[37],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2149,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,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],tmp=(C_word)a,a+=34,tmp);
+if(C_truep((C_word)C_i_memq(lf[330],((C_word*)t0)[29]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4329,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 252 dribble");
+t4=((C_word*)((C_word*)t0)[21])[1];
+f_1632(t4,t3,lf[331],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2152(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4327 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4329(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 253 symbol-escape");
+((C_proc3)C_retrieve_symbol_proc(lf[325]))(3,*((C_word*)lf[325]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2152(C_word c,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*)tr2,(void*)f_2152,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2155,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[324],((C_word*)t0)[29]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4311,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 255 dribble");
+t4=((C_word*)((C_word*)t0)[21])[1];
+f_1632(t4,t3,lf[329],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2155(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4309 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4311(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4314,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 256 case-sensitive");
+((C_proc3)C_retrieve_symbol_proc(lf[328]))(3,*((C_word*)lf[328]+1),t2,C_SCHEME_FALSE);}
+
+/* k4312 in k4309 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4317,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 257 keyword-style");
+((C_proc3)C_retrieve_symbol_proc(lf[25]))(3,*((C_word*)lf[25]+1),t2,lf[327]);}
+
+/* k4315 in k4312 in k4309 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4320,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 258 parentheses-synonyms");
+((C_proc3)C_retrieve_symbol_proc(lf[326]))(3,*((C_word*)lf[326]+1),t2,C_SCHEME_FALSE);}
+
+/* k4318 in k4315 in k4312 in k4309 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4320(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 259 symbol-escape");
+((C_proc3)C_retrieve_symbol_proc(lf[325]))(3,*((C_word*)lf[325]+1),((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2155,2,t0,t1);}
+t2=C_mutate((C_word*)lf[64]+1 /* (set! verbose-mode ...) */,((C_word*)t0)[33]);
+t3=C_set_block_item(lf[65] /* read-error-with-line-number */,0,C_SCHEME_TRUE);
+t4=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2161,a[2]=((C_word*)t0)[33],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+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_4266,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_4270,a[2]=t9,a[3]=t6,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 263 collect-options");
+t11=((C_word*)((C_word*)t0)[16])[1];
+f_1881(t11,t10,lf[323]);}
+
+/* k4268 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4270(C_word c,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_4270,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_4272,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_4272(t5,((C_word*)t0)[2],t1);}
+
+/* loop517 in k4268 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4272(C_word t0,C_word 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_4272,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[322]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4301,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));
+C_trace("g533534");
+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);}}
+
+/* k4299 in loop517 in k4268 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4301(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4301,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));
+C_trace("loop517530");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4272(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));
+C_trace("loop517530");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4272(t6,((C_word*)t0)[3],t5);}}
+
+/* k4264 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4266(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 263 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[225]+1)))(5,*((C_word*)lf[225]+1),((C_word*)t0)[3],t1,C_retrieve(lf[66]),((C_word*)t0)[2]);}
+
+/* k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[33],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2161,2,t0,t1);}
+t2=C_mutate((C_word*)lf[66]+1 /* (set! include-pathnames ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|32,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],tmp=(C_word)a,a+=33,tmp);
+if(C_truep(((C_word*)t0)[20])){
+if(C_truep(((C_word*)t0)[27])){
+if(C_truep((C_word)C_i_string_equal_p(((C_word*)t0)[20],((C_word*)t0)[27]))){
+C_trace("batch-driver.scm: 267 quit");
+((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t3,lf[321]);}
+else{
+t4=t3;
+f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+t4=t3;
+f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+t4=t3;
+f_2164(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word t6;
+C_word t7;
+C_word t8;
+C_word ab[42],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2164,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|32,a[1]=(C_word)f_2168,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4215,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 268 collect-options");
+t8=((C_word*)((C_word*)t0)[16])[1];
+f_1881(t8,t7,lf[240]);}
+
+/* k4213 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4215(C_word c,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_4215,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_4217,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_4217(t5,((C_word*)t0)[2],t1);}
+
+/* loop546 in k4213 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4217(C_word t0,C_word 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_4217,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[294]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4246,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));
+C_trace("g562563");
+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);}}
+
+/* k4244 in loop546 in k4213 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4246(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4246,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));
+C_trace("loop546559");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4217(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));
+C_trace("loop546559");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4217(t6,((C_word*)t0)[3],t5);}}
+
+/* k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2168(C_word c,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_2168,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[32])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2171,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)[32],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);
+if(C_truep((C_word)C_i_memq(lf[319],((C_word*)t0)[29]))){
+t4=C_set_block_item(lf[320] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
+t5=t3;
+f_2171(t5,t4);}
+else{
+t4=t3;
+f_2171(t4,C_SCHEME_UNDEFINED);}}
+
+/* k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2171(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[33],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2171,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2174,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep((C_word)C_i_memq(lf[317],((C_word*)t0)[30]))){
+t3=C_set_block_item(lf[318] /* no-argc-checks */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2174(t4,t3);}
+else{
+t3=t2;
+f_2174(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2174(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[33],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2174,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2177,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep((C_word)C_i_memq(lf[315],((C_word*)t0)[30]))){
+t3=C_set_block_item(lf[316] /* no-bound-checks */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2177(t4,t3);}
+else{
+t3=t2;
+f_2177(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2177(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[33],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2177,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,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]=((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);
+if(C_truep((C_word)C_i_memq(lf[313],((C_word*)t0)[30]))){
+t3=C_set_block_item(lf[314] /* no-procedure-checks */,0,C_SCHEME_TRUE);
+t4=t2;
+f_2180(t4,t3);}
+else{
+t3=t2;
+f_2180(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2180(C_word t0,C_word 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[41],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2180,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2183,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep((C_word)C_i_memq(lf[309],((C_word*)t0)[30]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4022,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_4112,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t7=((C_word*)t5)[1];
+f_4112(t7,t3,C_retrieve(lf[284]));}
+else{
+t3=t2;
+f_2183(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* loop579 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4112(C_word t0,C_word 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_4112,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_4184,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_4151,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_4126,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t6))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],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);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],t9);}
+else{
+C_trace("##sys#error");
+t9=*((C_word*)lf[58]+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);}}
+
+/* k4124 in loop579 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4126(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[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[312],t1);}
+
+/* k4149 in loop579 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4151(C_word c,C_word t0,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_4151,2,t0,t1);}
+t2=C_SCHEME_END_OF_LIST;
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4156,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))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],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);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],t5);}
+else{
+C_trace("##sys#error");
+t5=*((C_word*)lf[58]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
+
+/* k4154 in k4149 in loop579 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4156(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[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],t1);}
+
+/* k4182 in loop579 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4184(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_4112(t3,((C_word*)t0)[2],t2);}
+
+/* k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4022,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_4027,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_4027(t5,((C_word*)t0)[2],C_retrieve(lf[286]));}
+
+/* loop626 in k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_4027(C_word t0,C_word 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_4027,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_4099,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_4066,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_4041,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t6))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],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);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),t5,t4,lf[312],t9);}
+else{
+C_trace("##sys#error");
+t9=*((C_word*)lf[58]+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);}}
+
+/* k4039 in loop626 in k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4041(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[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[312],t1);}
+
+/* k4064 in loop626 in k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4066(C_word c,C_word t0,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_4066,2,t0,t1);}
+t2=C_SCHEME_END_OF_LIST;
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4071,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))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],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);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],t5);}
+else{
+C_trace("##sys#error");
+t5=*((C_word*)lf[58]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
+
+/* k4069 in k4064 in loop626 in k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4071(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[310]))(5,*((C_word*)lf[310]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[311],t1);}
+
+/* k4097 in loop626 in k4020 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4099(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_4027(t3,((C_word*)t0)[2],t2);}
+
+/* k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2183(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[42],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2183,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2186,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3983,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4008,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4016,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 292 collect-options");
+t6=((C_word*)((C_word*)t0)[17])[1];
+f_1881(t6,t5,lf[308]);}
+
+/* k4014 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4016(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 292 append-map");
+((C_proc4)C_retrieve_symbol_proc(lf[307]))(4,*((C_word*)lf[307]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a4007 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_4008(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_4008,3,t0,t1,t2);}
+t3=C_retrieve(lf[305]);
+C_trace("g692693");
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[306]);}
+
+/* k3981 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3983(C_word c,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_3983,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_3985,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_3985(t5,((C_word*)t0)[2],t1);}
+
+/* loop674 in k3981 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3985(C_word t0,C_word 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_3985,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[304]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3995,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));
+C_trace("g681682");
+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);}}
+
+/* k3993 in loop674 in k3981 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3995(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_3985(t3,((C_word*)t0)[2],t2);}
+
+/* k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2186(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2186,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[67],C_retrieve(lf[68]));
+t3=C_mutate((C_word*)lf[68]+1 /* (set! features ...) */,t2);
+t4=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2193,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 296 collect-options");
+t5=((C_word*)((C_word*)t0)[17])[1];
+f_1881(t5,t4,lf[303]);}
+
+/* k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2193(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_2193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|33,a[1]=(C_word)f_2196,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],tmp=(C_word)a,a+=34,tmp);
+C_trace("batch-driver.scm: 297 dribble");
+t3=((C_word*)((C_word*)t0)[22])[1];
+f_1632(t3,t2,lf[302],C_SCHEME_END_OF_LIST);}
+
+/* k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2196(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_2196,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|32,a[1]=(C_word)f_2199,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);
+if(C_truep(((C_word*)t0)[2])){
+C_trace("batch-driver.scm: 298 load-verbose");
+((C_proc3)C_retrieve_symbol_proc(lf[301]))(3,*((C_word*)lf[301]+1),t2,C_SCHEME_TRUE);}
+else{
+t3=t2;
+f_2199(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2199(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[37],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2199,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2202,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],tmp=(C_word)a,a+=32,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_3946,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_3946(t6,t2,((C_word*)t0)[2]);}
+
+/* loop699 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3946(C_word t0,C_word 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_3946,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_3965,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_3962,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 300 ##sys#resolve-include-filename");
+((C_proc5)C_retrieve_symbol_proc(lf[163]))(5,*((C_word*)lf[163]+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);}}
+
+/* k3960 in loop699 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3962(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 300 load");
+((C_proc3)C_retrieve_symbol_proc(lf[300]))(3,*((C_word*)lf[300]+1),((C_word*)t0)[2],t1);}
+
+/* k3963 in loop699 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3965(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_3946(t3,((C_word*)t0)[2],t2);}
+
+/* k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2202(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[32],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2206,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 302 delete");
+((C_proc5)C_retrieve_symbol_proc(lf[298]))(5,*((C_word*)lf[298]+1),t2,lf[67],C_retrieve(lf[68]),*((C_word*)lf[299]+1));}
+
+/* k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2206(C_word c,C_word t0,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*)tr2,(void*)f_2206,2,t0,t1);}
+t2=C_mutate((C_word*)lf[68]+1 /* (set! features ...) */,t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[69],C_retrieve(lf[68]));
+t4=C_mutate((C_word*)lf[68]+1 /* (set! features ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|31,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],tmp=(C_word)a,a+=32,tmp);
+C_trace("batch-driver.scm: 305 user-post-analysis-pass");
+((C_proc2)C_retrieve_symbol_proc(lf[6]))(2,*((C_word*)lf[6]+1),t5);}
+
+/* k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[31],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2214,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[31])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|30,a[1]=(C_word)f_2218,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],tmp=(C_word)a,a+=31,tmp);
+C_trace("batch-driver.scm: 308 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),t3,((C_word*)((C_word*)t0)[30])[1],C_retrieve(lf[297]));}
+
+/* k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2218(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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[40],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2218,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[30])+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|30,a[1]=(C_word)f_2221,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],tmp=(C_word)a,a+=31,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3909,a[2]=t7,a[3]=t4,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 310 collect-options");
+t9=((C_word*)((C_word*)t0)[16])[1];
+f_1881(t9,t8,lf[296]);}
+
+/* k3907 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3909(C_word c,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_3909,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_3911,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_3911(t5,((C_word*)t0)[2],t1);}
+
+/* loop716 in k3907 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3911(C_word t0,C_word 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_3911,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[294]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3940,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));
+C_trace("g732733");
+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);}}
+
+/* k3938 in loop716 in k3907 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_3940,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));
+C_trace("loop716729");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3911(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));
+C_trace("loop716729");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3911(t6,((C_word*)t0)[3],t5);}}
+
+/* k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2221(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[58],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2221,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|31,a[1]=(C_word)f_2225,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],tmp=(C_word)a,a+=32,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_3806,a[2]=((C_word*)t0)[30],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3810,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_3866,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
+t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3870,a[2]=t13,a[3]=t10,a[4]=t12,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 316 collect-options");
+t15=((C_word*)((C_word*)t0)[16])[1];
+f_1881(t15,t14,lf[295]);}
+
+/* k3868 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3870(C_word c,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_3870,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_3872,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_3872(t5,((C_word*)t0)[2],t1);}
+
+/* loop767 in k3868 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3872(C_word t0,C_word 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_3872,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[294]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3901,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));
+C_trace("g783784");
+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);}}
+
+/* k3899 in loop767 in k3868 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3901(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3901,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));
+C_trace("loop767780");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3872(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));
+C_trace("loop767780");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3872(t6,((C_word*)t0)[3],t5);}}
+
+/* k3864 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3866(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 316 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k3808 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3810,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_3812,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_3812(t5,((C_word*)t0)[2],t1);}
+
+/* loop739 in k3808 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3812(C_word t0,C_word 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_3812,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[293],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));
+C_trace("loop739752");
+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));
+C_trace("loop739752");
+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);}}
+
+/* k3804 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3806(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 313 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
+
+/* k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[31],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2225,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[31])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|30,a[1]=(C_word)f_2229,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)[31],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],tmp=(C_word)a,a+=31,tmp);
+C_trace("batch-driver.scm: 320 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),t3,C_retrieve(lf[70]),((C_word*)t0)[2]);}
+
+/* k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2229(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[31],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2229,2,t0,t1);}
+t2=C_mutate((C_word*)lf[70]+1 /* (set! explicit-library-modules ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|30,a[1]=(C_word)f_2232,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],tmp=(C_word)a,a+=31,tmp);
+if(C_truep((C_word)C_i_memq(lf[291],((C_word*)t0)[30]))){
+t4=C_set_block_item(lf[292] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
+t5=t3;
+f_2232(t5,t4);}
+else{
+t4=t3;
+f_2232(t4,C_SCHEME_UNDEFINED);}}
+
+/* k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2232(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[34],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2232,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|29,a[1]=(C_word)f_2236,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])){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3785,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 326 option-arg");
+f_1527(t3,((C_word*)t0)[2]);}
+else{
+t3=C_retrieve(lf[290]);
+if(C_truep(t3)){
+t4=(C_word)C_eqp(t3,C_fix(0));
+t5=t2;
+f_2236(2,t5,(C_truep(t4)?C_SCHEME_FALSE:t3));}
+else{
+t4=t2;
+f_2236(2,t4,C_SCHEME_FALSE);}}}
+
+/* k3783 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3785(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 326 arg-val");
+f_1801(((C_word*)t0)[2],t1);}
+
+/* k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2236(C_word c,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_2236,2,t0,t1);}
+t2=C_mutate((C_word*)lf[71]+1 /* (set! target-heap-size ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|28,a[1]=(C_word)f_2240,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_3778,a[2]=t3,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 330 option-arg");
+f_1527(t4,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_2240(2,t4,C_SCHEME_FALSE);}}
+
+/* k3776 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3778(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 330 arg-val");
+f_1801(((C_word*)t0)[2],t1);}
+
+/* k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2240(C_word c,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_2240,2,t0,t1);}
+t2=C_mutate((C_word*)lf[72]+1 /* (set! target-initial-heap-size ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|27,a[1]=(C_word)f_2244,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_3771,a[2]=t3,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 331 option-arg");
+f_1527(t4,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_2244(2,t4,C_SCHEME_FALSE);}}
+
+/* k3769 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3771(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 331 arg-val");
+f_1801(((C_word*)t0)[2],t1);}
+
+/* k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2244(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word ab[31],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2244,2,t0,t1);}
+t2=C_mutate((C_word*)lf[73]+1 /* (set! target-heap-growth ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|26,a[1]=(C_word)f_2248,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],tmp=(C_word)a,a+=27,tmp);
+if(C_truep(((C_word*)t0)[2])){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3764,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 332 option-arg");
+f_1527(t4,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_2248(2,t4,C_SCHEME_FALSE);}}
+
+/* k3762 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3764(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 332 arg-val");
+f_1801(((C_word*)t0)[2],t1);}
+
+/* k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2248(C_word c,C_word t0,C_word 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_2248,2,t0,t1);}
+t2=C_mutate((C_word*)lf[74]+1 /* (set! target-heap-shrinkage ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2252,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],tmp=(C_word)a,a+=24,tmp);
+if(C_truep(((C_word*)t0)[4])){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3744,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 335 option-arg");
+f_1527(t4,((C_word*)t0)[4]);}
+else{
+t4=C_retrieve(lf[289]);
+if(C_truep(t4)){
+t5=(C_word)C_eqp(t4,C_fix(0));
+t6=t3;
+f_2252(2,t6,(C_truep(t5)?C_SCHEME_FALSE:t4));}
+else{
+t5=t3;
+f_2252(2,t5,C_SCHEME_FALSE);}}}
+
+/* k3742 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3744(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 335 arg-val");
+f_1801(((C_word*)t0)[2],t1);}
+
+/* k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2252(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_2252,2,t0,t1);}
+t2=C_mutate((C_word*)lf[75]+1 /* (set! target-stack-size ...) */,t1);
+t3=(C_word)C_i_memq(lf[76],((C_word*)t0)[23]);
+t4=(C_word)C_i_not(t3);
+t5=C_mutate((C_word*)lf[77]+1 /* (set! emit-trace-info ...) */,t4);
+t6=(C_word)C_i_memq(lf[78],((C_word*)t0)[23]);
+t7=C_mutate((C_word*)lf[79]+1 /* (set! disable-stack-overflow-checking ...) */,t6);
+t8=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2263,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_i_memq(lf[287],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 341 set-gc-report!");
+((C_proc3)C_retrieve_symbol_proc(lf[288]))(3,*((C_word*)lf[288]+1),t8,C_SCHEME_TRUE);}
+else{
+t9=t8;
+f_2263(2,t9,C_SCHEME_UNDEFINED);}}
+
+/* k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[24],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2266,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_i_memq(lf[282],((C_word*)t0)[23]))){
+t3=t2;
+f_2266(t3,C_SCHEME_UNDEFINED);}
+else{
+t3=C_mutate((C_word*)lf[283]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[284]));
+t4=C_mutate((C_word*)lf[285]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[286]));
+t5=t2;
+f_2266(t5,t4);}}
+
+/* k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2266(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*)trf_2266,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2269,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_retrieve(lf[77]))){
+C_trace("batch-driver.scm: 345 dribble");
+t3=((C_word*)((C_word*)t0)[15])[1];
+f_1632(t3,t2,lf[279],(C_word)C_a_i_list(&a,1,lf[280]));}
+else{
+C_trace("batch-driver.scm: 345 dribble");
+t3=((C_word*)((C_word*)t0)[15])[1];
+f_1632(t3,t2,lf[279],(C_word)C_a_i_list(&a,1,lf[281]));}}
+
+/* k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t8;
+C_word ab[29],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2272,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*)t0)[2])){
+t3=(C_word)C_i_car(((C_word*)t0)[2]);
+t4=(C_word)C_eqp(lf[271],t3);
+t5=C_set_block_item(lf[232] /* emit-profile */,0,C_SCHEME_TRUE);
+t6=C_mutate((C_word*)lf[272]+1 /* (set! profiled-procedures ...) */,lf[273]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3703,a[2]=t2,a[3]=((C_word*)t0)[15],a[4]=t4,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(t4)){
+C_trace("batch-driver.scm: 354 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[225]+1)))(5,*((C_word*)lf[225]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[277]),lf[278]);}
+else{
+C_trace("batch-driver.scm: 354 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[225]+1)))(5,*((C_word*)lf[225]+1),t7,((C_word*)((C_word*)t0)[6])[1],C_retrieve(lf[277]),C_SCHEME_END_OF_LIST);}}
+else{
+t3=t2;
+f_2272(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k3701 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3703(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3703,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
+if(C_truep(((C_word*)t0)[4])){
+C_trace("batch-driver.scm: 360 dribble");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1632(t3,((C_word*)t0)[2],lf[274],(C_word)C_a_i_list(&a,1,lf[275]));}
+else{
+C_trace("batch-driver.scm: 360 dribble");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1632(t3,((C_word*)t0)[2],lf[274],(C_word)C_a_i_list(&a,1,lf[276]));}}
+
+/* k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[23],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2275,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 363 load-identifier-database");
+((C_proc3)C_retrieve_symbol_proc(lf[269]))(3,*((C_word*)lf[269]+1),t2,lf[270]);}
+
+/* k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t6;
+C_word t7;
+C_word ab[23],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2275,2,t0,t1);}
+if(C_truep((C_word)C_i_memq(lf[80],((C_word*)t0)[22]))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2284,a[2]=((C_word*)t0)[21],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 366 print-version");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_i_memq(lf[83],((C_word*)t0)[22]);
+t3=(*a=C_CLOSURE_TYPE|22,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)[22],a[22]=((C_word*)t0)[21],tmp=(C_word)a,a+=23,tmp);
+if(C_truep(t2)){
+t4=t3;
+f_2296(t4,t2);}
+else{
+t4=(C_word)C_i_memq(lf[266],((C_word*)t0)[22]);
+if(C_truep(t4)){
+t5=t3;
+f_2296(t5,t4);}
+else{
+t5=(C_word)C_i_memq(lf[267],((C_word*)t0)[22]);
+t6=t3;
+f_2296(t6,(C_truep(t5)?t5:(C_word)C_i_memq(lf[268],((C_word*)t0)[22])));}}}}
+
+/* k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2296(C_word t0,C_word 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*)trf_2296,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("batch-driver.scm: 369 print-usage");
+((C_proc2)C_retrieve_symbol_proc(lf[84]))(2,*((C_word*)lf[84]+1),((C_word*)t0)[22]);}
+else{
+if(C_truep((C_word)C_i_memq(lf[85],((C_word*)t0)[21]))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2308,a[2]=((C_word*)t0)[22],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2315,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 371 chicken-version");
+((C_proc2)C_retrieve_symbol_proc(lf[86]))(2,*((C_word*)lf[86]+1),t3);}
+else{
+t2=((C_word*)t0)[20];
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2330,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)[21],a[10]=((C_word*)t0)[9],a[11]=((C_word*)t0)[22],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],tmp=(C_word)a,a+=23,tmp);
+C_trace("batch-driver.scm: 379 dribble");
+t4=((C_word*)((C_word*)t0)[14])[1];
+f_1632(t4,t3,lf[264],(C_word)C_a_i_list(&a,1,((C_word*)t0)[20]));}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2324,a[2]=((C_word*)t0)[22],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 374 print-version");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t3,C_SCHEME_TRUE);}}}}
+
+/* k2322 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 375 display");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[36]+1)))(3,*((C_word*)lf[36]+1),((C_word*)t0)[2],lf[265]);}
+
+/* k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2330(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_2330,2,t0,t1);}
+t2=C_mutate((C_word*)lf[87]+1 /* (set! source-filename ...) */,((C_word*)t0)[22]);
+t3=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2334,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)[22],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);
+C_trace("batch-driver.scm: 381 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[103]))(5,*((C_word*)lf[103]+1),t3,lf[259],lf[263],((C_word*)t0)[9]);}
+
+/* k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2334(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_2334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2337,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 382 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[103]))(5,*((C_word*)lf[103]+1),t2,lf[259],lf[262],C_retrieve(lf[35]));}
+
+/* k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2337(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_2337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2340,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 383 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[103]))(5,*((C_word*)lf[103]+1),t2,lf[259],lf[261],C_retrieve(lf[71]));}
+
+/* k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2340(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_2340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2343,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 384 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[103]))(5,*((C_word*)lf[103]+1),t2,lf[259],lf[260],C_retrieve(lf[75]));}
+
+/* k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2343(C_word c,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_2343,2,t0,t1);}
+t2=(C_word)C_fudge(C_fix(6));
+t3=C_mutate(((C_word *)((C_word*)t0)[22])+1,t2);
+t4=(*a=C_CLOSURE_TYPE|22,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)[9],a[10]=((C_word*)t0)[10],a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[22],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);
+C_trace("batch-driver.scm: 388 make-vector");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[257]+1)))(4,*((C_word*)lf[257]+1),t4,C_retrieve(lf[258]),C_SCHEME_END_OF_LIST);}
+
+/* k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[23],*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[46]+1 /* (set! line-number-database ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_2354,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 389 collect-options");
+t4=((C_word*)((C_word*)t0)[10])[1];
+f_1881(t4,t3,lf[256]);}
+
+/* k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2354(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_2354,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_2357,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);
+C_trace("batch-driver.scm: 390 collect-options");
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_1881(t3,t2,lf[255]);}
+
+/* k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2357(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[30],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2357,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_2360,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);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3671,a[2]=((C_word*)t0)[11],a[3]=t2,a[4]=((C_word*)t0)[17],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 392 collect-options");
+t4=((C_word*)((C_word*)t0)[11])[1];
+f_1881(t4,t3,lf[254]);}
+
+/* k3669 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3671,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_3679,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 394 collect-options");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_1881(t4,t3,lf[253]);}
+
+/* k3677 in k3669 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3679(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 391 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[225]+1)))(5,*((C_word*)lf[225]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[26],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2360,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|25,a[1]=(C_word)f_2363,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],tmp=(C_word)a,a+=26,tmp);
+C_trace("batch-driver.scm: 396 user-read-pass");
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
+
+/* k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2363(C_word c,C_word t0,C_word 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*)tr2,(void*)f_2363,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_2366,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],tmp=(C_word)a,a+=22,tmp);
+if(C_truep(t1)){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3507,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);
+C_trace("batch-driver.scm: 398 dribble");
+t4=((C_word*)((C_word*)t0)[21])[1];
+f_1632(t4,t3,lf[246],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_3516,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_3516(t6,t2,((C_word*)t0)[4]);}}
+
+/* doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3516(C_word t0,C_word 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_3516,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_3527,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_3531,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_3576,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t12=((C_word*)t10)[1];
+f_3576(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_3615,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);
+C_trace("batch-driver.scm: 408 check-and-open-input-file");
+((C_proc3)C_retrieve_symbol_proc(lf[252]))(3,*((C_word*)lf[252]+1),t4,t3);}}
+
+/* k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3615(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3615,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_3618,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_3627,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3632,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_3664,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("##sys#dynamic-wind");
+t10=*((C_word*)lf[251]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t6,t7,t8,t9);}
+
+/* a3663 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3664(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_3664,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[249]));
+t3=C_mutate((C_word*)lf[249]+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);}
+
+/* a3631 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3632(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_3632,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3636,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("batch-driver.scm: 410 read-form");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1955(t3,t2,((C_word*)t0)[5]);}
+
+/* k3634 in a3631 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3636(C_word c,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_3636,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_3641,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_3641(t5,((C_word*)t0)[2],t1);}
+
+/* doloop916 in k3634 in a3631 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3641(C_word 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_3641,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_eofp(t2))){
+C_trace("batch-driver.scm: 413 close-checked-input-file");
+((C_proc4)C_retrieve_symbol_proc(lf[250]))(4,*((C_word*)lf[250]+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_3662,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 411 read-form");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1955(t6,t5,((C_word*)t0)[6]);}}
+
+/* k3660 in doloop916 in k3634 in a3631 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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*)((C_word*)t0)[3])[1];
+f_3641(t2,((C_word*)t0)[2],t1);}
+
+/* a3626 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3627(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_3627,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[249]));
+t3=C_mutate((C_word*)lf[249]+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);}
+
+/* k3616 in k3613 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3618(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_3516(t3,((C_word*)t0)[2],t2);}
+
+/* loop858 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3576(C_word t0,C_word 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_3576,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[247]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3605,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));
+C_trace("g874875");
+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);}}
+
+/* k3603 in loop858 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3605(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3605,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));
+C_trace("loop858871");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3576(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));
+C_trace("loop858871");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3576(t6,((C_word*)t0)[3],t5);}}
+
+/* k3529 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3531,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3535,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 405 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[248]+1)))(3,*((C_word*)lf[248]+1),t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k3533 in k3529 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_3535,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_3539,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_3541,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_3541(t10,t6,((C_word*)t0)[2]);}
+
+/* loop881 in k3533 in k3529 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3541(C_word t0,C_word 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_3541,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[247]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3570,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));
+C_trace("g897898");
+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);}}
+
+/* k3568 in loop881 in k3533 in k3529 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3570,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));
+C_trace("loop881894");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3541(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));
+C_trace("loop881894");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3541(t6,((C_word*)t0)[3],t5);}}
+
+/* k3537 in k3533 in k3529 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3539(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 404 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[225]+1)))(5,*((C_word*)lf[225]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k3525 in doloop851 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3527(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);}
+
+/* k3505 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3507,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3511,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 399 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]);}
+
+/* k3509 in k3505 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3511(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_2366(2,t3,t2);}
+
+/* k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2366(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_2366,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_2369,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],tmp=(C_word)a,a+=22,tmp);
+C_trace("batch-driver.scm: 417 user-preprocessor-pass");
+((C_proc2)C_retrieve_symbol_proc(lf[4]))(2,*((C_word*)lf[4]+1),t2);}
+
+/* k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2369(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_2369,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,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)[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],tmp=(C_word)a,a+=22,tmp);
+if(C_truep(t1)){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3465,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 419 dribble");
+t4=((C_word*)((C_word*)t0)[17])[1];
+f_1632(t4,t3,lf[245],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2372(t3,C_SCHEME_UNDEFINED);}}
+
+/* k3463 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3465(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3465,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_3469,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_3471,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_3471(t10,t6,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* loop932 in k3463 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_3471,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_3500,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));
+C_trace("g948949");
+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);}}
+
+/* k3498 in loop932 in k3463 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3500(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3500,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));
+C_trace("loop932945");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3471(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));
+C_trace("loop932945");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3471(t6,((C_word*)t0)[3],t5);}}
+
+/* k3467 in k3463 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3469(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_2372(t3,t2);}
+
+/* k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2372(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*)trf_2372,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,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],tmp=(C_word)a,a+=22,tmp);
+C_trace("batch-driver.scm: 422 print-expr");
+t3=((C_word*)((C_word*)t0)[7])[1];
+f_1717(t3,t2,lf[243],lf[244],((C_word*)((C_word*)t0)[3])[1]);}
+
+/* k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word t5;
+C_word ab[26],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2375,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[21])[1]);
+t3=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_2381,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],tmp=(C_word)a,a+=21,tmp);
+if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[2])[1]))){
+t4=t3;
+f_2381(t4,C_SCHEME_UNDEFINED);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3442,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 425 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),t4,C_retrieve(lf[70]),((C_word*)((C_word*)t0)[2])[1]);}}
+
+/* k3440 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3442(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_3442,2,t0,t1);}
+t2=C_mutate((C_word*)lf[70]+1 /* (set! explicit-library-modules ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3462,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("##sys#append");
+t4=*((C_word*)lf[242]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_END_OF_LIST);}
+
+/* k3460 in k3440 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3462(C_word c,C_word t0,C_word 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_3462,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[240],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[241],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_2381(t7,t6);}
+
+/* k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2381(C_word t0,C_word t1){
+C_word 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*)trf_2381,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|18,a[1]=(C_word)f_2384,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],tmp=(C_word)a,a+=19,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3400,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 427 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[225]+1)))(4,*((C_word*)lf[225]+1),t7,((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k3398 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3400(C_word c,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_3400,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_3402,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_3402(t5,((C_word*)t0)[2],t1);}
+
+/* loop965 in k3398 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3402(C_word t0,C_word 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_3402,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[239]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3431,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));
+C_trace("g981982");
+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);}}
+
+/* k3429 in loop965 in k3398 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3431(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3431,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));
+C_trace("loop965978");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3402(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));
+C_trace("loop965978");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3402(t6,((C_word*)t0)[3],t5);}}
+
+/* k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[20],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2384,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_2387,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],tmp=(C_word)a,a+=20,tmp);
+C_trace("batch-driver.scm: 428 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[238]))(2,*((C_word*)lf[238]+1),t2);}
+
+/* k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word 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[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2387,2,t0,t1);}
+t2=(C_word)C_i_length(C_retrieve(lf[88]));
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2393,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],tmp=(C_word)a,a+=17,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_3140,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[12],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_3334,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t12=((C_word*)t10)[1];
+f_3334(t12,t8,C_retrieve(lf[237]));}
+
+/* loop991 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3334(C_word t0,C_word 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_3334,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[229],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[234],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));
+C_trace("loop9911004");
+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));
+C_trace("loop9911004");
+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);}}
+
+/* k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3140(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3140,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_3144,a[2]=((C_word*)t0)[2],a[3]=((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_3290,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_3290(t10,t6,C_retrieve(lf[236]));}
+
+/* loop1019 in k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3290(C_word t0,C_word 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_3290,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[235],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));
+C_trace("loop10191032");
+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));
+C_trace("loop10191032");
+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);}}
+
+/* k3142 in k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3144(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_3144,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3148,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[232]))){
+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[229],t3);
+t5=(C_truep(C_retrieve(lf[211]))?(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[229],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[233],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[230]),t10);
+t12=(C_word)C_a_i_cons(&a,2,lf[234],t11);
+t13=t2;
+f_3148(t13,(C_word)C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST));}
+else{
+t3=t2;
+f_3148(t3,C_SCHEME_END_OF_LIST);}}
+
+/* k3146 in k3142 in k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3148(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3148,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_3152,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_3167,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_3167(t10,t6,C_retrieve(lf[88]));}
+
+/* loop1051 in k3146 in k3142 in k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3167(C_word t0,C_word 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_3167,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[229],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[229],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[230]),t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[231],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));
+C_trace("loop10511064");
+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));
+C_trace("loop10511064");
+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);}}
+
+/* k3150 in k3146 in k3142 in k3138 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3152(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[211]);
+if(C_truep(t2)){
+C_trace("batch-driver.scm: 430 append");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[225]+1)))(9,*((C_word*)lf[225]+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[226]);}
+else{
+if(C_truep(((C_word*)t0)[3])){
+C_trace("batch-driver.scm: 430 append");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[225]+1)))(9,*((C_word*)lf[225]+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[227]);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+C_trace("batch-driver.scm: 430 append");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[225]+1)))(9,*((C_word*)lf[225]+1),((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1,((C_word*)t0)[4],t3,lf[228]);}}}
+
+/* k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[23],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2393,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|17,a[1]=(C_word)f_2396,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],tmp=(C_word)a,a+=18,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3079,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(C_retrieve(lf[222])))){
+C_trace("batch-driver.scm: 452 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t5,lf[223],lf[224]);}
+else{
+t6=t5;
+f_3079(2,t6,C_SCHEME_FALSE);}}
+
+/* k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3079,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_3084,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_3084(t5,((C_word*)t0)[2],C_retrieve(lf[222]));}
+else{
+t2=((C_word*)t0)[2];
+f_2396(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3084(C_word t0,C_word 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_3084,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_3119,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[31]+1);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3096,a[2]=t4,a[3]=t5,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t6,lf[221],t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k3094 in loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3096(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_3096,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3099,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]);
+C_trace("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t2,t3,((C_word*)t0)[3]);}
+
+/* k3097 in k3094 in loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3099(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_3099,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3102,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[36]+1)))(4,*((C_word*)lf[36]+1),t2,lf[220],((C_word*)t0)[3]);}
+
+/* k3100 in k3097 in k3094 in loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3102(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_3102,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3105,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]);
+C_trace("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t2,t3,((C_word*)t0)[3]);}
+
+/* k3103 in k3100 in k3097 in k3094 in loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3105(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("write-char/port");
+t2=C_retrieve(lf[33]);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
+
+/* k3117 in loop1085 in k3077 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_3084(t3,((C_word*)t0)[2],t2);}
+
+/* k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[21],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2396,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2399,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3073,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 456 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t3,lf[218],lf[219]);}
+
+/* k3071 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3073(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("batch-driver.scm: 457 display-real-name-table");
+((C_proc2)C_retrieve_symbol_proc(lf[217]))(2,*((C_word*)lf[217]+1),((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[2];
+f_2399(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2399(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_2399,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2402,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3067,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 458 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t3,lf[215],lf[216]);}
+
+/* k3065 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3067(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("batch-driver.scm: 459 display-line-number-database");
+((C_proc2)C_retrieve_symbol_proc(lf[214]))(2,*((C_word*)lf[214]+1),((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[2];
+f_2402(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2402(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_2402,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2405,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_retrieve(lf[211]))){
+if(C_truep(((C_word*)t0)[10])){
+C_trace("batch-driver.scm: 462 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[206]))(5,*((C_word*)lf[206]+1),t2,lf[212],lf[213],C_retrieve(lf[211]));}
+else{
+t3=t2;
+f_2405(2,t3,C_SCHEME_UNDEFINED);}}
+else{
+t3=t2;
+f_2405(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+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|17,a[1]=(C_word)f_2408,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[153]))){
+C_trace("batch-driver.scm: 464 feature?");
+((C_proc3)C_retrieve_symbol_proc(lf[209]))(3,*((C_word*)lf[209]+1),t3,lf[210]);}
+else{
+t4=t2;
+f_2408(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k3050 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3052(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("batch-driver.scm: 465 compiler-warning");
+((C_proc4)C_retrieve_symbol_proc(lf[206]))(4,*((C_word*)lf[206]+1),((C_word*)t0)[2],lf[207],lf[208]);}
+else{
+t2=((C_word*)t0)[2];
+f_2408(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[18],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2408,2,t0,t1);}
+t2=C_mutate((C_word*)lf[46]+1 /* (set! line-number-database ...) */,C_retrieve(lf[89]));
+t3=C_set_block_item(lf[89] /* line-number-database-2 */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2413,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 472 end-time");
+t5=((C_word*)((C_word*)t0)[16])[1];
+f_1926(t5,t4,lf[205]);}
+
+/* k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2413,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2416,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);
+C_trace("batch-driver.scm: 473 print-expr");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1717(t3,t2,lf[203],lf[204],((C_word*)((C_word*)t0)[3])[1]);}
+
+/* k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2416,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2419,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_i_memq(lf[202],((C_word*)t0)[3]))){
+C_trace("batch-driver.scm: 475 exit");
+((C_proc2)C_retrieve_symbol_proc(lf[125]))(2,*((C_word*)lf[125]+1),t2);}
+else{
+t3=t2;
+f_2419(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2419,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2422,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 477 user-pass");
+((C_proc2)C_retrieve_symbol_proc(lf[5]))(2,*((C_word*)lf[5]+1),t2);}
+
+/* k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[24],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2422,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2425,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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(t1)){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2998,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[2],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
+C_trace("batch-driver.scm: 479 dribble");
+t4=((C_word*)((C_word*)t0)[12])[1];
+f_1632(t4,t3,lf[201],C_SCHEME_END_OF_LIST);}
+else{
+t3=t2;
+f_2425(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2996 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2998,2,t0,t1);}
+t2=f_1916(((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_3005,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_3010,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_3010(t11,t7,((C_word*)((C_word*)t0)[5])[1]);}
+
+/* loop1123 in k2996 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_3010(C_word 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_3010,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_3039,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));
+C_trace("g11391140");
+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);}}
+
+/* k3037 in loop1123 in k2996 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3039(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3039,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));
+C_trace("loop11231136");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3010(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));
+C_trace("loop11231136");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_3010(t6,((C_word*)t0)[3],t5);}}
+
+/* k3003 in k2996 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_3005(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("batch-driver.scm: 482 end-time");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1926(t3,((C_word*)t0)[2],lf[200]);}
+
+/* k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2425,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2991,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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2995,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 487 canonicalize-begin-body");
+((C_proc3)C_retrieve_symbol_proc(lf[199]))(3,*((C_word*)lf[199]+1),t3,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k2993 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2995(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 486 build-node-graph");
+((C_proc3)C_retrieve_symbol_proc(lf[198]))(3,*((C_word*)lf[198]+1),((C_word*)t0)[2],t1);}
+
+/* k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2991,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[90],lf[91],lf[92],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|17,a[1]=(C_word)f_2436,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],tmp=(C_word)a,a+=18,tmp);
+C_trace("batch-driver.scm: 490 print-node");
+t7=((C_word*)((C_word*)t0)[12])[1];
+f_1671(t7,t6,lf[196],lf[197],t3);}
+
+/* k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[18],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2439,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 491 initialize-analysis-database");
+((C_proc2)C_retrieve_symbol_proc(lf[195]))(2,*((C_word*)lf[195]+1),t2);}
+
+/* k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[27],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2442,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[179]))){
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2937,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[16],a[7]=t2,a[8]=((C_word*)t0)[3],a[9]=((C_word*)t0)[17],tmp=(C_word)a,a+=10,tmp);
+if(C_truep((C_word)C_i_memq(lf[193],((C_word*)t0)[2]))){
+t4=t3;
+f_2937(2,t4,C_SCHEME_UNDEFINED);}
+else{
+C_trace("batch-driver.scm: 496 load-type-database");
+((C_proc3)C_retrieve_symbol_proc(lf[190]))(3,*((C_word*)lf[190]+1),t3,lf[194]);}}
+else{
+t3=t2;
+f_2442(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2937(C_word c,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_2937,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2940,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_2969,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2977,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 497 collect-options");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_1881(t5,t4,lf[192]);}
+
+/* k2975 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2977(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[191]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a2968 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2969(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_2969,3,t0,t1,t2);}
+t3=C_retrieve(lf[190]);
+C_trace("g11711172");
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,C_SCHEME_FALSE);}
+
+/* k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2940(C_word c,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_2940,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[8])[1]);
+t3=C_set_block_item(lf[95] /* first-analysis */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2948,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);
+C_trace("batch-driver.scm: 500 analyze");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_1961(t5,t4,lf[189],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
+
+/* k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2948(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_2948,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_2951,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);
+C_trace("batch-driver.scm: 501 print-db");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_1693(t4,t3,lf[188],lf[182],((C_word*)((C_word*)t0)[7])[1],C_fix(0));}
+
+/* k2949 in k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2951,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2954,a[2]=((C_word*)t0)[2],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("batch-driver.scm: 502 end-time");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_1926(t3,t2,lf[187]);}
+
+/* k2952 in k2949 in k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2954,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[6])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2960,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("batch-driver.scm: 504 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t3,lf[104],lf[186]);}
+
+/* k2958 in k2952 in k2949 in k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2960(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_2960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2963,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 505 scrutinize");
+((C_proc4)C_retrieve_symbol_proc(lf[185]))(4,*((C_word*)lf[185]+1),t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k2961 in k2958 in k2952 in k2949 in k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2963(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2963,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2966,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 506 end-time");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1926(t3,t2,lf[184]);}
+
+/* k2964 in k2961 in k2958 in k2952 in k2949 in k2946 in k2938 in k2935 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2966(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[95] /* first-analysis */,0,C_SCHEME_TRUE);
+t3=((C_word*)t0)[2];
+f_2442(t3,t2);}
+
+/* k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2442(C_word t0,C_word 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_2442,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2445,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_retrieve(lf[174]))){
+t3=f_1916(((C_word*)((C_word*)t0)[16])[1]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2910,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[13],a[6]=t2,a[7]=((C_word*)t0)[16],tmp=(C_word)a,a+=8,tmp);
+if(C_truep(C_retrieve(lf[179]))){
+t5=t4;
+f_2910(2,t5,C_SCHEME_UNDEFINED);}
+else{
+t5=C_set_block_item(lf[95] /* first-analysis */,0,C_SCHEME_FALSE);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2928,a[2]=((C_word*)t0)[6],a[3]=t4,a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("batch-driver.scm: 513 analyze");
+t7=((C_word*)((C_word*)t0)[14])[1];
+f_1961(t7,t6,lf[183],((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}}
+else{
+t3=t2;
+f_2445(t3,C_SCHEME_UNDEFINED);}}
+
+/* k2926 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2928(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_2928,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_2931,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 514 print-db");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_1693(t4,t3,lf[181],lf[182],((C_word*)((C_word*)t0)[5])[1],C_fix(0));}
+
+/* k2929 in k2926 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2931(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 515 end-time");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_1926(t2,((C_word*)t0)[2],lf[180]);}
+
+/* k2908 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2910(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_2910,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[7])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2916,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("batch-driver.scm: 517 perform-lambda-lifting!");
+((C_proc4)C_retrieve_symbol_proc(lf[178]))(4,*((C_word*)lf[178]+1),t3,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k2914 in k2908 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2916(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_2916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2919,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("batch-driver.scm: 518 end-time");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1926(t3,t2,lf[177]);}
+
+/* k2917 in k2914 in k2908 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2922,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 519 print-node");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1671(t3,t2,lf[175],lf[176],((C_word*)t0)[2]);}
+
+/* k2920 in k2917 in k2914 in k2908 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2922(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[95] /* first-analysis */,0,C_SCHEME_TRUE);
+t3=((C_word*)t0)[2];
+f_2445(t3,t2);}
+
+/* k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2445(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*)trf_2445,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,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]=((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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2904,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 522 vector->list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[172]+1)))(3,*((C_word*)lf[172]+1),t3,C_retrieve(lf[173]));}
+
+/* k2902 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2904(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 522 concatenate");
+((C_proc3)C_retrieve_symbol_proc(lf[167]))(3,*((C_word*)lf[167]+1),((C_word*)t0)[2],t1);}
+
+/* k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[21],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_2451,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);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2897,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 523 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t3,lf[170],lf[171]);}
+
+/* k2895 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2897(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("batch-driver.scm: 524 pp");
+((C_proc3)C_retrieve_symbol_proc(lf[169]))(3,*((C_word*)lf[169]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_2451(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word 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[34],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2454,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_retrieve(lf[160]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2804,a[2]=t2,a[3]=((C_word*)t0)[12],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_2859,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_2861,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t12=((C_word*)t10)[1];
+f_2861(t12,t8,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_2454(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* loop1223 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2861(C_word t0,C_word 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_2861,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[168]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2890,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));
+C_trace("g12391240");
+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);}}
+
+/* k2888 in loop1223 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2890,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));
+C_trace("loop12231236");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_2861(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));
+C_trace("loop12231236");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_2861(t6,((C_word*)t0)[3],t5);}}
+
+/* k2857 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2859(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 534 concatenate");
+((C_proc3)C_retrieve_symbol_proc(lf[167]))(3,*((C_word*)lf[167]+1),((C_word*)t0)[2],t1);}
+
+/* k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2804(C_word c,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_2804,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_2806,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_2806(t5,((C_word*)t0)[2],t1);}
+
+/* loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2806(C_word t0,C_word 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_2806,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_2814,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2844,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));
+C_trace("g12111212");
+t6=t3;
+f_2814(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k2842 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2806(t3,((C_word*)t0)[2],t2);}
+
+/* g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2814(C_word 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_2814,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2818,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_2837,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2841,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 529 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[166]+1)))(3,*((C_word*)lf[166]+1),t5,t2);}
+
+/* k2839 in g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2841(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 529 make-pathname");
+((C_proc5)C_retrieve_symbol_proc(lf[164]))(5,*((C_word*)lf[164]+1),((C_word*)t0)[2],C_SCHEME_FALSE,t1,lf[165]);}
+
+/* k2835 in g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2837(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 528 ##sys#resolve-include-filename");
+((C_proc5)C_retrieve_symbol_proc(lf[163]))(5,*((C_word*)lf[163]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_TRUE);}
+
+/* k2816 in g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2818,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2827,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 531 file-exists?");
+((C_proc3)C_retrieve_symbol_proc(lf[162]))(3,*((C_word*)lf[162]+1),t2,t1);}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k2825 in k2816 in g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2827,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2830,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 532 dribble");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1632(t3,t2,lf[161],(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);}}
+
+/* k2828 in k2825 in k2816 in g1211 in loop1204 in k2802 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2830(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 533 load-inline-file");
+((C_proc3)C_retrieve_symbol_proc(lf[157]))(3,*((C_word*)lf[157]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2454,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2457,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);
+C_trace("batch-driver.scm: 535 collect-options");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1881(t3,t2,lf[159]);}
+
+/* k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2457,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,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],tmp=(C_word)a,a+=15,tmp);
+if(C_truep((C_word)C_i_nullp(t1))){
+t3=t2;
+f_2460(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=C_set_block_item(lf[155] /* inline-globally */,0,C_SCHEME_TRUE);
+t4=C_set_block_item(lf[156] /* 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_2768,a[2]=t6,a[3]=((C_word*)t0)[10],tmp=(C_word)a,a+=4,tmp));
+t8=((C_word*)t6)[1];
+f_2768(t8,t2,t1);}}
+
+/* loop1249 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2768(C_word t0,C_word 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_2768,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_2776,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2786,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));
+C_trace("g12561257");
+t6=t3;
+f_2776(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k2784 in loop1249 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2768(t3,((C_word*)t0)[2],t2);}
+
+/* g1256 in loop1249 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2776(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_2776,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2780,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 541 dribble");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_1632(t4,t3,lf[158],(C_word)C_a_i_list(&a,1,t2));}
+
+/* k2778 in g1256 in loop1249 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2780(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 542 load-inline-file");
+((C_proc3)C_retrieve_symbol_proc(lf[157]))(3,*((C_word*)lf[157]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 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_2460,2,t0,t1);}
+t2=C_set_block_item(lf[46] /* line-number-database */,0,C_SCHEME_FALSE);
+t3=C_set_block_item(lf[93] /* constant-table */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[94] /* inline-table */,0,C_SCHEME_FALSE);
+t5=(*a=C_CLOSURE_TYPE|14,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],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(C_retrieve(lf[153]))){
+t6=t5;
+f_2466(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);
+C_trace("batch-driver.scm: 549 scan-toplevel-assignments");
+((C_proc3)C_retrieve_symbol_proc(lf[154]))(3,*((C_word*)lf[154]+1),t5,t7);}}
+
+/* k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2466,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[14])[1]);
+t3=(*a=C_CLOSURE_TYPE|13,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*)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);
+C_trace("batch-driver.scm: 552 perform-cps-conversion");
+((C_proc3)C_retrieve_symbol_proc(lf[152]))(3,*((C_word*)lf[152]+1),t3,((C_word*)t0)[2]);}
+
+/* k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2472,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2475,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);
+C_trace("batch-driver.scm: 553 end-time");
+t3=((C_word*)((C_word*)t0)[12])[1];
+f_1926(t3,t2,lf[151]);}
+
+/* k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2475,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2478,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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("batch-driver.scm: 554 print-node");
+t3=((C_word*)((C_word*)t0)[11])[1];
+f_1671(t3,t2,lf[149],lf[150],((C_word*)t0)[2]);}
+
+/* k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2478,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|13,a[1]=(C_word)f_2483,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]=t3,a[13]=((C_word*)t0)[14],tmp=(C_word)a,a+=14,tmp));
+t5=((C_word*)t3)[1];
+f_2483(t5,((C_word*)t0)[3],C_fix(1),((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_2483(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[24],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2483,NULL,5,t0,t1,t2,t3,t4);}
+t5=f_1916(((C_word*)((C_word*)t0)[13])[1]);
+t6=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_2490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]=t2,a[15]=t3,a[16]=((C_word*)t0)[13],a[17]=t4,tmp=(C_word)a,a+=18,tmp);
+C_trace("batch-driver.scm: 560 analyze");
+t7=((C_word*)((C_word*)t0)[10])[1];
+f_1961(t7,t6,lf[148],t3,(C_word)C_a_i_list(&a,2,t2,t4));}
+
+/* k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2490(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_2490,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2493,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]=t1,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);
+if(C_truep(C_retrieve(lf[95]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2718,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_memq(lf[146],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 563 dump-undefined-globals");
+((C_proc3)C_retrieve_symbol_proc(lf[147]))(3,*((C_word*)lf[147]+1),t3,t1);}
+else{
+t4=t3;
+f_2718(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+t3=t2;
+f_2493(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2716 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2718,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2721,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[144],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 565 dump-defined-globals");
+((C_proc3)C_retrieve_symbol_proc(lf[145]))(3,*((C_word*)lf[145]+1),t2,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_2721(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2719 in k2716 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2721(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[142],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 567 dump-global-refs");
+((C_proc3)C_retrieve_symbol_proc(lf[143]))(3,*((C_word*)lf[143]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[3];
+f_2493(2,t3,t2);}}
+
+/* k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2493,2,t0,t1);}
+t2=C_set_block_item(lf[95] /* first-analysis */,0,C_SCHEME_FALSE);
+t3=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2497,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 569 end-time");
+t4=((C_word*)((C_word*)t0)[12])[1];
+f_1926(t4,t3,lf[141]);}
+
+/* k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2497,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2500,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("batch-driver.scm: 570 print-db");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1693(t3,t2,lf[139],lf[140],((C_word*)t0)[15],((C_word*)t0)[14]);}
+
+/* k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2500,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_2503,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_memq(lf[137],C_retrieve(lf[35])))){
+C_trace("batch-driver.scm: 572 print-program-statistics");
+((C_proc3)C_retrieve_symbol_proc(lf[138]))(3,*((C_word*)lf[138]+1),t2,((C_word*)t0)[15]);}
+else{
+t3=t2;
+f_2503(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2503,2,t0,t1);}
+if(C_truep(((C_word*)t0)[18])){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2509,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],tmp=(C_word)a,a+=11,tmp);
+C_trace("batch-driver.scm: 575 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[103]))(5,*((C_word*)lf[103]+1),t2,lf[104],lf[109],((C_word*)t0)[14]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2595,a[2]=((C_word*)t0)[16],a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[10],a[8]=((C_word*)t0)[9],a[9]=((C_word*)t0)[5],a[10]=((C_word*)t0)[6],a[11]=((C_word*)t0)[7],a[12]=((C_word*)t0)[12],a[13]=((C_word*)t0)[8],a[14]=((C_word*)t0)[15],a[15]=((C_word*)t0)[17],tmp=(C_word)a,a+=16,tmp);
+C_trace("batch-driver.scm: 599 print-node");
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_1671(t3,t2,lf[135],lf[136],((C_word*)t0)[16]);}}
+
+/* k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2595(C_word c,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_2595,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2598,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[132]))){
+t3=C_retrieve(lf[132]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2706,a[2]=((C_word*)t0)[14],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 603 dribble");
+t5=((C_word*)((C_word*)t0)[13])[1];
+f_1632(t5,t4,lf[134],(C_word)C_a_i_list(&a,1,t3));}
+else{
+t3=t2;
+f_2598(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2704 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2706(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 604 emit-global-inline-file");
+((C_proc4)C_retrieve_symbol_proc(lf[133]))(4,*((C_word*)lf[133]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2598(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_2598,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[15])[1]);
+t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_2604,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);
+C_trace("batch-driver.scm: 607 perform-closure-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),t3,((C_word*)t0)[2],((C_word*)t0)[14]);}
+
+/* k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2604(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_2604,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_2607,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]=t1,a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
+C_trace("batch-driver.scm: 608 end-time");
+t3=((C_word*)((C_word*)t0)[11])[1];
+f_1926(t3,t2,lf[130]);}
+
+/* k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2607(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_2607,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_2610,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],tmp=(C_word)a,a+=14,tmp);
+C_trace("batch-driver.scm: 609 print-db");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1693(t3,t2,lf[128],lf[129],((C_word*)t0)[13],((C_word*)t0)[2]);}
+
+/* k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2610(C_word c,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_2610,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,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],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_retrieve(lf[126]))){
+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)))){
+C_trace("batch-driver.scm: 611 display");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[36]+1)))(3,*((C_word*)lf[36]+1),t2,lf[127]);}
+else{
+t5=t2;
+f_2613(2,t5,C_SCHEME_UNDEFINED);}}
+else{
+t3=t2;
+f_2613(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2613,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2616,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])){
+C_trace("batch-driver.scm: 612 exit");
+((C_proc3)C_retrieve_symbol_proc(lf[125]))(3,*((C_word*)lf[125]+1),t2,C_fix(0));}
+else{
+t3=t2;
+f_2616(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2616,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,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],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);
+C_trace("batch-driver.scm: 613 print-node");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1671(t3,t2,lf[123],lf[124],((C_word*)t0)[10]);}
+
+/* k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2619,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[10])[1]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2627,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_2633,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);
+C_trace("##sys#call-with-values");
+C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
+
+/* a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2633(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_2633,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2637,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);
+C_trace("batch-driver.scm: 618 end-time");
+t7=((C_word*)((C_word*)t0)[6])[1];
+f_1926(t7,t6,lf[122]);}
+
+/* k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2637(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_2637,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[12])[1]);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2643,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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])){
+C_trace("batch-driver.scm: 621 open-output-file");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[120]+1)))(3,*((C_word*)lf[120]+1),t3,((C_word*)t0)[8]);}
+else{
+C_trace("batch-driver.scm: 621 current-output-port");
+((C_proc2)C_retrieve_proc(*((C_word*)lf[121]+1)))(2,*((C_word*)lf[121]+1),t3);}}
+
+/* k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2643(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_2643,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2646,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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);
+C_trace("batch-driver.scm: 622 dribble");
+t3=((C_word*)((C_word*)t0)[11])[1];
+f_1632(t3,t2,lf[119],(C_word)C_a_i_list(&a,1,((C_word*)t0)[8]));}
+
+/* k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2646(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_2646,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2649,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("batch-driver.scm: 623 generate-code");
+((C_proc9)C_retrieve_symbol_proc(lf[118]))(9,*((C_word*)lf[118]+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]);}
+
+/* k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2649(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_2649,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2652,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])){
+C_trace("batch-driver.scm: 624 close-output-port");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[117]+1)))(3,*((C_word*)lf[117]+1),t2,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_2652(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2652,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2655,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 625 end-time");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1926(t3,t2,lf[116]);}
+
+/* k2653 in k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2655(C_word c,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_2655,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2658,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[113],C_retrieve(lf[35])))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2674,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 626 ##sys#stop-timer");
+t4=*((C_word*)lf[115]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f5114,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 627 compiler-cleanup-hook");
+((C_proc2)C_retrieve_symbol_proc(lf[112]))(2,*((C_word*)lf[112]+1),t3);}}
+
+/* f5114 in k2653 in k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f5114(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 628 dribble");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_1632(t2,((C_word*)t0)[2],lf[111],C_SCHEME_END_OF_LIST);}
+
+/* k2672 in k2653 in k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2674(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 626 ##sys#display-times");
+((C_proc3)C_retrieve_symbol_proc(lf[114]))(3,*((C_word*)lf[114]+1),((C_word*)t0)[2],t1);}
+
+/* k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2658(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_2658,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2661,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 627 compiler-cleanup-hook");
+((C_proc2)C_retrieve_symbol_proc(lf[112]))(2,*((C_word*)lf[112]+1),t2);}
+
+/* k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2635 in a2632 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2661(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 628 dribble");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_1632(t2,((C_word*)t0)[2],lf[111],C_SCHEME_END_OF_LIST);}
+
+/* a2626 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2596 in k2593 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2627(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_2627,2,t0,t1);}
+C_trace("batch-driver.scm: 617 prepare-for-code-generation");
+((C_proc4)C_retrieve_symbol_proc(lf[110]))(4,*((C_word*)lf[110]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2509,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[10])[1]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2517,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_2523,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);
+C_trace("##sys#call-with-values");
+C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
+
+/* a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2523(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_2523,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2527,a[2]=((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);
+C_trace("batch-driver.scm: 580 end-time");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_1926(t5,t4,lf[108]);}
+
+/* k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2527,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2530,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("batch-driver.scm: 581 print-node");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1671(t3,t2,lf[106],lf[107],((C_word*)t0)[6]);}
+
+/* k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t7;
+C_word t8;
+C_word ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2530,2,t0,t1);}
+if(C_truep(((C_word*)t0)[9])){
+t2=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
+C_trace("batch-driver.scm: 583 loop");
+t3=((C_word*)((C_word*)t0)[7])[1];
+f_2483(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],C_SCHEME_TRUE);}
+else{
+t2=C_retrieve(lf[97]);
+if(C_truep(t2)){
+if(C_truep(C_retrieve(lf[98]))){
+t3=f_1916(((C_word*)((C_word*)t0)[4])[1]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2566,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);
+C_trace("batch-driver.scm: 590 analyze");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_1961(t5,t4,lf[102],((C_word*)t0)[5],C_SCHEME_END_OF_LIST);}
+else{
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
+C_trace("batch-driver.scm: 596 loop");
+t4=((C_word*)((C_word*)t0)[7])[1];
+f_2483(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_2549,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("batch-driver.scm: 585 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t3,lf[104],lf[105]);}}}
+
+/* k2547 in k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2549(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[97] /* inline-substitutions-enabled */,0,C_SCHEME_TRUE);
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
+C_trace("batch-driver.scm: 587 loop");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2483(t4,((C_word*)t0)[3],t3,((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* k2564 in k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2566,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2569,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_trace("batch-driver.scm: 591 end-time");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1926(t3,t2,lf[101]);}
+
+/* k2567 in k2564 in k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2569,2,t0,t1);}
+t2=f_1916(((C_word*)((C_word*)t0)[8])[1]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2575,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("batch-driver.scm: 593 transform-direct-lambdas!");
+((C_proc4)C_retrieve_symbol_proc(lf[100]))(4,*((C_word*)lf[100]+1),t3,((C_word*)t0)[4],((C_word*)t0)[2]);}
+
+/* k2573 in k2567 in k2564 in k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2575,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2578,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("batch-driver.scm: 594 end-time");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_1926(t3,t2,lf[99]);}
+
+/* k2576 in k2573 in k2567 in k2564 in k2528 in k2525 in a2522 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+t2=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("batch-driver.scm: 595 loop");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_2483(t3,((C_word*)t0)[4],t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a2516 in k2507 in k2501 in k2498 in k2495 in k2491 in k2488 in loop in k2476 in k2473 in k2470 in k2464 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2989 in k2423 in k2420 in k2417 in k2414 in k2411 in k2406 in k2403 in k2400 in k2397 in k2394 in k2391 in k2385 in k2382 in k2379 in k2373 in k2370 in k2367 in k2364 in k2361 in k2358 in k2355 in k2352 in k2349 in k2341 in k2338 in k2335 in k2332 in k2328 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2517(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_2517,2,t0,t1);}
+C_trace("batch-driver.scm: 579 perform-high-level-optimizations");
+((C_proc4)C_retrieve_symbol_proc(lf[96]))(4,*((C_word*)lf[96]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2313 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2315(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 371 display");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[36]+1)))(3,*((C_word*)lf[36]+1),((C_word*)t0)[2],t1);}
+
+/* k2306 in k2294 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2308(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 372 newline");
+((C_proc2)C_retrieve_proc(*((C_word*)lf[81]+1)))(2,*((C_word*)lf[81]+1),((C_word*)t0)[2]);}
+
+/* k2282 in k2273 in k2270 in k2267 in k2264 in k2261 in k2250 in k2246 in k2242 in k2238 in k2234 in k2230 in k2227 in k2223 in k2219 in k2216 in k2212 in k2204 in k2200 in k2197 in k2194 in k2191 in k2184 in k2181 in k2178 in k2175 in k2172 in k2169 in k2166 in k2162 in k2159 in k2153 in k2150 in k2147 in k2144 in k2141 in k2138 in k2135 in k2129 in k2123 in k2120 in k2117 in k2114 in k2111 in k2108 in k2105 in k2102 in k2099 in k2096 in k2093 in k2089 in k2086 in k2083 in k2080 in k2077 in k2074 in k2071 in k2068 in k2065 in k2062 in k2059 in k2056 in k2048 in k2044 in k2041 in k2038 in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_2284(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 367 newline");
+((C_proc2)C_retrieve_proc(*((C_word*)lf[81]+1)))(2,*((C_word*)lf[81]+1),((C_word*)t0)[2]);}
+
+/* analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1961(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_1961,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1963,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_1986,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1991,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("def-no291333");
+t8=t7;
+f_1991(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))){
+C_trace("def-contf292331");
+t10=t6;
+f_1986(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))){
+C_trace("body289297");
+t12=t5;
+f_1963(t12,t1,t8,t10);}
+else{
+C_trace("##sys#error");
+t12=*((C_word*)lf[58]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
+
+/* def-no291 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1991(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_1991,NULL,2,t0,t1);}
+C_trace("def-contf292331");
+t2=((C_word*)t0)[2];
+f_1986(t2,t1,C_fix(0));}
+
+/* def-contf292 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1986(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_1986,NULL,3,t0,t1,t2);}
+C_trace("body289297");
+t3=((C_word*)t0)[2];
+f_1963(t3,t1,t2,C_SCHEME_TRUE);}
+
+/* body289 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1963(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_1963,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1967,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);
+C_trace("batch-driver.scm: 160 analyze-expression");
+((C_proc3)C_retrieve_symbol_proc(lf[57]))(3,*((C_word*)lf[57]+1),t4,((C_word*)t0)[2]);}
+
+/* k1965 in body289 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1967(C_word c,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_1967,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1970,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_1975,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1981,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 162 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);}}
+
+/* a1980 in k1965 in body289 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1981(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_1981,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[56]);
+C_trace("g328329");
+t6=t5;
+((C_proc6)C_retrieve_proc(t6))(6,t6,t1,((C_word*)t0)[2],t2,t3,t4);}
+
+/* a1974 in k1965 in body289 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1975(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_1975,4,t0,t1,t2,t3);}
+t4=C_retrieve(lf[55]);
+C_trace("g313314");
+t5=t4;
+((C_proc5)C_retrieve_proc(t5))(5,t5,t1,((C_word*)t0)[2],t2,t3);}
+
+/* k1968 in k1965 in body289 in analyze in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1970(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 k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1955(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_1955,NULL,3,t0,t1,t2);}
+C_trace("batch-driver.scm: 156 ##sys#read");
+((C_proc4)C_retrieve_symbol_proc(lf[54]))(4,*((C_word*)lf[54]+1),t1,t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* end-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1926(C_word 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_1926,NULL,3,t0,t1,t2);}
+if(C_truep(((C_word*)((C_word*)t0)[3])[1])){
+t3=*((C_word*)lf[31]+1);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1933,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t4,lf[53],t3);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k1931 in end-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1933(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_1933,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1936,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("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
+
+/* k1934 in k1931 in end-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1936(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_1936,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1939,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[36]+1)))(4,*((C_word*)lf[36]+1),t2,lf[52],((C_word*)t0)[3]);}
+
+/* k1937 in k1934 in k1931 in end-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1939(C_word c,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_1939,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1942,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]);
+C_trace("write");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[42]+1)))(4,*((C_word*)lf[42]+1),t2,t4,((C_word*)t0)[3]);}
+
+/* k1940 in k1937 in k1934 in k1931 in end-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1942(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("write-char/port");
+t2=C_retrieve(lf[33]);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],C_make_character(10),((C_word*)t0)[2]);}
+
+/* begin-time in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static C_word C_fcall f_1916(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 k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1881(C_word 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_1881,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_1887,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_1887(t6,t1,((C_word*)t0)[2]);}
+
+/* loop in collect-options in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1887(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_1887,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_1895,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("g264265");
+t5=t4;
+f_1895(t5,t1,t3);}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_END_OF_LIST);}}
+
+/* g264 in loop in collect-options in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1895(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_1895,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1903,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 145 option-arg");
+f_1527(t3,t2);}
+
+/* k1901 in g264 in loop in collect-options in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1903(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_1903,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1907,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]);
+C_trace("batch-driver.scm: 145 loop");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_1887(t4,t2,t3);}
+
+/* k1905 in k1901 in g264 in loop in collect-options in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1907(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_1907,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 k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1801(C_word 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_1801,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_1811,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)))){
+C_trace("batch-driver.scm: 136 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_1842,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1850,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 138 substring");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[51]+1)))(5,*((C_word*)lf[51]+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_1866,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1870,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 139 substring");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[51]+1)))(5,*((C_word*)lf[51]+1),t12,t2,C_fix(0),t4);}
+else{
+C_trace("batch-driver.scm: 140 string->number");
+C_string_to_number(3,0,t5,t2);}}}}
+
+/* k1868 in arg-val in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1870(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 139 string->number");
+C_string_to_number(3,0,((C_word*)t0)[2],t1);}
+
+/* k1864 in arg-val in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *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{
+C_trace("batch-driver.scm: 141 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[50],((C_word*)t0)[2]);}}
+
+/* k1848 in arg-val in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1850(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 138 string->number");
+C_string_to_number(3,0,((C_word*)t0)[2],t1);}
+
+/* k1840 in arg-val in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1842(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{
+C_trace("batch-driver.scm: 141 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[50],((C_word*)t0)[2]);}}
+
+/* k1809 in arg-val in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *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("batch-driver.scm: 141 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),((C_word*)t0)[3],lf[50],((C_word*)t0)[2]);}}
+
+/* infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1752(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_1752,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[44]);
+t6=(C_truep(t5)?t5:(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1798,tmp=(C_word)a,a+=2,tmp));
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1759,a[2]=t2,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("g209210");
+t8=t6;
+((C_proc5)C_retrieve_proc(t8))(5,t8,t7,t2,t3,t4);}
+
+/* k1757 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1759,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1762,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_1765,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[49],((C_word*)t0)[2]);
+if(C_truep(t4)){
+t5=(C_word)C_i_car(t1);
+t6=t3;
+f_1765(t6,(C_word)C_i_symbolp(t5));}
+else{
+t5=t3;
+f_1765(t5,C_SCHEME_FALSE);}}
+
+/* k1763 in k1757 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1765(C_word t0,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_1765,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_1776,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_1780,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]);
+C_trace("batch-driver.scm: 128 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[48]))(4,*((C_word*)lf[48]+1),t4,C_retrieve(lf[46]),t5);}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[5]);}}
+
+/* k1778 in k1763 in k1757 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 *a;
+if(C_truep(t1)){
+t2=t1;
+C_trace("batch-driver.scm: 127 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[47]))(5,*((C_word*)lf[47]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+else{
+C_trace("batch-driver.scm: 127 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[47]))(5,*((C_word*)lf[47]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
+
+/* k1774 in k1763 in k1757 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1776(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 124 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),((C_word*)t0)[3],C_retrieve(lf[46]),((C_word*)t0)[2],t1);}
+
+/* k1760 in k1757 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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]);}
+
+/* f_1798 in infohook in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1798(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_1798,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
+
+/* print-expr in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1717(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_1717,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1724,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("batch-driver.scm: 118 print-header");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1647(t6,t5,t2,t3);}
+
+/* k1722 in print-expr in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1724(C_word c,C_word t0,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_1724,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_1729,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_1729(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);}}
+
+/* loop194 in k1722 in print-expr in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_1729,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[39]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1739,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));
+C_trace("g201202");
+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);}}
+
+/* k1737 in loop194 in k1722 in print-expr in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1739(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_1729(t3,((C_word*)t0)[2],t2);}
+
+/* print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1693(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_1693,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1700,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 113 print-header");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_1647(t7,t6,t2,t3);}
+
+/* k1698 in print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1700(C_word c,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_1700,2,t0,t1);}
+if(C_truep(t1)){
+t2=*((C_word*)lf[31]+1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1703,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("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[36]+1)))(4,*((C_word*)lf[36]+1),t3,lf[43],t2);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k1701 in k1698 in print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1703(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_1703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1706,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[42]+1)))(4,*((C_word*)lf[42]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* k1704 in k1701 in k1698 in print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1706(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_1706,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1709,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("write-char/port");
+t3=C_retrieve(lf[33]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(41),((C_word*)t0)[2]);}
+
+/* k1707 in k1704 in k1701 in k1698 in print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1709(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_1709,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1712,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("write-char/port");
+t3=C_retrieve(lf[33]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
+
+/* k1710 in k1707 in k1704 in k1701 in k1698 in print-db in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1712(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 115 display-analysis-database");
+((C_proc3)C_retrieve_symbol_proc(lf[41]))(3,*((C_word*)lf[41]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* print-node in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1671(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_1671,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1678,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 107 print-header");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1647(t6,t5,t2,t3);}
+
+/* k1676 in print-node in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1678(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_1678,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
+C_trace("batch-driver.scm: 109 dump-nodes");
+((C_proc3)C_retrieve_symbol_proc(lf[38]))(3,*((C_word*)lf[38]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1691,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("batch-driver.scm: 110 build-expression-tree");
+((C_proc3)C_retrieve_symbol_proc(lf[40]))(3,*((C_word*)lf[40]+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);}}
+
+/* k1689 in k1676 in print-node in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1691(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("batch-driver.scm: 110 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[39]))(3,*((C_word*)lf[39]+1),((C_word*)t0)[2],t1);}
+
+/* print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1647(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_1647,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1651,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("batch-driver.scm: 100 dribble");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_1632(t5,t4,lf[37],(C_word)C_a_i_list(&a,1,t2));}
+
+/* k1649 in print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1651(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_1651,2,t0,t1);}
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],C_retrieve(lf[35])))){
+t2=*((C_word*)lf[31]+1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1660,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("write-char/port");
+t4=C_retrieve(lf[33]);
+((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);}}
+
+/* k1658 in k1649 in print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1660(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_1660,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1663,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[36]+1)))(4,*((C_word*)lf[36]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* k1661 in k1658 in k1649 in print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1663,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1666,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[33]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(93),((C_word*)t0)[2]);}
+
+/* k1664 in k1661 in k1658 in k1649 in print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1666(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1669,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("write-char/port");
+t3=C_retrieve(lf[33]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
+
+/* k1667 in k1664 in k1661 in k1658 in k1649 in print-header in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1669(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 k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1632(C_word t0,C_word 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_1632,NULL,4,t0,t1,t2,t3);}
+if(C_truep(((C_word*)t0)[2])){
+t4=*((C_word*)lf[31]+1);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1639,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_apply(6,0,t5,C_retrieve(lf[34]),t4,t2,t3);}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k1637 in dribble in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1639(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_1639,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1642,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[33]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),((C_word*)t0)[2]);}
+
+/* k1640 in k1637 in dribble in k1583 in k1577 in k1574 in k4787 in k1558 in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_ccall f_1642(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("##sys#flush-output");
+((C_proc3)C_retrieve_symbol_proc(lf[32]))(3,*((C_word*)lf[32]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* option-arg in compile-source-file in k1520 in k1516 in k1512 in k1508 in k1504 in k1499 in k1496 */
+static void C_fcall f_1527(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_1527,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);
+C_trace("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))){
+C_trace("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[388] = {
+{"toplevel:batch_driver_scm",(void*)C_driver_toplevel},
+{"f_1498:batch_driver_scm",(void*)f_1498},
+{"f_1501:batch_driver_scm",(void*)f_1501},
+{"f_1506:batch_driver_scm",(void*)f_1506},
+{"f_1510:batch_driver_scm",(void*)f_1510},
+{"f_1514:batch_driver_scm",(void*)f_1514},
+{"f_1518:batch_driver_scm",(void*)f_1518},
+{"f_1522:batch_driver_scm",(void*)f_1522},
+{"f_1524:batch_driver_scm",(void*)f_1524},
+{"f_1560:batch_driver_scm",(void*)f_1560},
+{"f_4808:batch_driver_scm",(void*)f_4808},
+{"f_4793:batch_driver_scm",(void*)f_4793},
+{"f_4789:batch_driver_scm",(void*)f_4789},
+{"f_4778:batch_driver_scm",(void*)f_4778},
+{"f_4749:batch_driver_scm",(void*)f_4749},
+{"f_4753:batch_driver_scm",(void*)f_4753},
+{"f_1576:batch_driver_scm",(void*)f_1576},
+{"f_4745:batch_driver_scm",(void*)f_4745},
+{"f_4706:batch_driver_scm",(void*)f_4706},
+{"f_4708:batch_driver_scm",(void*)f_4708},
+{"f_4737:batch_driver_scm",(void*)f_4737},
+{"f_1579:batch_driver_scm",(void*)f_1579},
+{"f_1585:batch_driver_scm",(void*)f_1585},
+{"f_4687:batch_driver_scm",(void*)f_4687},
+{"f_4683:batch_driver_scm",(void*)f_4683},
+{"f_4679:batch_driver_scm",(void*)f_4679},
+{"f_2040:batch_driver_scm",(void*)f_2040},
+{"f_2043:batch_driver_scm",(void*)f_2043},
+{"f_2046:batch_driver_scm",(void*)f_2046},
+{"f_4664:batch_driver_scm",(void*)f_4664},
+{"f_4608:batch_driver_scm",(void*)f_4608},
+{"f_4616:batch_driver_scm",(void*)f_4616},
+{"f_4618:batch_driver_scm",(void*)f_4618},
+{"f_4656:batch_driver_scm",(void*)f_4656},
+{"f_2050:batch_driver_scm",(void*)f_2050},
+{"f_4558:batch_driver_scm",(void*)f_4558},
+{"f_4560:batch_driver_scm",(void*)f_4560},
+{"f_4595:batch_driver_scm",(void*)f_4595},
+{"f_4599:batch_driver_scm",(void*)f_4599},
+{"f_2058:batch_driver_scm",(void*)f_2058},
+{"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_2070:batch_driver_scm",(void*)f_2070},
+{"f_2073:batch_driver_scm",(void*)f_2073},
+{"f_2076:batch_driver_scm",(void*)f_2076},
+{"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_4461:batch_driver_scm",(void*)f_4461},
+{"f_4463:batch_driver_scm",(void*)f_4463},
+{"f_4492:batch_driver_scm",(void*)f_4492},
+{"f_2095:batch_driver_scm",(void*)f_2095},
+{"f_4456:batch_driver_scm",(void*)f_4456},
+{"f_2098:batch_driver_scm",(void*)f_2098},
+{"f_2101:batch_driver_scm",(void*)f_2101},
+{"f_2104:batch_driver_scm",(void*)f_2104},
+{"f_2107:batch_driver_scm",(void*)f_2107},
+{"f_2110:batch_driver_scm",(void*)f_2110},
+{"f_2113:batch_driver_scm",(void*)f_2113},
+{"f_2116:batch_driver_scm",(void*)f_2116},
+{"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_4411:batch_driver_scm",(void*)f_4411},
+{"f_2131:batch_driver_scm",(void*)f_2131},
+{"f_4396:batch_driver_scm",(void*)f_4396},
+{"f_4399:batch_driver_scm",(void*)f_4399},
+{"f_4402:batch_driver_scm",(void*)f_4402},
+{"f_2137:batch_driver_scm",(void*)f_2137},
+{"f_4386:batch_driver_scm",(void*)f_4386},
+{"f_4389:batch_driver_scm",(void*)f_4389},
+{"f_2140:batch_driver_scm",(void*)f_2140},
+{"f_2143:batch_driver_scm",(void*)f_2143},
+{"f_4344:batch_driver_scm",(void*)f_4344},
+{"f_2146:batch_driver_scm",(void*)f_2146},
+{"f_4338:batch_driver_scm",(void*)f_4338},
+{"f_2149:batch_driver_scm",(void*)f_2149},
+{"f_4329:batch_driver_scm",(void*)f_4329},
+{"f_2152:batch_driver_scm",(void*)f_2152},
+{"f_4311:batch_driver_scm",(void*)f_4311},
+{"f_4314:batch_driver_scm",(void*)f_4314},
+{"f_4317:batch_driver_scm",(void*)f_4317},
+{"f_4320:batch_driver_scm",(void*)f_4320},
+{"f_2155:batch_driver_scm",(void*)f_2155},
+{"f_4270:batch_driver_scm",(void*)f_4270},
+{"f_4272:batch_driver_scm",(void*)f_4272},
+{"f_4301:batch_driver_scm",(void*)f_4301},
+{"f_4266:batch_driver_scm",(void*)f_4266},
+{"f_2161:batch_driver_scm",(void*)f_2161},
+{"f_2164:batch_driver_scm",(void*)f_2164},
+{"f_4215:batch_driver_scm",(void*)f_4215},
+{"f_4217:batch_driver_scm",(void*)f_4217},
+{"f_4246:batch_driver_scm",(void*)f_4246},
+{"f_2168:batch_driver_scm",(void*)f_2168},
+{"f_2171:batch_driver_scm",(void*)f_2171},
+{"f_2174:batch_driver_scm",(void*)f_2174},
+{"f_2177:batch_driver_scm",(void*)f_2177},
+{"f_2180:batch_driver_scm",(void*)f_2180},
+{"f_4112:batch_driver_scm",(void*)f_4112},
+{"f_4126:batch_driver_scm",(void*)f_4126},
+{"f_4151:batch_driver_scm",(void*)f_4151},
+{"f_4156:batch_driver_scm",(void*)f_4156},
+{"f_4184:batch_driver_scm",(void*)f_4184},
+{"f_4022:batch_driver_scm",(void*)f_4022},
+{"f_4027:batch_driver_scm",(void*)f_4027},
+{"f_4041:batch_driver_scm",(void*)f_4041},
+{"f_4066:batch_driver_scm",(void*)f_4066},
+{"f_4071:batch_driver_scm",(void*)f_4071},
+{"f_4099:batch_driver_scm",(void*)f_4099},
+{"f_2183:batch_driver_scm",(void*)f_2183},
+{"f_4016:batch_driver_scm",(void*)f_4016},
+{"f_4008:batch_driver_scm",(void*)f_4008},
+{"f_3983:batch_driver_scm",(void*)f_3983},
+{"f_3985:batch_driver_scm",(void*)f_3985},
+{"f_3995:batch_driver_scm",(void*)f_3995},
+{"f_2186:batch_driver_scm",(void*)f_2186},
+{"f_2193:batch_driver_scm",(void*)f_2193},
+{"f_2196:batch_driver_scm",(void*)f_2196},
+{"f_2199:batch_driver_scm",(void*)f_2199},
+{"f_3946:batch_driver_scm",(void*)f_3946},
+{"f_3962:batch_driver_scm",(void*)f_3962},
+{"f_3965:batch_driver_scm",(void*)f_3965},
+{"f_2202:batch_driver_scm",(void*)f_2202},
+{"f_2206:batch_driver_scm",(void*)f_2206},
+{"f_2214:batch_driver_scm",(void*)f_2214},
+{"f_2218:batch_driver_scm",(void*)f_2218},
+{"f_3909:batch_driver_scm",(void*)f_3909},
+{"f_3911:batch_driver_scm",(void*)f_3911},
+{"f_3940:batch_driver_scm",(void*)f_3940},
+{"f_2221:batch_driver_scm",(void*)f_2221},
+{"f_3870:batch_driver_scm",(void*)f_3870},
+{"f_3872:batch_driver_scm",(void*)f_3872},
+{"f_3901:batch_driver_scm",(void*)f_3901},
+{"f_3866:batch_driver_scm",(void*)f_3866},
+{"f_3810:batch_driver_scm",(void*)f_3810},
+{"f_3812:batch_driver_scm",(void*)f_3812},
+{"f_3806:batch_driver_scm",(void*)f_3806},
+{"f_2225:batch_driver_scm",(void*)f_2225},
+{"f_2229:batch_driver_scm",(void*)f_2229},
+{"f_2232:batch_driver_scm",(void*)f_2232},
+{"f_3785:batch_driver_scm",(void*)f_3785},
+{"f_2236:batch_driver_scm",(void*)f_2236},
+{"f_3778:batch_driver_scm",(void*)f_3778},
+{"f_2240:batch_driver_scm",(void*)f_2240},
+{"f_3771:batch_driver_scm",(void*)f_3771},
+{"f_2244:batch_driver_scm",(void*)f_2244},
+{"f_3764:batch_driver_scm",(void*)f_3764},
+{"f_2248:batch_driver_scm",(void*)f_2248},
+{"f_3744:batch_driver_scm",(void*)f_3744},
+{"f_2252:batch_driver_scm",(void*)f_2252},
+{"f_2263:batch_driver_scm",(void*)f_2263},
+{"f_2266:batch_driver_scm",(void*)f_2266},
+{"f_2269:batch_driver_scm",(void*)f_2269},
+{"f_3703:batch_driver_scm",(void*)f_3703},
+{"f_2272:batch_driver_scm",(void*)f_2272},
+{"f_2275:batch_driver_scm",(void*)f_2275},
+{"f_2296:batch_driver_scm",(void*)f_2296},
+{"f_2324:batch_driver_scm",(void*)f_2324},
+{"f_2330:batch_driver_scm",(void*)f_2330},
+{"f_2334:batch_driver_scm",(void*)f_2334},
+{"f_2337:batch_driver_scm",(void*)f_2337},
+{"f_2340:batch_driver_scm",(void*)f_2340},
+{"f_2343:batch_driver_scm",(void*)f_2343},
+{"f_2351:batch_driver_scm",(void*)f_2351},
+{"f_2354:batch_driver_scm",(void*)f_2354},
+{"f_2357:batch_driver_scm",(void*)f_2357},
+{"f_3671:batch_driver_scm",(void*)f_3671},
+{"f_3679:batch_driver_scm",(void*)f_3679},
+{"f_2360:batch_driver_scm",(void*)f_2360},
+{"f_2363:batch_driver_scm",(void*)f_2363},
+{"f_3516:batch_driver_scm",(void*)f_3516},
+{"f_3615:batch_driver_scm",(void*)f_3615},
+{"f_3664:batch_driver_scm",(void*)f_3664},
+{"f_3632:batch_driver_scm",(void*)f_3632},
+{"f_3636:batch_driver_scm",(void*)f_3636},
+{"f_3641:batch_driver_scm",(void*)f_3641},
+{"f_3662:batch_driver_scm",(void*)f_3662},
+{"f_3627:batch_driver_scm",(void*)f_3627},
+{"f_3618:batch_driver_scm",(void*)f_3618},
+{"f_3576:batch_driver_scm",(void*)f_3576},
+{"f_3605:batch_driver_scm",(void*)f_3605},
+{"f_3531:batch_driver_scm",(void*)f_3531},
+{"f_3535:batch_driver_scm",(void*)f_3535},
+{"f_3541:batch_driver_scm",(void*)f_3541},
+{"f_3570:batch_driver_scm",(void*)f_3570},
+{"f_3539:batch_driver_scm",(void*)f_3539},
+{"f_3527:batch_driver_scm",(void*)f_3527},
+{"f_3507:batch_driver_scm",(void*)f_3507},
+{"f_3511:batch_driver_scm",(void*)f_3511},
+{"f_2366:batch_driver_scm",(void*)f_2366},
+{"f_2369:batch_driver_scm",(void*)f_2369},
+{"f_3465:batch_driver_scm",(void*)f_3465},
+{"f_3471:batch_driver_scm",(void*)f_3471},
+{"f_3500:batch_driver_scm",(void*)f_3500},
+{"f_3469:batch_driver_scm",(void*)f_3469},
+{"f_2372:batch_driver_scm",(void*)f_2372},
+{"f_2375:batch_driver_scm",(void*)f_2375},
+{"f_3442:batch_driver_scm",(void*)f_3442},
+{"f_3462:batch_driver_scm",(void*)f_3462},
+{"f_2381:batch_driver_scm",(void*)f_2381},
+{"f_3400:batch_driver_scm",(void*)f_3400},
+{"f_3402:batch_driver_scm",(void*)f_3402},
+{"f_3431:batch_driver_scm",(void*)f_3431},
+{"f_2384:batch_driver_scm",(void*)f_2384},
+{"f_2387:batch_driver_scm",(void*)f_2387},
+{"f_3334:batch_driver_scm",(void*)f_3334},
+{"f_3140:batch_driver_scm",(void*)f_3140},
+{"f_3290:batch_driver_scm",(void*)f_3290},
+{"f_3144:batch_driver_scm",(void*)f_3144},
+{"f_3148:batch_driver_scm",(void*)f_3148},
+{"f_3167:batch_driver_scm",(void*)f_3167},
+{"f_3152:batch_driver_scm",(void*)f_3152},
+{"f_2393:batch_driver_scm",(void*)f_2393},
+{"f_3079:batch_driver_scm",(void*)f_3079},
+{"f_3084:batch_driver_scm",(void*)f_3084},
+{"f_3096:batch_driver_scm",(void*)f_3096},
+{"f_3099:batch_driver_scm",(void*)f_3099},
+{"f_3102:batch_driver_scm",(void*)f_3102},
+{"f_3105:batch_driver_scm",(void*)f_3105},
+{"f_3119:batch_driver_scm",(void*)f_3119},
+{"f_2396:batch_driver_scm",(void*)f_2396},
+{"f_3073:batch_driver_scm",(void*)f_3073},
+{"f_2399:batch_driver_scm",(void*)f_2399},
+{"f_3067:batch_driver_scm",(void*)f_3067},
+{"f_2402:batch_driver_scm",(void*)f_2402},
+{"f_2405:batch_driver_scm",(void*)f_2405},
+{"f_3052:batch_driver_scm",(void*)f_3052},
+{"f_2408:batch_driver_scm",(void*)f_2408},
+{"f_2413:batch_driver_scm",(void*)f_2413},
+{"f_2416:batch_driver_scm",(void*)f_2416},
+{"f_2419:batch_driver_scm",(void*)f_2419},
+{"f_2422:batch_driver_scm",(void*)f_2422},
+{"f_2998:batch_driver_scm",(void*)f_2998},
+{"f_3010:batch_driver_scm",(void*)f_3010},
+{"f_3039:batch_driver_scm",(void*)f_3039},
+{"f_3005:batch_driver_scm",(void*)f_3005},
+{"f_2425:batch_driver_scm",(void*)f_2425},
+{"f_2995:batch_driver_scm",(void*)f_2995},
+{"f_2991:batch_driver_scm",(void*)f_2991},
+{"f_2436:batch_driver_scm",(void*)f_2436},
+{"f_2439:batch_driver_scm",(void*)f_2439},
+{"f_2937:batch_driver_scm",(void*)f_2937},
+{"f_2977:batch_driver_scm",(void*)f_2977},
+{"f_2969:batch_driver_scm",(void*)f_2969},
+{"f_2940:batch_driver_scm",(void*)f_2940},
+{"f_2948:batch_driver_scm",(void*)f_2948},
+{"f_2951:batch_driver_scm",(void*)f_2951},
+{"f_2954:batch_driver_scm",(void*)f_2954},
+{"f_2960:batch_driver_scm",(void*)f_2960},
+{"f_2963:batch_driver_scm",(void*)f_2963},
+{"f_2966:batch_driver_scm",(void*)f_2966},
+{"f_2442:batch_driver_scm",(void*)f_2442},
+{"f_2928:batch_driver_scm",(void*)f_2928},
+{"f_2931:batch_driver_scm",(void*)f_2931},
+{"f_2910:batch_driver_scm",(void*)f_2910},
+{"f_2916:batch_driver_scm",(void*)f_2916},
+{"f_2919:batch_driver_scm",(void*)f_2919},
+{"f_2922:batch_driver_scm",(void*)f_2922},
+{"f_2445:batch_driver_scm",(void*)f_2445},
+{"f_2904:batch_driver_scm",(void*)f_2904},
+{"f_2448:batch_driver_scm",(void*)f_2448},
+{"f_2897:batch_driver_scm",(void*)f_2897},
+{"f_2451:batch_driver_scm",(void*)f_2451},
+{"f_2861:batch_driver_scm",(void*)f_2861},
+{"f_2890:batch_driver_scm",(void*)f_2890},
+{"f_2859:batch_driver_scm",(void*)f_2859},
+{"f_2804:batch_driver_scm",(void*)f_2804},
+{"f_2806:batch_driver_scm",(void*)f_2806},
+{"f_2844:batch_driver_scm",(void*)f_2844},
+{"f_2814:batch_driver_scm",(void*)f_2814},
+{"f_2841:batch_driver_scm",(void*)f_2841},
+{"f_2837:batch_driver_scm",(void*)f_2837},
+{"f_2818:batch_driver_scm",(void*)f_2818},
+{"f_2827:batch_driver_scm",(void*)f_2827},
+{"f_2830:batch_driver_scm",(void*)f_2830},
+{"f_2454:batch_driver_scm",(void*)f_2454},
+{"f_2457:batch_driver_scm",(void*)f_2457},
+{"f_2768:batch_driver_scm",(void*)f_2768},
+{"f_2786:batch_driver_scm",(void*)f_2786},
+{"f_2776:batch_driver_scm",(void*)f_2776},
+{"f_2780:batch_driver_scm",(void*)f_2780},
+{"f_2460:batch_driver_scm",(void*)f_2460},
+{"f_2466:batch_driver_scm",(void*)f_2466},
+{"f_2472:batch_driver_scm",(void*)f_2472},
+{"f_2475:batch_driver_scm",(void*)f_2475},
+{"f_2478:batch_driver_scm",(void*)f_2478},
+{"f_2483:batch_driver_scm",(void*)f_2483},
+{"f_2490:batch_driver_scm",(void*)f_2490},
+{"f_2718:batch_driver_scm",(void*)f_2718},
+{"f_2721:batch_driver_scm",(void*)f_2721},
+{"f_2493:batch_driver_scm",(void*)f_2493},
+{"f_2497:batch_driver_scm",(void*)f_2497},
+{"f_2500:batch_driver_scm",(void*)f_2500},
+{"f_2503:batch_driver_scm",(void*)f_2503},
+{"f_2595:batch_driver_scm",(void*)f_2595},
+{"f_2706:batch_driver_scm",(void*)f_2706},
+{"f_2598:batch_driver_scm",(void*)f_2598},
+{"f_2604:batch_driver_scm",(void*)f_2604},
+{"f_2607:batch_driver_scm",(void*)f_2607},
+{"f_2610:batch_driver_scm",(void*)f_2610},
+{"f_2613:batch_driver_scm",(void*)f_2613},
+{"f_2616:batch_driver_scm",(void*)f_2616},
+{"f_2619:batch_driver_scm",(void*)f_2619},
+{"f_2633:batch_driver_scm",(void*)f_2633},
+{"f_2637:batch_driver_scm",(void*)f_2637},
+{"f_2643:batch_driver_scm",(void*)f_2643},
+{"f_2646:batch_driver_scm",(void*)f_2646},
+{"f_2649:batch_driver_scm",(void*)f_2649},
+{"f_2652:batch_driver_scm",(void*)f_2652},
+{"f_2655:batch_driver_scm",(void*)f_2655},
+{"f5114:batch_driver_scm",(void*)f5114},
+{"f_2674:batch_driver_scm",(void*)f_2674},
+{"f_2658:batch_driver_scm",(void*)f_2658},
+{"f_2661:batch_driver_scm",(void*)f_2661},
+{"f_2627:batch_driver_scm",(void*)f_2627},
+{"f_2509:batch_driver_scm",(void*)f_2509},
+{"f_2523:batch_driver_scm",(void*)f_2523},
+{"f_2527:batch_driver_scm",(void*)f_2527},
+{"f_2530:batch_driver_scm",(void*)f_2530},
+{"f_2549:batch_driver_scm",(void*)f_2549},
+{"f_2566:batch_driver_scm",(void*)f_2566},
+{"f_2569:batch_driver_scm",(void*)f_2569},
+{"f_2575:batch_driver_scm",(void*)f_2575},
+{"f_2578:batch_driver_scm",(void*)f_2578},
+{"f_2517:batch_driver_scm",(void*)f_2517},
+{"f_2315:batch_driver_scm",(void*)f_2315},
+{"f_2308:batch_driver_scm",(void*)f_2308},
+{"f_2284:batch_driver_scm",(void*)f_2284},
+{"f_1961:batch_driver_scm",(void*)f_1961},
+{"f_1991:batch_driver_scm",(void*)f_1991},
+{"f_1986:batch_driver_scm",(void*)f_1986},
+{"f_1963:batch_driver_scm",(void*)f_1963},
+{"f_1967:batch_driver_scm",(void*)f_1967},
+{"f_1981:batch_driver_scm",(void*)f_1981},
+{"f_1975:batch_driver_scm",(void*)f_1975},
+{"f_1970:batch_driver_scm",(void*)f_1970},
+{"f_1955:batch_driver_scm",(void*)f_1955},
+{"f_1926:batch_driver_scm",(void*)f_1926},
+{"f_1933:batch_driver_scm",(void*)f_1933},
+{"f_1936:batch_driver_scm",(void*)f_1936},
+{"f_1939:batch_driver_scm",(void*)f_1939},
+{"f_1942:batch_driver_scm",(void*)f_1942},
+{"f_1916:batch_driver_scm",(void*)f_1916},
+{"f_1881:batch_driver_scm",(void*)f_1881},
+{"f_1887:batch_driver_scm",(void*)f_1887},
+{"f_1895:batch_driver_scm",(void*)f_1895},
+{"f_1903:batch_driver_scm",(void*)f_1903},
+{"f_1907:batch_driver_scm",(void*)f_1907},
+{"f_1801:batch_driver_scm",(void*)f_1801},
+{"f_1870:batch_driver_scm",(void*)f_1870},
+{"f_1866:batch_driver_scm",(void*)f_1866},
+{"f_1850:batch_driver_scm",(void*)f_1850},
+{"f_1842:batch_driver_scm",(void*)f_1842},
+{"f_1811:batch_driver_scm",(void*)f_1811},
+{"f_1752:batch_driver_scm",(void*)f_1752},
+{"f_1759:batch_driver_scm",(void*)f_1759},
+{"f_1765:batch_driver_scm",(void*)f_1765},
+{"f_1780:batch_driver_scm",(void*)f_1780},
+{"f_1776:batch_driver_scm",(void*)f_1776},
+{"f_1762:batch_driver_scm",(void*)f_1762},
+{"f_1798:batch_driver_scm",(void*)f_1798},
+{"f_1717:batch_driver_scm",(void*)f_1717},
+{"f_1724:batch_driver_scm",(void*)f_1724},
+{"f_1729:batch_driver_scm",(void*)f_1729},
+{"f_1739:batch_driver_scm",(void*)f_1739},
+{"f_1693:batch_driver_scm",(void*)f_1693},
+{"f_1700:batch_driver_scm",(void*)f_1700},
+{"f_1703:batch_driver_scm",(void*)f_1703},
+{"f_1706:batch_driver_scm",(void*)f_1706},
+{"f_1709:batch_driver_scm",(void*)f_1709},
+{"f_1712:batch_driver_scm",(void*)f_1712},
+{"f_1671:batch_driver_scm",(void*)f_1671},
+{"f_1678:batch_driver_scm",(void*)f_1678},
+{"f_1691:batch_driver_scm",(void*)f_1691},
+{"f_1647:batch_driver_scm",(void*)f_1647},
+{"f_1651:batch_driver_scm",(void*)f_1651},
+{"f_1660:batch_driver_scm",(void*)f_1660},
+{"f_1663:batch_driver_scm",(void*)f_1663},
+{"f_1666:batch_driver_scm",(void*)f_1666},
+{"f_1669:batch_driver_scm",(void*)f_1669},
+{"f_1632:batch_driver_scm",(void*)f_1632},
+{"f_1639:batch_driver_scm",(void*)f_1639},
+{"f_1642:batch_driver_scm",(void*)f_1642},
+{"f_1527:batch_driver_scm",(void*)f_1527},
+{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
new file mode 100644
index 00000000..43214066
--- /dev/null
+++ b/bootstrap/c-backend.c
@@ -0,0 +1,17455 @@
+/* Generated from c-backend.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:30
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[853];
+static double C_possibly_force_alignment;
+
+
+/* from getsize */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub2441(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub2441(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;}
+
+/* from getbits */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub2437(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub2437(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_2486)
+static void C_ccall f_2486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2489)
+static void C_ccall f_2489(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10148)
+static void C_ccall f_10148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10151)
+static void C_ccall f_10151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10178)
+static void C_ccall f_10178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10174)
+static void C_ccall f_10174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10154)
+static void C_ccall f_10154(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_10170)
+static void C_ccall f_10170(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10160)
+static void C_ccall f_10160(C_word c,C_word t0,C_word t1) 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_10166)
+static void C_ccall f_10166(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_9848)
+static void C_ccall f_9848(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10124)
+static void C_ccall f_10124(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10122)
+static void C_ccall f_10122(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_10080)
+static void C_ccall f_10080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10041)
+static void C_ccall f_10041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10028)
+static void C_ccall f_10028(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_9910)
+static void C_ccall f_9910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9857)
+static C_word C_fcall f_9857(C_word *a,C_word t0);
+C_noret_decl(f_9241)
+static void C_ccall f_9241(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9352)
+static void C_fcall f_9352(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9517)
+static void C_ccall f_9517(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_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_9728)
+static void C_ccall f_9728(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9731)
+static void C_ccall f_9731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9701)
+static void C_ccall f_9701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9704)
+static void C_ccall f_9704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9707)
+static void C_ccall f_9707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9710)
+static void C_ccall f_9710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9680)
+static void C_ccall f_9680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9683)
+static void C_ccall f_9683(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9686)
+static void C_ccall f_9686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9689)
+static void C_ccall f_9689(C_word c,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_noret;
+C_noret_decl(f_9646)
+static void C_ccall f_9646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9649)
+static void C_ccall f_9649(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9652)
+static void C_ccall f_9652(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_9625)
+static void C_ccall f_9625(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_noret;
+C_noret_decl(f_9631)
+static void C_ccall f_9631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9601)
+static void C_ccall f_9601(C_word c,C_word t0,C_word t1) 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_9607)
+static void C_ccall f_9607(C_word c,C_word t0,C_word t1) 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_9580)
+static void C_ccall f_9580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9583)
+static void C_ccall f_9583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9586)
+static void C_ccall f_9586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9589)
+static void C_ccall f_9589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9559)
+static void C_ccall f_9559(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9562)
+static void C_ccall f_9562(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9565)
+static void C_ccall f_9565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9568)
+static void C_ccall f_9568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9521)
+static void C_fcall f_9521(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9487)
+static void C_ccall f_9487(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9490)
+static void C_ccall f_9490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9493)
+static void C_ccall f_9493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9496)
+static void C_ccall f_9496(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9466)
+static void C_ccall f_9466(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9469)
+static void C_ccall f_9469(C_word c,C_word t0,C_word t1) 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_9475)
+static void C_ccall f_9475(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9445)
+static void C_ccall f_9445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9448)
+static void C_ccall f_9448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9451)
+static void C_ccall f_9451(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9454)
+static void C_ccall f_9454(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9421)
+static void C_ccall f_9421(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9424)
+static void C_ccall f_9424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9427)
+static void C_ccall f_9427(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9430)
+static void C_ccall f_9430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9400)
+static void C_ccall f_9400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9403)
+static void C_ccall f_9403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9406)
+static void C_ccall f_9406(C_word c,C_word t0,C_word t1) 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_9376)
+static void C_ccall f_9376(C_word c,C_word t0,C_word t1) 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_9382)
+static void C_ccall f_9382(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9385)
+static void C_ccall f_9385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9355)
+static void C_ccall f_9355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9358)
+static void C_ccall f_9358(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_noret;
+C_noret_decl(f_9364)
+static void C_ccall f_9364(C_word c,C_word t0,C_word t1) 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_9337)
+static void C_ccall f_9337(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_9310)
+static void C_ccall f_9310(C_word c,C_word t0,C_word t1) 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_9316)
+static void C_ccall f_9316(C_word c,C_word t0,C_word t1) 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_9243)
+static void C_fcall f_9243(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8751)
+static void C_ccall f_8751(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8781)
+static void C_fcall f_8781(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8808)
+static void C_fcall f_8808(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9003)
+static void C_fcall f_9003(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_noret;
+C_noret_decl(f_9021)
+static void C_ccall f_9021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9048)
+static void C_fcall f_9048(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9125)
+static void C_ccall f_9125(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_noret;
+C_noret_decl(f_7867)
+static void C_ccall f_7867(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7944)
+static void C_fcall f_7944(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8046)
+static void C_fcall f_8046(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8079)
+static void C_fcall f_8079(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8175)
+static void C_fcall f_8175(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_8202)
+static void C_ccall f_8202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8247)
+static void C_fcall f_8247(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8264)
+static void C_fcall f_8264(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8281)
+static void C_fcall f_8281(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8320)
+static void C_fcall f_8320(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8337)
+static void C_fcall f_8337(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8354)
+static void C_fcall f_8354(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8371)
+static void C_fcall f_8371(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8388)
+static void C_fcall f_8388(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8405)
+static void C_fcall f_8405(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8422)
+static void C_fcall f_8422(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8434)
+static void C_ccall f_8434(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_8451)
+static void C_fcall f_8451(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_noret;
+C_noret_decl(f_8461)
+static void C_fcall f_8461(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_8445)
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8412)
+static void C_ccall f_8412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8395)
+static void C_ccall f_8395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8378)
+static void C_ccall f_8378(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_8344)
+static void C_ccall f_8344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8327)
+static void C_ccall f_8327(C_word c,C_word t0,C_word t1) 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_8302)
+static void C_ccall f_8302(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8300)
+static void C_ccall f_8300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8296)
+static void C_ccall f_8296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8288)
+static void C_ccall f_8288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8275)
+static void C_ccall f_8275(C_word c,C_word t0,C_word t1) 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_8206)
+static void C_fcall f_8206(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7874)
+static void C_fcall f_7874(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7869)
+static void C_fcall f_7869(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_word t2,C_word t3) 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_7812)
+static void C_ccall f_7812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7815)
+static void C_ccall f_7815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7821)
+static void C_ccall f_7821(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_7824)
+static void C_ccall f_7824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7832)
+static void C_ccall f_7832(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_7836)
+static void C_ccall f_7836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7827)
+static void C_ccall f_7827(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_7314)
+static void C_fcall f_7314(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7789)
+static void C_ccall f_7789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7322)
+static void C_fcall f_7322(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7326)
+static void C_ccall f_7326(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_7332)
+static void C_ccall f_7332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7335)
+static void C_ccall f_7335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7341)
+static void C_ccall f_7341(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7687)
+static void C_ccall f_7687(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7690)
+static void C_ccall f_7690(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_7693)
+static void C_ccall f_7693(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7696)
+static void C_ccall f_7696(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7699)
+static void C_ccall f_7699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7702)
+static void C_ccall f_7702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7735)
+static void C_fcall f_7735(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7751)
+static void C_ccall f_7751(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7754)
+static void C_ccall f_7754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7705)
+static void C_ccall f_7705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7733)
+static void C_ccall f_7733(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7708)
+static void C_ccall f_7708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7711)
+static void C_ccall f_7711(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7714)
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7343)
+static void C_ccall f_7343(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7353)
+static void C_fcall f_7353(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7362)
+static void C_fcall f_7362(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7374)
+static void C_fcall f_7374(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7386)
+static void C_fcall f_7386(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7392)
+static void C_ccall f_7392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7431)
+static void C_fcall f_7431(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7396)
+static void C_fcall f_7396(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6994)
+static void C_ccall f_6994(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7000)
+static void C_fcall f_7000(C_word t0,C_word t1,C_word t2) 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_7008)
+static void C_fcall f_7008(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7012)
+static void C_ccall f_7012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7015)
+static void C_ccall f_7015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7018)
+static void C_ccall f_7018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7292)
+static void C_ccall f_7292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7024)
+static void C_ccall f_7024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7027)
+static void C_ccall f_7027(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_noret;
+C_noret_decl(f_7033)
+static void C_ccall f_7033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7036)
+static void C_ccall f_7036(C_word c,C_word t0,C_word t1) 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_7042)
+static void C_ccall f_7042(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_7048)
+static void C_ccall f_7048(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7051)
+static void C_ccall f_7051(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_7054)
+static void C_ccall f_7054(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_noret;
+C_noret_decl(f_7060)
+static void C_ccall f_7060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7063)
+static void C_ccall f_7063(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7066)
+static void C_ccall f_7066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7069)
+static void C_ccall f_7069(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7072)
+static void C_ccall f_7072(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7075)
+static void C_ccall f_7075(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_7174)
+static void C_fcall f_7174(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7181)
+static void C_fcall f_7181(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_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_7202)
+static void C_ccall f_7202(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_7194)
+static void C_ccall f_7194(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7198)
+static void C_ccall f_7198(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_7078)
+static void C_ccall f_7078(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7081)
+static void C_ccall f_7081(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_7114)
+static void C_ccall f_7114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7152)
+static void C_ccall f_7152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7148)
+static void C_ccall f_7148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7117)
+static void C_ccall f_7117(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_7123)
+static void C_ccall f_7123(C_word c,C_word t0,C_word t1) C_noret;
+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_7093)
+static void C_ccall f_7093(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7084)
+static void C_ccall f_7084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6954)
+static void C_ccall f_6954(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6960)
+static void C_fcall f_6960(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6972)
+static void C_ccall f_6972(C_word c,C_word t0,C_word t1) 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_6981)
+static void C_ccall f_6981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6900)
+static void C_ccall f_6900(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6904)
+static void C_ccall f_6904(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6909)
+static void C_fcall f_6909(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6938)
+static void C_ccall f_6938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6941)
+static void C_ccall f_6941(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6884)
+static void C_ccall f_6884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6890)
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1,C_word t2) 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_6868)
+static void C_ccall f_6868(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_noret;
+C_noret_decl(f_6882)
+static void C_ccall f_6882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6779)
+static void C_ccall f_6779(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6788)
+static void C_fcall f_6788(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6817)
+static void C_fcall f_6817(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6827)
+static void C_ccall f_6827(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6702)
+static void C_ccall f_6702(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6706)
+static void C_ccall f_6706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6720)
+static void C_fcall f_6720(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_noret;
+C_noret_decl(f_6765)
+static void C_ccall f_6765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6736)
+static void C_ccall f_6736(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_6709)
+static void C_ccall f_6709(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6712)
+static void C_ccall f_6712(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_2577)
+static void C_ccall f_2577(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_6669)
+static void C_ccall f_6669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6673)
+static void C_ccall f_6673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6676)
+static void C_ccall f_6676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6679)
+static void C_ccall f_6679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6682)
+static void C_ccall f_6682(C_word c,C_word t0,C_word t1) C_noret;
+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_6688)
+static void C_ccall f_6688(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6691)
+static void C_ccall f_6691(C_word c,C_word t0,C_word t1) 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_6697)
+static void C_ccall f_6697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5900)
+static void C_fcall f_5900(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5906)
+static void C_fcall f_5906(C_word t0,C_word t1,C_word t2) 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_5914)
+static void C_fcall f_5914(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5918)
+static void C_ccall f_5918(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_5924)
+static void C_ccall f_5924(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_5930)
+static void C_ccall f_5930(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_6652)
+static void C_ccall f_6652(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5936)
+static void C_fcall f_5936(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5942)
+static void C_ccall f_5942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5945)
+static void C_ccall f_5945(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5948)
+static void C_ccall f_5948(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5951)
+static void C_ccall f_5951(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_5957)
+static void C_ccall f_5957(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_5963)
+static void C_ccall f_5963(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_5969)
+static void C_ccall f_5969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5972)
+static void C_ccall f_5972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5975)
+static void C_ccall f_5975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6621)
+static void C_ccall f_6621(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5978)
+static void C_ccall f_5978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6582)
+static void C_ccall f_6582(C_word c,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_6604)
+static void C_ccall f_6604(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_5981)
+static void C_ccall f_5981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5984)
+static void C_ccall f_5984(C_word c,C_word t0,C_word t1) 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_6554)
+static void C_fcall f_6554(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6557)
+static void C_ccall f_6557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5990)
+static void C_ccall f_5990(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5993)
+static void C_ccall f_5993(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_6002)
+static void C_fcall f_6002(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6005)
+static void C_ccall f_6005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6514)
+static void C_fcall f_6514(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6516)
+static void C_fcall f_6516(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6526)
+static void C_ccall f_6526(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6008)
+static void C_ccall f_6008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6459)
+static void C_fcall f_6459(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6471)
+static void C_ccall f_6471(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6474)
+static void C_ccall f_6474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6381)
+static void C_ccall f_6381(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6423)
+static void C_fcall f_6423(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6384)
+static void C_ccall f_6384(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6390)
+static void C_fcall f_6390(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_6317)
+static void C_ccall f_6317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6320)
+static void C_ccall f_6320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6323)
+static void C_ccall f_6323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6326)
+static void C_ccall f_6326(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6329)
+static void C_ccall f_6329(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_noret;
+C_noret_decl(f_6332)
+static void C_ccall f_6332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6335)
+static void C_ccall f_6335(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6303)
+static void C_ccall f_6303(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_6228)
+static void C_ccall f_6228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6234)
+static void C_ccall f_6234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6237)
+static void C_ccall f_6237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6271)
+static void C_ccall f_6271(C_word c,C_word t0,C_word t1) 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_6277)
+static void C_ccall f_6277(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_noret;
+C_noret_decl(f_6243)
+static void C_ccall f_6243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6246)
+static void C_ccall f_6246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6249)
+static void C_ccall f_6249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6258)
+static void C_ccall f_6258(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6261)
+static void C_ccall f_6261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6011)
+static void C_ccall f_6011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6034)
+static void C_fcall f_6034(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6169)
+static void C_ccall f_6169(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6172)
+static void C_ccall f_6172(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_6175)
+static void C_ccall f_6175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6040)
+static void C_ccall f_6040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6043)
+static void C_ccall f_6043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6046)
+static void C_ccall f_6046(C_word c,C_word t0,C_word t1) 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_6049)
+static void C_ccall f_6049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6052)
+static void C_ccall f_6052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6055)
+static void C_ccall f_6055(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_6123)
+static void C_ccall f_6123(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_6061)
+static void C_ccall f_6061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6064)
+static void C_ccall f_6064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6067)
+static void C_ccall f_6067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6070)
+static void C_ccall f_6070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6073)
+static void C_ccall f_6073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6076)
+static void C_ccall f_6076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6094)
+static void C_fcall f_6094(C_word t0,C_word t1,C_word t2,C_word t3) 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_6079)
+static void C_ccall f_6079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6014)
+static void C_ccall f_6014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6024)
+static void C_ccall f_6024(C_word c,C_word t0,C_word t1) 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_5888)
+static void C_fcall f_5888(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5895)
+static void C_ccall f_5895(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5898)
+static void C_ccall f_5898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5811)
+static void C_fcall f_5811(C_word t0,C_word t1,C_word t2) 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_5821)
+static void C_ccall f_5821(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_5882)
+static void C_ccall f_5882(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5878)
+static void C_ccall f_5878(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_5842)
+static void C_fcall f_5842(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5853)
+static void C_ccall f_5853(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_5669)
+static void C_fcall f_5669(C_word t0,C_word t1,C_word t2,C_word t3) 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_5676)
+static void C_fcall f_5676(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5682)
+static void C_ccall f_5682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5765)
+static void C_fcall f_5765(C_word t0,C_word t1) 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_5778)
+static void C_ccall f_5778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5771)
+static void C_ccall f_5771(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5732)
+static void C_ccall f_5732(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_5475)
+static void C_fcall f_5475(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5482)
+static void C_ccall f_5482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5591)
+static void C_ccall f_5591(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_5638)
+static void C_fcall f_5638(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5660)
+static void C_ccall f_5660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5616)
+static void C_ccall f_5616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5550)
+static void C_ccall f_5550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5552)
+static void C_fcall f_5552(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5581)
+static void C_ccall f_5581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5546)
+static void C_ccall f_5546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5542)
+static void C_ccall f_5542(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5513)
+static void C_ccall f_5513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5517)
+static void C_ccall f_5517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5420)
+static void C_fcall f_5420(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5426)
+static void C_fcall f_5426(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5455)
+static void C_ccall f_5455(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_5461)
+static void C_ccall f_5461(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_5467)
+static void C_ccall f_5467(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_5090)
+static void C_fcall f_5090(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5279)
+static void C_fcall f_5279(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5407)
+static void C_ccall f_5407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5287)
+static void C_fcall f_5287(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5291)
+static void C_ccall f_5291(C_word c,C_word t0,C_word t1) 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_5297)
+static void C_ccall f_5297(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_5303)
+static void C_ccall f_5303(C_word c,C_word t0,C_word t1) 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_5306)
+static void C_fcall f_5306(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5309)
+static void C_fcall f_5309(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_5393)
+static void C_ccall f_5393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5349)
+static void C_ccall f_5349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5355)
+static void C_fcall f_5355(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5373)
+static void C_ccall f_5373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5369)
+static void C_ccall f_5369(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5365)
+static void C_ccall f_5365(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_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_5327)
+static void C_ccall f_5327(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_5333)
+static void C_ccall f_5333(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_noret;
+C_noret_decl(f_5336)
+static void C_ccall f_5336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5209)
+static void C_ccall f_5209(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5228)
+static void C_fcall f_5228(C_word t0,C_word t1,C_word t2) 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_5236)
+static void C_fcall f_5236(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5240)
+static void C_ccall f_5240(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_5246)
+static void C_ccall f_5246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5249)
+static void C_ccall f_5249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5263)
+static void C_ccall f_5263(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_5252)
+static void C_ccall f_5252(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_5226)
+static void C_ccall f_5226(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_5222)
+static void C_ccall f_5222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5129)
+static void C_fcall f_5129(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5131)
+static void C_ccall f_5131(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5135)
+static void C_ccall f_5135(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5138)
+static void C_ccall f_5138(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5141)
+static void C_ccall f_5141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5144)
+static void C_ccall f_5144(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5147)
+static void C_ccall f_5147(C_word c,C_word t0,C_word t1) 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_5153)
+static void C_ccall f_5153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5156)
+static void C_ccall f_5156(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5159)
+static void C_ccall f_5159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5162)
+static void C_ccall f_5162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5165)
+static void C_ccall f_5165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5168)
+static void C_ccall f_5168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5182)
+static void C_ccall f_5182(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5178)
+static void C_ccall f_5178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5171)
+static void C_ccall f_5171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5093)
+static void C_fcall f_5093(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5106)
+static void C_fcall f_5106(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5116)
+static void C_ccall f_5116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5097)
+static void C_ccall f_5097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4750)
+static void C_fcall f_4750(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4754)
+static void C_ccall f_4754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4823)
+static void C_fcall f_4823(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5077)
+static void C_ccall f_5077(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4831)
+static void C_fcall f_4831(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4835)
+static void C_ccall f_4835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4838)
+static void C_ccall f_4838(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5074)
+static void C_ccall f_5074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4841)
+static void C_fcall f_4841(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5060)
+static void C_ccall f_5060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4844)
+static void C_ccall f_4844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4847)
+static void C_ccall f_4847(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_noret;
+C_noret_decl(f_4853)
+static void C_ccall f_4853(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_4859)
+static void C_ccall f_4859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5052)
+static void C_ccall f_5052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4862)
+static void C_fcall f_4862(C_word t0,C_word t1) 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_5006)
+static void C_ccall f_5006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5008)
+static void C_fcall f_5008(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5034)
+static void C_ccall f_5034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5016)
+static void C_fcall f_5016(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5027)
+static void C_ccall f_5027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4868)
+static void C_ccall f_4868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4955)
+static void C_ccall f_4955(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4958)
+static void C_ccall f_4958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4961)
+static void C_ccall f_4961(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_4980)
+static void C_ccall f_4980(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(f11016)
+static void C_ccall f11016(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_4871)
+static void C_ccall f_4871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4874)
+static void C_ccall f_4874(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4877)
+static void C_ccall f_4877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4927)
+static void C_fcall f_4927(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4930)
+static void C_ccall f_4930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4880)
+static void C_ccall f_4880(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4883)
+static void C_ccall f_4883(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_4918)
+static void C_ccall f_4918(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_4898)
+static void C_ccall f_4898(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_4757)
+static void C_ccall f_4757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4762)
+static void C_fcall f_4762(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4774)
+static void C_ccall f_4774(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_4786)
+static void C_fcall f_4786(C_word t0,C_word t1,C_word t2) 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_4777)
+static void C_ccall f_4777(C_word c,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_noret;
+C_noret_decl(f_4579)
+static void C_fcall f_4579(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4586)
+static void C_ccall f_4586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4722)
+static void C_fcall f_4722(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_4589)
+static void C_ccall f_4589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4592)
+static void C_ccall f_4592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4595)
+static void C_ccall f_4595(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_word t3) C_noret;
+C_noret_decl(f_4610)
+static void C_ccall f_4610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4616)
+static void C_ccall f_4616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4669)
+static void C_fcall f_4669(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4679)
+static void C_ccall f_4679(C_word c,C_word t0,C_word t1) 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_4642)
+static void C_fcall f_4642(C_word t0,C_word t1,C_word t2) 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_4622)
+static void C_ccall f_4622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4625)
+static void C_ccall f_4625(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4410)
+static void C_fcall f_4410(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4571)
+static void C_ccall f_4571(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4430)
+static void C_ccall f_4430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4529)
+static void C_ccall f_4529(C_word c,C_word t0,C_word t1) 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_4537)
+static void C_ccall f_4537(C_word c,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_4563)
+static void C_ccall f_4563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4559)
+static void C_ccall f_4559(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4551)
+static void C_ccall f_4551(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4549)
+static void C_ccall f_4549(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_4448)
+static void C_ccall f_4448(C_word c,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_4454)
+static void C_ccall f_4454(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_noret;
+C_noret_decl(f_4457)
+static void C_ccall f_4457(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_4463)
+static void C_ccall f_4463(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_4483)
+static void C_fcall f_4483(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4498)
+static void C_ccall f_4498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4466)
+static void C_ccall f_4466(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4413)
+static void C_fcall f_4413(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_2622)
+static void C_fcall f_2622(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4378)
+static void C_fcall f_4378(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4384)
+static void C_ccall f_4384(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4388)
+static void C_ccall f_4388(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2625)
+static void C_fcall f_2625(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4343)
+static void C_ccall f_4343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4346)
+static void C_ccall f_4346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4349)
+static void C_ccall f_4349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4352)
+static void C_ccall f_4352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4355)
+static void C_ccall f_4355(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_4260)
+static void C_ccall f_4260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4263)
+static void C_ccall f_4263(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_noret;
+C_noret_decl(f_4279)
+static void C_fcall f_4279(C_word t0,C_word t1,C_word t2,C_word t3) 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_4305)
+static void C_ccall f_4305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4308)
+static void C_ccall f_4308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4311)
+static void C_ccall f_4311(C_word c,C_word t0,C_word t1) 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_4292)
+static void C_ccall f_4292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4251)
+static void C_ccall f_4251(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4223)
+static void C_ccall f_4223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4226)
+static void C_ccall f_4226(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_4229)
+static void C_ccall f_4229(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_4207)
+static void C_ccall f_4207(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_noret;
+C_noret_decl(f_4193)
+static void C_ccall f_4193(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_4177)
+static void C_ccall f_4177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4181)
+static void C_ccall f_4181(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_4162)
+static void C_ccall f_4162(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_4103)
+static void C_ccall f_4103(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4115)
+static void C_ccall f_4115(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_4084)
+static void C_ccall f_4084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4087)
+static void C_ccall f_4087(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_noret;
+C_noret_decl(f_4068)
+static void C_ccall f_4068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4046)
+static void C_ccall f_4046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4049)
+static void C_ccall f_4049(C_word c,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_4023)
+static void C_ccall f_4023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3971)
+static void C_ccall f_3971(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_noret;
+C_noret_decl(f_3974)
+static void C_ccall f_3974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3992)
+static void C_ccall f_3992(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_3980)
+static void C_ccall f_3980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3938)
+static void C_ccall f_3938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3922)
+static void C_ccall f_3922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f10988)
+static void C_ccall f10988(C_word c,C_word t0,C_word t1) 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_ccall f_3928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3809)
+static void C_ccall f_3809(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3812)
+static void C_ccall f_3812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3869)
+static void C_fcall f_3869(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3890)
+static void C_ccall f_3890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3877)
+static void C_fcall f_3877(C_word t0,C_word t1,C_word t2,C_word t3) 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_3884)
+static void C_ccall f_3884(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3815)
+static void C_ccall f_3815(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_3827)
+static void C_fcall f_3827(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3842)
+static void C_ccall f_3842(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_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_fcall f_3353(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3759)
+static void C_ccall f_3759(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_3359)
+static void C_fcall f_3359(C_word t0,C_word t1) C_noret;
+C_noret_decl(f10980)
+static void C_ccall f10980(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_2610)
+static void C_ccall f_2610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3741)
+static void C_ccall f_3741(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_3569)
+static void C_fcall f_3569(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_3661)
+static void C_ccall f_3661(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_noret;
+C_noret_decl(f_3679)
+static void C_fcall f_3679(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_3589)
+static void C_ccall f_3589(C_word c,C_word t0,C_word t1) 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_3648)
+static void C_ccall f_3648(C_word c,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_3637)
+static void C_ccall f_3637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3630)
+static void C_ccall f_3630(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3605)
+static void C_ccall f_3605(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_3618)
+static void C_ccall f_3618(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_noret;
+C_noret_decl(f_3595)
+static void C_ccall f_3595(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_3563)
+static void C_ccall f_3563(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_3547)
+static void C_ccall f_3547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3550)
+static void C_ccall f_3550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3523)
+static void C_ccall f_3523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3526)
+static void C_ccall f_3526(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3529)
+static void C_ccall f_3529(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f10975)
+static void C_ccall f10975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3532)
+static void C_ccall f_3532(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_3404)
+static void C_ccall f_3404(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3407)
+static void C_ccall f_3407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3470)
+static void C_fcall f_3470(C_word t0,C_word t1,C_word t2,C_word t3) 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_3478)
+static void C_fcall f_3478(C_word t0,C_word t1,C_word t2,C_word t3) 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_3485)
+static void C_ccall f_3485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3410)
+static void C_ccall f_3410(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_noret;
+C_noret_decl(f_3428)
+static void C_fcall f_3428(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3443)
+static void C_ccall f_3443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3413)
+static void C_ccall f_3413(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_3382)
+static void C_ccall f_3382(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_3317)
+static void C_ccall f_3317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f10967)
+static void C_ccall f10967(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_3299)
+static void C_ccall f_3299(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(f_3296)
+static void C_ccall f_3296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f10962)
+static void C_ccall f10962(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_3278)
+static void C_ccall f_3278(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_3230)
+static void C_ccall f_3230(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(f10957)
+static void C_ccall f10957(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_3233)
+static void C_ccall f_3233(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3236)
+static void C_ccall f_3236(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_3195)
+static void C_ccall f_3195(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3153)
+static void C_ccall f_3153(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_3050)
+static void C_ccall f_3050(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_3066)
+static void C_fcall f_3066(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3087)
+static void C_ccall f_3087(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3074)
+static void C_fcall f_3074(C_word t0,C_word t1,C_word t2,C_word t3) 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_3081)
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3053)
+static void C_ccall f_3053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3018)
+static void C_ccall f_3018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3021)
+static void C_ccall f_3021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3024)
+static void C_ccall f_3024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3027)
+static void C_ccall f_3027(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_2952)
+static void C_ccall f_2952(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_2958)
+static void C_ccall f_2958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2961)
+static void C_ccall f_2961(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_2922)
+static void C_ccall f_2922(C_word c,C_word t0,C_word t1) 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_2928)
+static void C_ccall f_2928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2900)
+static void C_ccall f_2900(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2903)
+static void C_ccall f_2903(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2873)
+static void C_ccall f_2873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2876)
+static void C_ccall f_2876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2822)
+static void C_fcall f_2822(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2832)
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2835)
+static void C_ccall f_2835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2838)
+static void C_ccall f_2838(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_2580)
+static void C_fcall f_2580(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2592)
+static void C_ccall f_2592(C_word c,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_2584)
+static void C_ccall f_2584(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_word t2) C_noret;
+C_noret_decl(f_2543)
+static void C_ccall f_2543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2545)
+static void C_fcall f_2545(C_word t0,C_word t1,C_word t2) 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_2492)
+static void C_ccall f_2492(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_2492)
+static void C_ccall f_2492r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_2498)
+static void C_fcall f_2498(C_word t0,C_word t1,C_word t2) 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(trf_9352)
+static void C_fcall trf_9352(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9352(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9352(t0,t1);}
+
+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_9521)
+static void C_fcall trf_9521(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9521(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9521(t0,t1,t2);}
+
+C_noret_decl(trf_9243)
+static void C_fcall trf_9243(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9243(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9243(t0,t1);}
+
+C_noret_decl(trf_8781)
+static void C_fcall trf_8781(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8781(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8781(t0,t1);}
+
+C_noret_decl(trf_8808)
+static void C_fcall trf_8808(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8808(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8808(t0,t1);}
+
+C_noret_decl(trf_9003)
+static void C_fcall trf_9003(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9003(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9003(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9012(t0,t1);}
+
+C_noret_decl(trf_9048)
+static void C_fcall trf_9048(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9048(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9048(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8753(t0,t1);}
+
+C_noret_decl(trf_7944)
+static void C_fcall trf_7944(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7944(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7944(t0,t1);}
+
+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_8079)
+static void C_fcall trf_8079(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8079(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8079(t0,t1);}
+
+C_noret_decl(trf_8175)
+static void C_fcall trf_8175(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8175(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8175(t0,t1);}
+
+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_8247)
+static void C_fcall trf_8247(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8247(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8247(t0,t1);}
+
+C_noret_decl(trf_8264)
+static void C_fcall trf_8264(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8264(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8264(t0,t1);}
+
+C_noret_decl(trf_8281)
+static void C_fcall trf_8281(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8281(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8281(t0,t1);}
+
+C_noret_decl(trf_8320)
+static void C_fcall trf_8320(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8320(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8320(t0,t1);}
+
+C_noret_decl(trf_8337)
+static void C_fcall trf_8337(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8337(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8337(t0,t1);}
+
+C_noret_decl(trf_8354)
+static void C_fcall trf_8354(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8354(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8354(t0,t1);}
+
+C_noret_decl(trf_8371)
+static void C_fcall trf_8371(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8371(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8371(t0,t1);}
+
+C_noret_decl(trf_8388)
+static void C_fcall trf_8388(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8388(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8388(t0,t1);}
+
+C_noret_decl(trf_8405)
+static void C_fcall trf_8405(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8405(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8405(t0,t1);}
+
+C_noret_decl(trf_8422)
+static void C_fcall trf_8422(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8422(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8422(t0,t1);}
+
+C_noret_decl(trf_8451)
+static void C_fcall trf_8451(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8451(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8451(t0,t1,t2);}
+
+C_noret_decl(trf_8461)
+static void C_fcall trf_8461(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8461(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8461(t0,t1);}
+
+C_noret_decl(trf_8206)
+static void C_fcall trf_8206(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8206(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8206(t0,t1,t2);}
+
+C_noret_decl(trf_7874)
+static void C_fcall trf_7874(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7874(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7874(t0,t1,t2);}
+
+C_noret_decl(trf_7869)
+static void C_fcall trf_7869(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7869(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7869(t0,t1);}
+
+C_noret_decl(trf_7314)
+static void C_fcall trf_7314(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7314(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7314(t0,t1,t2);}
+
+C_noret_decl(trf_7322)
+static void C_fcall trf_7322(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7322(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7322(t0,t1,t2);}
+
+C_noret_decl(trf_7735)
+static void C_fcall trf_7735(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7735(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_7735(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7353)
+static void C_fcall trf_7353(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7353(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7353(t0,t1);}
+
+C_noret_decl(trf_7362)
+static void C_fcall trf_7362(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7362(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7362(t0,t1);}
+
+C_noret_decl(trf_7374)
+static void C_fcall trf_7374(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7374(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7374(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7386(t0,t1);}
+
+C_noret_decl(trf_7431)
+static void C_fcall trf_7431(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7431(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7431(t0,t1);}
+
+C_noret_decl(trf_7396)
+static void C_fcall trf_7396(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7396(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7396(t0,t1,t2);}
+
+C_noret_decl(trf_7000)
+static void C_fcall trf_7000(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7000(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7000(t0,t1,t2);}
+
+C_noret_decl(trf_7008)
+static void C_fcall trf_7008(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7008(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7008(t0,t1,t2);}
+
+C_noret_decl(trf_7174)
+static void C_fcall trf_7174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7174(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_7174(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_7181)
+static void C_fcall trf_7181(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7181(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7181(t0,t1);}
+
+C_noret_decl(trf_6960)
+static void C_fcall trf_6960(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6960(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6960(t0,t1,t2);}
+
+C_noret_decl(trf_6909)
+static void C_fcall trf_6909(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6909(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6909(t0,t1,t2);}
+
+C_noret_decl(trf_6788)
+static void C_fcall trf_6788(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6788(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6788(t0,t1,t2);}
+
+C_noret_decl(trf_6817)
+static void C_fcall trf_6817(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6817(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6817(t0,t1);}
+
+C_noret_decl(trf_6720)
+static void C_fcall trf_6720(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6720(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6720(t0,t1,t2);}
+
+C_noret_decl(trf_5900)
+static void C_fcall trf_5900(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5900(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5900(t0,t1);}
+
+C_noret_decl(trf_5906)
+static void C_fcall trf_5906(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5906(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5906(t0,t1,t2);}
+
+C_noret_decl(trf_5914)
+static void C_fcall trf_5914(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5914(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5914(t0,t1,t2);}
+
+C_noret_decl(trf_5936)
+static void C_fcall trf_5936(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5936(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5936(t0,t1);}
+
+C_noret_decl(trf_6554)
+static void C_fcall trf_6554(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6554(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6554(t0,t1);}
+
+C_noret_decl(trf_6002)
+static void C_fcall trf_6002(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6002(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6002(t0,t1);}
+
+C_noret_decl(trf_6514)
+static void C_fcall trf_6514(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6514(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6514(t0,t1);}
+
+C_noret_decl(trf_6516)
+static void C_fcall trf_6516(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6516(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_6516(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6459)
+static void C_fcall trf_6459(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6459(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6459(t0,t1);}
+
+C_noret_decl(trf_6423)
+static void C_fcall trf_6423(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6423(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6423(t0,t1);}
+
+C_noret_decl(trf_6390)
+static void C_fcall trf_6390(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6390(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6390(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6344(t0,t1);}
+
+C_noret_decl(trf_6034)
+static void C_fcall trf_6034(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6034(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6034(t0,t1);}
+
+C_noret_decl(trf_6094)
+static void C_fcall trf_6094(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6094(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_6094(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5888)
+static void C_fcall trf_5888(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5888(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_5888(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5811)
+static void C_fcall trf_5811(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5811(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5811(t0,t1,t2);}
+
+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 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_5826(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5842)
+static void C_fcall trf_5842(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5842(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5842(t0,t1);}
+
+C_noret_decl(trf_5669)
+static void C_fcall trf_5669(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5669(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_5669(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5676)
+static void C_fcall trf_5676(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5676(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5676(t0,t1);}
+
+C_noret_decl(trf_5765)
+static void C_fcall trf_5765(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5765(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5765(t0,t1);}
+
+C_noret_decl(trf_5475)
+static void C_fcall trf_5475(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5475(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5475(t0,t1,t2);}
+
+C_noret_decl(trf_5638)
+static void C_fcall trf_5638(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5638(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_5638(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5552)
+static void C_fcall trf_5552(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5552(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5552(t0,t1,t2);}
+
+C_noret_decl(trf_5420)
+static void C_fcall trf_5420(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5420(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5420(t0,t1);}
+
+C_noret_decl(trf_5426)
+static void C_fcall trf_5426(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5426(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_5426(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5090)
+static void C_fcall trf_5090(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5090(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5090(t0,t1);}
+
+C_noret_decl(trf_5279)
+static void C_fcall trf_5279(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5279(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5279(t0,t1,t2);}
+
+C_noret_decl(trf_5287)
+static void C_fcall trf_5287(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5287(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5287(t0,t1,t2);}
+
+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_5309)
+static void C_fcall trf_5309(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5309(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5309(t0,t1);}
+
+C_noret_decl(trf_5355)
+static void C_fcall trf_5355(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5355(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5355(t0,t1);}
+
+C_noret_decl(trf_5228)
+static void C_fcall trf_5228(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5228(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5228(t0,t1,t2);}
+
+C_noret_decl(trf_5236)
+static void C_fcall trf_5236(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5236(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5236(t0,t1,t2);}
+
+C_noret_decl(trf_5129)
+static void C_fcall trf_5129(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5129(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5129(t0,t1,t2);}
+
+C_noret_decl(trf_5093)
+static void C_fcall trf_5093(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5093(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5093(t0,t1);}
+
+C_noret_decl(trf_5106)
+static void C_fcall trf_5106(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5106(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_5106(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4750)
+static void C_fcall trf_4750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4750(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4750(t0,t1);}
+
+C_noret_decl(trf_4823)
+static void C_fcall trf_4823(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4823(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4823(t0,t1,t2);}
+
+C_noret_decl(trf_4831)
+static void C_fcall trf_4831(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4831(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4831(t0,t1,t2);}
+
+C_noret_decl(trf_4841)
+static void C_fcall trf_4841(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4841(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4841(t0,t1);}
+
+C_noret_decl(trf_4862)
+static void C_fcall trf_4862(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4862(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4862(t0,t1);}
+
+C_noret_decl(trf_5008)
+static void C_fcall trf_5008(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5008(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5008(t0,t1,t2);}
+
+C_noret_decl(trf_5016)
+static void C_fcall trf_5016(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5016(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5016(t0,t1,t2);}
+
+C_noret_decl(trf_4927)
+static void C_fcall trf_4927(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4927(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4927(t0,t1);}
+
+C_noret_decl(trf_4762)
+static void C_fcall trf_4762(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4762(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4762(t0,t1,t2);}
+
+C_noret_decl(trf_4786)
+static void C_fcall trf_4786(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4786(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4786(t0,t1,t2);}
+
+C_noret_decl(trf_4579)
+static void C_fcall trf_4579(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4579(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4579(t0,t1);}
+
+C_noret_decl(trf_4722)
+static void C_fcall trf_4722(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4722(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4722(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 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_4600(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4669)
+static void C_fcall trf_4669(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4669(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4669(t0,t1,t2);}
+
+C_noret_decl(trf_4642)
+static void C_fcall trf_4642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4642(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4642(t0,t1,t2);}
+
+C_noret_decl(trf_4410)
+static void C_fcall trf_4410(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4410(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4410(t0,t1);}
+
+C_noret_decl(trf_4483)
+static void C_fcall trf_4483(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4483(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4483(t0,t1,t2);}
+
+C_noret_decl(trf_4413)
+static void C_fcall trf_4413(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4413(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4413(t0,t1);}
+
+C_noret_decl(trf_2622)
+static void C_fcall trf_2622(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2622(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_2622(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_4378)
+static void C_fcall trf_4378(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4378(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_4378(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2625)
+static void C_fcall trf_2625(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2625(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_2625(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4279)
+static void C_fcall trf_4279(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4279(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_4279(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3869)
+static void C_fcall trf_3869(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3869(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_3869(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3877)
+static void C_fcall trf_3877(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3877(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_3877(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3827)
+static void C_fcall trf_3827(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3827(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_3827(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3353)
+static void C_fcall trf_3353(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3353(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3353(t0,t1);}
+
+C_noret_decl(trf_3359)
+static void C_fcall trf_3359(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3359(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3359(t0,t1);}
+
+C_noret_decl(trf_3569)
+static void C_fcall trf_3569(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3569(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3569(t0,t1);}
+
+C_noret_decl(trf_3679)
+static void C_fcall trf_3679(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3679(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3679(t0,t1);}
+
+C_noret_decl(trf_3470)
+static void C_fcall trf_3470(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3470(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_3470(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3478)
+static void C_fcall trf_3478(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3478(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_3478(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3428)
+static void C_fcall trf_3428(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3428(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_3428(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3066)
+static void C_fcall trf_3066(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3066(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_3066(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3074)
+static void C_fcall trf_3074(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3074(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_3074(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2822)
+static void C_fcall trf_2822(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2822(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_2822(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_2580)
+static void C_fcall trf_2580(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2580(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2580(t0,t1,t2);}
+
+C_noret_decl(trf_2545)
+static void C_fcall trf_2545(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2545(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2545(t0,t1,t2);}
+
+C_noret_decl(trf_2498)
+static void C_fcall trf_2498(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2498(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2498(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(2452)){
+C_save(t1);
+C_rereclaim2(2452*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,853);
+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],8,"\004coreref");
+lf[37]=C_decode_literal(C_heaptop,"\376B\000\000\002)[");
+lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
+lf[39]=C_h_intern(&lf[39],10,"\004coreunbox");
+lf[40]=C_decode_literal(C_heaptop,"\376B\000\000\004)[1]");
+lf[41]=C_decode_literal(C_heaptop,"\376B\000\000\012((C_word*)");
+lf[42]=C_h_intern(&lf[42],13,"\004coreupdate_i");
+lf[43]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
+lf[44]=C_h_intern(&lf[44],11,"\004coreupdate");
+lf[45]=C_decode_literal(C_heaptop,"\376B\000\000\002)+");
+lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[47]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
+lf[48]=C_h_intern(&lf[48],16,"\004coreupdatebox_i");
+lf[49]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
+lf[50]=C_decode_literal(C_heaptop,"\376B\000\000\021C_set_block_item(");
+lf[51]=C_h_intern(&lf[51],14,"\004coreupdatebox");
+lf[52]=C_decode_literal(C_heaptop,"\376B\000\000\004)+1,");
+lf[53]=C_decode_literal(C_heaptop,"\376B\000\000\024C_mutate(((C_word *)");
+lf[54]=C_h_intern(&lf[54],12,"\004coreclosure");
+lf[55]=C_decode_literal(C_heaptop,"\376B\000\000\021tmp=(C_word)a,a+=");
+lf[56]=C_decode_literal(C_heaptop,"\376B\000\000\005,tmp)");
+lf[57]=C_decode_literal(C_heaptop,"\376B\000\000\002a[");
+lf[58]=C_decode_literal(C_heaptop,"\376B\000\000\002]=");
+lf[59]=C_h_intern(&lf[59],4,"iota");
+lf[60]=C_decode_literal(C_heaptop,"\376B\000\000\023(*a=C_CLOSURE_TYPE|");
+lf[61]=C_h_intern(&lf[61],8,"\004corebox");
+lf[62]=C_decode_literal(C_heaptop,"\376B\000\000\030,tmp=(C_word)a,a+=2,tmp)");
+lf[63]=C_decode_literal(C_heaptop,"\376B\000\000\031(*a=C_VECTOR_TYPE|1,a[1]=");
+lf[64]=C_h_intern(&lf[64],10,"\004corelocal");
+lf[65]=C_h_intern(&lf[65],13,"\004coresetlocal");
+lf[66]=C_h_intern(&lf[66],11,"\004coreglobal");
+lf[67]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[68]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[69]=C_decode_literal(C_heaptop,"\376B\000\000\017C_retrieve2(lf[");
+lf[70]=C_decode_literal(C_heaptop,"\376B\000\000\002],");
+lf[71]=C_h_intern(&lf[71],21,"\010compilerc-ify-string");
+lf[72]=C_h_intern(&lf[72],14,"symbol->string");
+lf[73]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[74]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[75]=C_decode_literal(C_heaptop,"\376B\000\000\016C_retrieve(lf[");
+lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
+lf[77]=C_h_intern(&lf[77],14,"\004coresetglobal");
+lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\012 /* (set! ");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\011 ...) */,");
+lf[80]=C_h_intern(&lf[80],17,"string-translate*");
+lf[81]=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[82]=C_h_intern(&lf[82],8,"->string");
+lf[83]=C_decode_literal(C_heaptop,"\376B\000\000\015C_mutate(&lf[");
+lf[84]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[85]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mutate((C_word*)lf[");
+lf[86]=C_decode_literal(C_heaptop,"\376B\000\000\003]+1");
+lf[87]=C_h_intern(&lf[87],16,"\004coresetglobal_i");
+lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[89]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
+lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\005 */ =");
+lf[91]=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[92]=C_decode_literal(C_heaptop,"\376B\000\000\024C_set_block_item(lf[");
+lf[93]=C_decode_literal(C_heaptop,"\376B\000\000\005] /* ");
+lf[94]=C_decode_literal(C_heaptop,"\376B\000\000\006 */,0,");
+lf[95]=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[96]=C_h_intern(&lf[96],14,"\004coreundefined");
+lf[97]=C_decode_literal(C_heaptop,"\376B\000\000\022C_SCHEME_UNDEFINED");
+lf[98]=C_h_intern(&lf[98],9,"\004corecall");
+lf[99]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[100]=C_decode_literal(C_heaptop,"\376B\000\000\003,0,");
+lf[101]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
+lf[102]=C_decode_literal(C_heaptop,"\376B\000\000\002c=");
+lf[103]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
+lf[104]=C_h_intern(&lf[104],26,"lambda-literal-temporaries");
+lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[106]=C_h_intern(&lf[106],22,"lambda-literal-looping");
+lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[108]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
+lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[111]=C_decode_literal(C_heaptop,"\376B\000\000\030C_retrieve2_symbol_proc(");
+lf[112]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[113]=C_h_intern(&lf[113],13,"string-append");
+lf[114]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[115]=C_decode_literal(C_heaptop,"\376B\000\000\001]");
+lf[116]=C_decode_literal(C_heaptop,"\376B\000\000\020C_retrieve_proc(");
+lf[117]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[118]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[119]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[120]=C_decode_literal(C_heaptop,"\376B\000\000\032C_retrieve_symbol_proc(lf[");
+lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\002])");
+lf[122]=C_decode_literal(C_heaptop,"\376B\000\000\016*((C_word*)lf[");
+lf[123]=C_decode_literal(C_heaptop,"\376B\000\000\004]+1)");
+lf[124]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
+lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[126]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[127]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[128]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
+lf[129]=C_h_intern(&lf[129],6,"unsafe");
+lf[130]=C_decode_literal(C_heaptop,"\376B\000\000\024(void*)(*((C_word*)t");
+lf[131]=C_decode_literal(C_heaptop,"\376B\000\000\004+1))");
+lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\021C_retrieve_proc(t");
+lf[133]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[134]=C_h_intern(&lf[134],28,"\010compilerno-procedure-checks");
+lf[135]=C_decode_literal(C_heaptop,"\376B\000\000\010((C_proc");
+lf[136]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[137]=C_h_intern(&lf[137],24,"\010compileremit-trace-info");
+lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\011C_trace(\042");
+lf[139]=C_decode_literal(C_heaptop,"\376B\000\000\003\042);");
+lf[140]=C_h_intern(&lf[140],16,"string-translate");
+lf[141]=C_decode_literal(C_heaptop,"\376B\000\000\001\134");
+lf[142]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[143]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
+lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[145]=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[146]=C_h_intern(&lf[146],27,"lambda-literal-closure-size");
+lf[147]=C_h_intern(&lf[147],28,"\010compilersource-info->string");
+lf[148]=C_h_intern(&lf[148],12,"\004corerecurse");
+lf[149]=C_decode_literal(C_heaptop,"\376B\000\000\012goto loop;");
+lf[150]=C_decode_literal(C_heaptop,"\376B\000\000\002=t");
+lf[151]=C_decode_literal(C_heaptop,"\376B\000\000\003t0,");
+lf[152]=C_h_intern(&lf[152],16,"\004coredirect_call");
+lf[153]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i(&a,");
+lf[154]=C_h_intern(&lf[154],13,"\004corecallunit");
+lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[156]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel(");
+lf[158]=C_decode_literal(C_heaptop,"\376B\000\000\024,C_SCHEME_UNDEFINED,");
+lf[159]=C_h_intern(&lf[159],11,"\004corereturn");
+lf[160]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\007return(");
+lf[162]=C_h_intern(&lf[162],11,"\004coreinline");
+lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\010(C_word)");
+lf[164]=C_h_intern(&lf[164],20,"\004coreinline_allocate");
+lf[165]=C_decode_literal(C_heaptop,"\376B\000\000\010(C_word)");
+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],11,"\004coreswitch");
+lf[189]=C_decode_literal(C_heaptop,"\376B\000\000\010default:");
+lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\005case ");
+lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[192]=C_decode_literal(C_heaptop,"\376B\000\000\007switch(");
+lf[193]=C_h_intern(&lf[193],9,"\004corecond");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\002)\077");
+lf[195]=C_decode_literal(C_heaptop,"\376B\000\000\011(C_truep(");
+lf[196]=C_decode_literal(C_heaptop,"\376B\000\000\010bad form");
+lf[197]=C_h_intern(&lf[197],13,"pair-for-each");
+lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[199]=C_h_intern(&lf[199],30,"\010compilerexternal-protos-first");
+lf[200]=C_h_intern(&lf[200],50,"\010compilergenerate-foreign-callback-stub-prototypes");
+lf[201]=C_h_intern(&lf[201],22,"foreign-callback-stubs");
+lf[202]=C_h_intern(&lf[202],29,"\010compilerforeign-declarations");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\002*/");
+lf[204]=C_decode_literal(C_heaptop,"\376B\000\000\012#include \042");
+lf[205]=C_h_intern(&lf[205],28,"\010compilertarget-include-file");
+lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\001\042");
+lf[207]=C_h_intern(&lf[207],18,"\010compilerunit-name");
+lf[208]=C_decode_literal(C_heaptop,"\376B\000\000\011 unit: ");
+lf[209]=C_h_intern(&lf[209],19,"\010compilerused-units");
+lf[210]=C_decode_literal(C_heaptop,"\376B\000\000\017 used units: ");
+lf[211]=C_h_intern(&lf[211],27,"\010compilercompiler-arguments");
+lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\022/* Generated from ");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\030 by the CHICKEN compiler");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\0000 http://www.call-with-current-continuation.org");
+lf[215]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
+lf[216]=C_decode_literal(C_heaptop,"\376B\000\000\021 command line: ");
+lf[217]=C_h_intern(&lf[217],18,"string-intersperse");
+lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\003 ");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[221]=C_h_intern(&lf[221],7,"\003sysmap");
+lf[222]=C_h_intern(&lf[222],12,"string-split");
+lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[224]=C_h_intern(&lf[224],15,"chicken-version");
+lf[225]=C_h_intern(&lf[225],18,"\003sysdecode-seconds");
+lf[226]=C_h_intern(&lf[226],15,"current-seconds");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\002};");
+lf[228]=C_decode_literal(C_heaptop,"\376B\000\000\002,0");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_char C_TLS li");
+lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\026[] C_aligned={C_lihdr(");
+lf[231]=C_h_intern(&lf[231],23,"\003syslambda-info->string");
+lf[232]=C_decode_literal(C_heaptop,"\376B\000\000)static double C_possibly_force_alignment;");
+lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\027static C_TLS C_word lf[");
+lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\002];");
+lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
+lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\012_toplevel)");
+lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\036C_externimport void C_ccall C_");
+lf[238]=C_decode_literal(C_heaptop,"\376B\000\000._toplevel(C_word c,C_word d,C_word k) C_noret;");
+lf[239]=C_decode_literal(C_heaptop,"\376B\000\000+static C_PTABLE_ENTRY *create_ptable(void);");
+lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[241]=C_h_intern(&lf[241],9,"make-list");
+lf[242]=C_decode_literal(C_heaptop,"\376B\000\000\007,C_word");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\025typedef void (*C_proc");
+lf[244]=C_decode_literal(C_heaptop,"\376B\000\000\010)(C_word");
+lf[245]=C_h_intern(&lf[245],4,"none");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
+lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[248]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[250]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[252]=C_decode_literal(C_heaptop,"\376B\000\000\016,...) C_noret;");
+lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\010 C_noret");
+lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
+lf[256]=C_h_intern(&lf[256],8,"toplevel");
+lf[257]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\034C_externexport void C_ccall ");
+lf[259]=C_h_intern(&lf[259],27,"\010compileremit-unsafe-marker");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\0001C_externexport void C_dynamic_and_unsafe(void) {}");
+lf[261]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(C_");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
+lf[265]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
+lf[267]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
+lf[269]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[271]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[272]=C_h_intern(&lf[272],21,"small-parameter-limit");
+lf[273]=C_h_intern(&lf[273],11,"lset-adjoin");
+lf[274]=C_h_intern(&lf[274],1,"=");
+lf[275]=C_h_intern(&lf[275],32,"lambda-literal-callee-signatures");
+lf[276]=C_h_intern(&lf[276],24,"lambda-literal-allocated");
+lf[277]=C_h_intern(&lf[277],21,"lambda-literal-direct");
+lf[278]=C_h_intern(&lf[278],33,"lambda-literal-rest-argument-mode");
+lf[279]=C_h_intern(&lf[279],28,"lambda-literal-rest-argument");
+lf[280]=C_h_intern(&lf[280],27,"\010compilermake-variable-list");
+lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[282]=C_h_intern(&lf[282],27,"lambda-literal-customizable");
+lf[283]=C_h_intern(&lf[283],29,"lambda-literal-argument-count");
+lf[284]=C_decode_literal(C_heaptop,"\376B\000\000\020C_adjust_stack(-");
+lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\010=C_pick(");
+lf[288]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[289]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[290]=C_h_intern(&lf[290],27,"\010compilermake-argument-list");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
+lf[293]=C_decode_literal(C_heaptop,"\376B\000\000\006(a,n);");
+lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\007_vector");
+lf[295]=C_decode_literal(C_heaptop,"\376B\000\000\017=C_restore_rest");
+lf[296]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n+1);");
+lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\017a=C_alloc(n*3);");
+lf[298]=C_decode_literal(C_heaptop,"\376B\000\000\022n=C_rest_count(0);");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[300]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
+lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\006int n;");
+lf[302]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word *a,t");
+lf[303]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
+lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[307]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[309]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[311]=C_h_intern(&lf[311],12,"\003sysfor-each");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\004(k)(");
+lf[315]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[316]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[317]=C_decode_literal(C_heaptop,"\376B\000\000\004 k){");
+lf[318]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[320]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[321]=C_decode_literal(C_heaptop,"\376B\000\000\007(C_proc");
+lf[322]=C_decode_literal(C_heaptop,"\376B\000\000\026 k) C_regparm C_noret;");
+lf[323]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[325]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static void C_fcall tr");
+lf[326]=C_decode_literal(C_heaptop,"\376B\000\000\016(void *dummy){");
+lf[327]=C_decode_literal(C_heaptop,"\376B\000\000\017C_noret_decl(tr");
+lf[328]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[329]=C_decode_literal(C_heaptop,"\376B\000\000\026static void C_fcall tr");
+lf[330]=C_decode_literal(C_heaptop,"\376B\000\000 (void *dummy) C_regparm C_noret;");
+lf[331]=C_h_intern(&lf[331],6,"vector");
+lf[332]=C_h_intern(&lf[332],23,"lambda-literal-external");
+lf[333]=C_h_intern(&lf[333],17,"get-output-string");
+lf[334]=C_h_intern(&lf[334],19,"\003syswrite-char/port");
+lf[335]=C_h_intern(&lf[335],5,"write");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\003lf[");
+lf[337]=C_h_intern(&lf[337],18,"open-output-string");
+lf[338]=C_h_intern(&lf[338],25,"\010compilerwords-per-flonum");
+lf[339]=C_h_intern(&lf[339],6,"reduce");
+lf[340]=C_h_intern(&lf[340],1,"+");
+lf[341]=C_h_intern(&lf[341],12,"vector->list");
+lf[342]=C_decode_literal(C_heaptop,"\376B\000\000\035type of literal not supported");
+lf[343]=C_h_intern(&lf[343],14,"\010compilerwords");
+lf[344]=C_h_intern(&lf[344],15,"\003sysbytevector\077");
+lf[345]=C_h_intern(&lf[345],32,"\010compilerblock-variable-literal\077");
+lf[346]=C_h_intern(&lf[346],19,"\010compilerimmediate\077");
+lf[347]=C_decode_literal(C_heaptop,"\376B\000\000\007=C_fix(");
+lf[348]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[349]=C_h_intern(&lf[349],19,"\003sysundefined-value");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000\024=C_SCHEME_UNDEFINED;");
+lf[351]=C_decode_literal(C_heaptop,"\376B\000\000\015C_SCHEME_TRUE");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\000\016C_SCHEME_FALSE");
+lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\022=C_make_character(");
+lf[354]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[355]=C_decode_literal(C_heaptop,"\376B\000\000\014C_h_intern(&");
+lf[356]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\001=");
+lf[358]=C_decode_literal(C_heaptop,"\376B\000\000\026=C_SCHEME_END_OF_LIST;");
+lf[359]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[360]=C_h_intern(&lf[360],23,"\010compilerencode-literal");
+lf[361]=C_decode_literal(C_heaptop,"\376B\000\000\034=C_decode_literal(C_heaptop,");
+lf[362]=C_h_intern(&lf[362],20,"\010compilerbig-fixnum\077");
+lf[363]=C_h_intern(&lf[363],6,"modulo");
+lf[364]=C_h_intern(&lf[364],3,"fx/");
+lf[365]=C_h_intern(&lf[365],14,"\003syscopy-bytes");
+lf[366]=C_h_intern(&lf[366],11,"make-string");
+lf[367]=C_h_intern(&lf[367],19,"lambda-literal-body");
+lf[368]=C_decode_literal(C_heaptop,"\376B\000\000\022C_word *a=C_alloc(");
+lf[369]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[370]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[371]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
+lf[372]=C_decode_literal(C_heaptop,"\376B\000\000\011,C_word t");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[375]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\002,t");
+lf[377]=C_decode_literal(C_heaptop,"\376B\000\000\004);}}");
+lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[379]=C_decode_literal(C_heaptop,"\376B\000\000\002r(");
+lf[380]=C_h_intern(&lf[380],4,"list");
+lf[381]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000#=C_restore_rest(a,C_rest_count(0));");
+lf[383]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[384]=C_decode_literal(C_heaptop,"\376B\000\000*=C_restore_rest_vector(a,C_rest_count(0));");
+lf[385]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[386]=C_decode_literal(C_heaptop,"\376B\000\000\005else{");
+lf[387]=C_decode_literal(C_heaptop,"\376B\000\000\015a=C_alloc((c-");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\005)*3);");
+lf[389]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\001r");
+lf[391]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
+lf[393]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
+lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\003);}");
+lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\005,NULL");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[397]=C_decode_literal(C_heaptop,"\376B\000\000\022C_save_and_reclaim");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\012((void*)tr");
+lf[399]=C_decode_literal(C_heaptop,"\376B\000\000\011C_reclaim");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\022C_register_lf2(lf,");
+lf[401]=C_decode_literal(C_heaptop,"\376B\000\000\022,create_ptable());");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\023C_initialize_lf(lf,");
+lf[403]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
+lf[405]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\017if(!C_demand_2(");
+lf[407]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
+lf[409]=C_decode_literal(C_heaptop,"\376B\000\000\015C_rereclaim2(");
+lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\024*sizeof(C_word), 1);");
+lf[411]=C_decode_literal(C_heaptop,"\376B\000\000\016t1=C_restore;}");
+lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\030C_check_nursery_minimum(");
+lf[413]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\015if(!C_demand(");
+lf[415]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\013C_save(t1);");
+lf[417]=C_decode_literal(C_heaptop,"\376B\000\000,C_reclaim((void*)toplevel_trampoline,NULL);}");
+lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\027toplevel_initialized=1;");
+lf[419]=C_h_intern(&lf[419],26,"\010compilertarget-stack-size");
+lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\017C_resize_stack(");
+lf[421]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[422]=C_h_intern(&lf[422],30,"\010compilertarget-heap-shrinkage");
+lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\021C_heap_shrinkage=");
+lf[424]=C_h_intern(&lf[424],27,"\010compilertarget-heap-growth");
+lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\016C_heap_growth=");
+lf[426]=C_h_intern(&lf[426],33,"\010compilertarget-initial-heap-size");
+lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
+lf[428]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
+lf[429]=C_h_intern(&lf[429],25,"\010compilertarget-heap-size");
+lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\032C_set_or_change_heap_size(");
+lf[431]=C_decode_literal(C_heaptop,"\376B\000\000\004,1);");
+lf[432]=C_decode_literal(C_heaptop,"\376B\000\000\027C_heap_size_is_fixed=1;");
+lf[433]=C_h_intern(&lf[433],40,"\010compilerdisable-stack-overflow-checking");
+lf[434]=C_decode_literal(C_heaptop,"\376B\000\000\033C_disable_overflow_check=1;");
+lf[435]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[436]=C_decode_literal(C_heaptop,"\376B\000\000;if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);");
+lf[437]=C_decode_literal(C_heaptop,"\376B\000\000\036else C_toplevel_entry(C_text(\042");
+lf[438]=C_decode_literal(C_heaptop,"\376B\000\000\004\042));");
+lf[439]=C_h_intern(&lf[439],4,"fold");
+lf[440]=C_decode_literal(C_heaptop,"\376B\000\000\035if(!C_demand(c*C_SIZEOF_PAIR+");
+lf[441]=C_decode_literal(C_heaptop,"\376B\000\000\003)){");
+lf[442]=C_h_intern(&lf[442],28,"\010compilerinsert-timer-checks");
+lf[443]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
+lf[444]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
+lf[445]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
+lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[447]=C_h_intern(&lf[447],23,"\010compilerno-argc-checks");
+lf[448]=C_decode_literal(C_heaptop,"\376B\000\000\004,c2,");
+lf[449]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[450]=C_decode_literal(C_heaptop,"\376B\000\000\001c");
+lf[451]=C_decode_literal(C_heaptop,"\376B\000\000\014C_save_rest(");
+lf[452]=C_decode_literal(C_heaptop,"\376B\000\000\017C_word *a,c2=c;");
+lf[453]=C_decode_literal(C_heaptop,"\376B\000\000\012va_list v;");
+lf[454]=C_decode_literal(C_heaptop,"\376B\000\000\026if(!C_stack_probe(a)){");
+lf[455]=C_decode_literal(C_heaptop,"\376B\000\000\027if(!C_stack_probe(&a)){");
+lf[456]=C_decode_literal(C_heaptop,"\376B\000\000\026C_check_for_interrupt;");
+lf[457]=C_decode_literal(C_heaptop,"\376B\000\000\005if(c<");
+lf[458]=C_decode_literal(C_heaptop,"\376B\000\000\025) C_bad_min_argc_2(c,");
+lf[459]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\006if(c!=");
+lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\021) C_bad_argc_2(c,");
+lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\005,t0);");
+lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
+lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\012a=C_alloc(");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[467]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word ab[");
+lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\010],*a=ab;");
+lf[469]=C_decode_literal(C_heaptop,"\376B\000\000\016C_stack_check;");
+lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\005loop:");
+lf[471]=C_decode_literal(C_heaptop,"\376B\000\000\012C_word *a;");
+lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[473]=C_decode_literal(C_heaptop,"\376B\000\000\010C_word t");
+lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word tmp;");
+lf[475]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\004,...");
+lf[477]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word *a");
+lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\011C_word c,");
+lf[479]=C_decode_literal(C_heaptop,"\376B\000\000!C_noret_decl(toplevel_trampoline)");
+lf[480]=C_decode_literal(C_heaptop,"\376B\000\000Gstatic void C_fcall toplevel_trampoline(void *dummy) C_regparm C_noret;");
+lf[481]=C_decode_literal(C_heaptop,"\376B\000\000\077C_regparm static void C_fcall toplevel_trampoline(void *dummy){");
+lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[483]=C_decode_literal(C_heaptop,"\376B\000\000\042(2,C_SCHEME_UNDEFINED,C_restore);}");
+lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\017void C_ccall C_");
+lf[485]=C_decode_literal(C_heaptop,"\376B\000\000\022C_main_entry_point");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000(static C_TLS int toplevel_initialized=0;");
+lf[487]=C_decode_literal(C_heaptop,"\376B\000\000\010C_fcall ");
+lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\010C_ccall ");
+lf[489]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[490]=C_decode_literal(C_heaptop,"\376B\000\000\005void ");
+lf[491]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\003/* ");
+lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[494]=C_h_intern(&lf[494],16,"\010compilercleanup");
+lf[495]=C_h_intern(&lf[495],18,"\010compilerdebugging");
+lf[496]=C_h_intern(&lf[496],1,"o");
+lf[497]=C_decode_literal(C_heaptop,"\376B\000\000 dropping unused closure argument");
+lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[499]=C_decode_literal(C_heaptop,"\376B\000\000\010toplevel");
+lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[502]=C_h_intern(&lf[502],18,"\010compilerreal-name");
+lf[503]=C_decode_literal(C_heaptop,"\376B\000\000\021/* end of file */");
+lf[504]=C_h_intern(&lf[504],25,"emit-procedure-table-info");
+lf[505]=C_h_intern(&lf[505],31,"generate-foreign-callback-stubs");
+lf[506]=C_h_intern(&lf[506],31,"\010compilergenerate-foreign-stubs");
+lf[507]=C_h_intern(&lf[507],29,"\010compilerforeign-lambda-stubs");
+lf[508]=C_h_intern(&lf[508],36,"\010compilergenerate-external-variables");
+lf[509]=C_h_intern(&lf[509],27,"\010compilerexternal-variables");
+lf[510]=C_h_intern(&lf[510],1,"p");
+lf[511]=C_decode_literal(C_heaptop,"\376B\000\000\030code generation phase...");
+lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\001{");
+lf[513]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
+lf[514]=C_decode_literal(C_heaptop,"\376B\000\000\016return ptable;");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\005#else");
+lf[516]=C_decode_literal(C_heaptop,"\376B\000\000\014return NULL;");
+lf[517]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
+lf[518]=C_decode_literal(C_heaptop,"\376B\000\000\001}");
+lf[519]=C_decode_literal(C_heaptop,"\376B\000\000*static C_PTABLE_ENTRY *create_ptable(void)");
+lf[520]=C_decode_literal(C_heaptop,"\376B\000\000\006#endif");
+lf[521]=C_decode_literal(C_heaptop,"\376B\000\000\015{NULL,NULL}};");
+lf[522]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\013_toplevel},");
+lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\014C_toplevel},");
+lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\002},");
+lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\002{\042");
+lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\011\042,(void*)");
+lf[528]=C_h_intern(&lf[528],29,"\010compilerstring->c-identifier");
+lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\027#ifdef C_ENABLE_PTABLES");
+lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\035static C_PTABLE_ENTRY ptable[");
+lf[531]=C_decode_literal(C_heaptop,"\376B\000\000\005] = {");
+lf[532]=C_h_intern(&lf[532],11,"string-copy");
+lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\007C_word ");
+lf[534]=C_h_intern(&lf[534],13,"list-tabulate");
+lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\007static ");
+lf[537]=C_h_intern(&lf[537],41,"\010compilergenerate-foreign-callback-header");
+lf[538]=C_decode_literal(C_heaptop,"\376B\000\000\017C_externexport ");
+lf[539]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
+lf[540]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[542]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
+lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\015#undef return");
+lf[544]=C_decode_literal(C_heaptop,"\376B\000\000\006C_ret:");
+lf[545]=C_decode_literal(C_heaptop,"\376B\000\000.C_k=C_restore_callback_continuation2(C_level);");
+lf[546]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\024C_kontinue(C_k,C_r);");
+lf[548]=C_decode_literal(C_heaptop,"\376B\000\000\013return C_r;");
+lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[550]=C_h_intern(&lf[550],4,"void");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[552]=C_decode_literal(C_heaptop,"\376B\000\000\004C_r=");
+lf[553]=C_decode_literal(C_heaptop,"\376B\000\0003int C_level=C_save_callback_continuation(&C_a,C_k);");
+lf[554]=C_decode_literal(C_heaptop,"\376B\000\000\002=(");
+lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[556]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[557]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[558]=C_decode_literal(C_heaptop,"\376B\000\0002C_word C_r=C_SCHEME_UNDEFINED,*C_a=(C_word*)C_buf;");
+lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\002){");
+lf[560]=C_decode_literal(C_heaptop,"\376B\000\000\012) C_noret;");
+lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[562]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
+lf[563]=C_decode_literal(C_heaptop,"\376B\000\000\014) C_regparm;");
+lf[564]=C_decode_literal(C_heaptop,"\376B\000\000 C_regparm static C_word C_fcall ");
+lf[565]=C_decode_literal(C_heaptop,"\376B\000\000\015C_noret_decl(");
+lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[567]=C_decode_literal(C_heaptop,"\376B\000\000\024static void C_ccall ");
+lf[568]=C_decode_literal(C_heaptop,"\376B\000\000%(C_word C_c,C_word C_self,C_word C_k,");
+lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\026static C_word C_fcall ");
+lf[570]=C_decode_literal(C_heaptop,"\376B\000\000\042#define return(x) C_cblock C_r = (");
+lf[571]=C_decode_literal(C_heaptop,"\376B\000\000\036(x))); goto C_ret; C_cblockend");
+lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
+lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[574]=C_h_intern(&lf[574],21,"foreign-stub-callback");
+lf[575]=C_h_intern(&lf[575],16,"foreign-stub-cps");
+lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[577]=C_h_intern(&lf[577],27,"foreign-stub-argument-names");
+lf[578]=C_h_intern(&lf[578],17,"foreign-stub-body");
+lf[579]=C_h_intern(&lf[579],17,"foreign-stub-name");
+lf[580]=C_h_intern(&lf[580],24,"foreign-stub-return-type");
+lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\014C_word C_buf");
+lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\003C_a");
+lf[583]=C_h_intern(&lf[583],27,"foreign-stub-argument-types");
+lf[584]=C_h_intern(&lf[584],19,"\010compilerreal-name2");
+lf[585]=C_h_intern(&lf[585],15,"foreign-stub-id");
+lf[586]=C_h_intern(&lf[586],5,"float");
+lf[587]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
+lf[588]=C_h_intern(&lf[588],8,"c-string");
+lf[589]=C_decode_literal(C_heaptop,"\376B\000\000\004+2+(");
+lf[590]=C_decode_literal(C_heaptop,"\376B\000\000!==NULL\0771:C_bytestowords(C_strlen(");
+lf[591]=C_decode_literal(C_heaptop,"\376B\000\000\003)))");
+lf[592]=C_h_intern(&lf[592],16,"nonnull-c-string");
+lf[593]=C_decode_literal(C_heaptop,"\376B\000\000\033+2+C_bytestowords(C_strlen(");
+lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\002))");
+lf[595]=C_h_intern(&lf[595],3,"ref");
+lf[596]=C_decode_literal(C_heaptop,"\376B\000\000\002+3");
+lf[597]=C_h_intern(&lf[597],5,"const");
+lf[598]=C_h_intern(&lf[598],7,"pointer");
+lf[599]=C_h_intern(&lf[599],9,"c-pointer");
+lf[600]=C_h_intern(&lf[600],15,"nonnull-pointer");
+lf[601]=C_h_intern(&lf[601],17,"nonnull-c-pointer");
+lf[602]=C_h_intern(&lf[602],8,"function");
+lf[603]=C_h_intern(&lf[603],8,"instance");
+lf[604]=C_h_intern(&lf[604],16,"nonnull-instance");
+lf[605]=C_h_intern(&lf[605],12,"instance-ref");
+lf[606]=C_h_intern(&lf[606],18,"\003syshash-table-ref");
+lf[607]=C_h_intern(&lf[607],27,"\010compilerforeign-type-table");
+lf[608]=C_h_intern(&lf[608],17,"nonnull-c-string*");
+lf[609]=C_h_intern(&lf[609],25,"nonnull-unsigned-c-string");
+lf[610]=C_h_intern(&lf[610],26,"nonnull-unsigned-c-string*");
+lf[611]=C_h_intern(&lf[611],6,"symbol");
+lf[612]=C_h_intern(&lf[612],9,"c-string*");
+lf[613]=C_h_intern(&lf[613],17,"unsigned-c-string");
+lf[614]=C_h_intern(&lf[614],18,"unsigned-c-string*");
+lf[615]=C_h_intern(&lf[615],6,"double");
+lf[616]=C_h_intern(&lf[616],16,"unsigned-integer");
+lf[617]=C_h_intern(&lf[617],18,"unsigned-integer32");
+lf[618]=C_h_intern(&lf[618],4,"long");
+lf[619]=C_h_intern(&lf[619],7,"integer");
+lf[620]=C_h_intern(&lf[620],9,"integer32");
+lf[621]=C_h_intern(&lf[621],13,"unsigned-long");
+lf[622]=C_h_intern(&lf[622],6,"number");
+lf[623]=C_h_intern(&lf[623],9,"integer64");
+lf[624]=C_h_intern(&lf[624],13,"c-string-list");
+lf[625]=C_h_intern(&lf[625],14,"c-string-list*");
+lf[626]=C_h_intern(&lf[626],3,"int");
+lf[627]=C_h_intern(&lf[627],5,"int32");
+lf[628]=C_h_intern(&lf[628],5,"short");
+lf[629]=C_h_intern(&lf[629],14,"unsigned-short");
+lf[630]=C_h_intern(&lf[630],13,"scheme-object");
+lf[631]=C_h_intern(&lf[631],13,"unsigned-char");
+lf[632]=C_h_intern(&lf[632],12,"unsigned-int");
+lf[633]=C_h_intern(&lf[633],14,"unsigned-int32");
+lf[634]=C_h_intern(&lf[634],4,"byte");
+lf[635]=C_h_intern(&lf[635],13,"unsigned-byte");
+lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\002;}");
+lf[637]=C_decode_literal(C_heaptop,"\376B\000\000\033C_callback_wrapper((void *)");
+lf[638]=C_decode_literal(C_heaptop,"\376B\000\000\007return ");
+lf[639]=C_decode_literal(C_heaptop,"\376B\000\000\002x=");
+lf[640]=C_decode_literal(C_heaptop,"\376B\000\000\002);");
+lf[641]=C_decode_literal(C_heaptop,"\376B\000\000\012C_save(x);");
+lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
+lf[643]=C_decode_literal(C_heaptop,"\376B\000\000\035C_callback_adjust_stack(a,s);");
+lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\013C_word x,s=");
+lf[645]=C_decode_literal(C_heaptop,"\376B\000\000\017,*a=C_alloc(s);");
+lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[647]=C_decode_literal(C_heaptop,"\376B\000\000\010/* from ");
+lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\003 */");
+lf[649]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[651]=C_h_intern(&lf[651],36,"foreign-callback-stub-argument-types");
+lf[652]=C_h_intern(&lf[652],33,"foreign-callback-stub-return-type");
+lf[653]=C_h_intern(&lf[653],24,"foreign-callback-stub-id");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[655]=C_decode_literal(C_heaptop,"\376B\000\000\001t");
+lf[656]=C_h_intern(&lf[656],32,"foreign-callback-stub-qualifiers");
+lf[657]=C_h_intern(&lf[657],26,"foreign-callback-stub-name");
+lf[658]=C_h_intern(&lf[658],4,"quit");
+lf[659]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal foreign type `~A\047");
+lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[661]=C_decode_literal(C_heaptop,"\376B\000\000\006C_word");
+lf[662]=C_decode_literal(C_heaptop,"\376B\000\000\006C_char");
+lf[663]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned C_char");
+lf[664]=C_decode_literal(C_heaptop,"\376B\000\000\014unsigned int");
+lf[665]=C_decode_literal(C_heaptop,"\376B\000\000\005C_u32");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\003int");
+lf[667]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s32");
+lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\005C_s64");
+lf[669]=C_decode_literal(C_heaptop,"\376B\000\000\005short");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\004long");
+lf[671]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned short");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\015unsigned long");
+lf[673]=C_decode_literal(C_heaptop,"\376B\000\000\005float");
+lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\006double");
+lf[675]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
+lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\006void *");
+lf[677]=C_decode_literal(C_heaptop,"\376B\000\000\011C_char **");
+lf[678]=C_h_intern(&lf[678],11,"byte-vector");
+lf[679]=C_h_intern(&lf[679],19,"nonnull-byte-vector");
+lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[681]=C_h_intern(&lf[681],4,"blob");
+lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[683]=C_h_intern(&lf[683],9,"u16vector");
+lf[684]=C_h_intern(&lf[684],17,"nonnull-u16vector");
+lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\020unsigned short *");
+lf[686]=C_h_intern(&lf[686],8,"s8vector");
+lf[687]=C_h_intern(&lf[687],16,"nonnull-s8vector");
+lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
+lf[689]=C_h_intern(&lf[689],9,"u32vector");
+lf[690]=C_h_intern(&lf[690],17,"nonnull-u32vector");
+lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\016unsigned int *");
+lf[692]=C_h_intern(&lf[692],9,"s16vector");
+lf[693]=C_h_intern(&lf[693],17,"nonnull-s16vector");
+lf[694]=C_decode_literal(C_heaptop,"\376B\000\000\007short *");
+lf[695]=C_h_intern(&lf[695],9,"s32vector");
+lf[696]=C_h_intern(&lf[696],17,"nonnull-s32vector");
+lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\005int *");
+lf[698]=C_h_intern(&lf[698],9,"f32vector");
+lf[699]=C_h_intern(&lf[699],17,"nonnull-f32vector");
+lf[700]=C_decode_literal(C_heaptop,"\376B\000\000\007float *");
+lf[701]=C_h_intern(&lf[701],9,"f64vector");
+lf[702]=C_h_intern(&lf[702],17,"nonnull-f64vector");
+lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\010double *");
+lf[704]=C_decode_literal(C_heaptop,"\376B\000\000\006char *");
+lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\017unsigned char *");
+lf[706]=C_decode_literal(C_heaptop,"\376B\000\000\004void");
+lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[708]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\001<");
+lf[710]=C_decode_literal(C_heaptop,"\376B\000\000\002> ");
+lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[712]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[713]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[714]=C_decode_literal(C_heaptop,"\376B\000\000\006const ");
+lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\007struct ");
+lf[716]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\006union ");
+lf[718]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\005enum ");
+lf[720]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[722]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\003 (*");
+lf[724]=C_decode_literal(C_heaptop,"\376B\000\000\002)(");
+lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\001)");
+lf[726]=C_decode_literal(C_heaptop,"\376B\000\000\001,");
+lf[727]=C_h_intern(&lf[727],3,"...");
+lf[728]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
+lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[730]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[732]=C_h_intern(&lf[732],9,"\003syserror");
+lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[734]=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[735]=C_h_intern(&lf[735],4,"enum");
+lf[736]=C_h_intern(&lf[736],5,"union");
+lf[737]=C_h_intern(&lf[737],6,"struct");
+lf[738]=C_h_intern(&lf[738],8,"template");
+lf[739]=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[740]=C_h_intern(&lf[740],12,"nonnull-blob");
+lf[741]=C_h_intern(&lf[741],8,"u8vector");
+lf[742]=C_h_intern(&lf[742],16,"nonnull-u8vector");
+lf[743]=C_h_intern(&lf[743],14,"scheme-pointer");
+lf[744]=C_h_intern(&lf[744],22,"nonnull-scheme-pointer");
+lf[745]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal foreign argument type `~A\047");
+lf[746]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
+lf[747]=C_decode_literal(C_heaptop,"\376B\000\000\031C_character_code((C_word)");
+lf[748]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
+lf[749]=C_decode_literal(C_heaptop,"\376B\000\000\010C_unfix(");
+lf[750]=C_decode_literal(C_heaptop,"\376B\000\000\030(unsigned short)C_unfix(");
+lf[751]=C_decode_literal(C_heaptop,"\376B\000\000\027C_num_to_unsigned_long(");
+lf[752]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_double(");
+lf[753]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
+lf[754]=C_decode_literal(C_heaptop,"\376B\000\000\017C_num_to_int64(");
+lf[755]=C_decode_literal(C_heaptop,"\376B\000\000\016C_num_to_long(");
+lf[756]=C_decode_literal(C_heaptop,"\376B\000\000\026C_num_to_unsigned_int(");
+lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
+lf[758]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
+lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\027C_data_pointer_or_null(");
+lf[760]=C_decode_literal(C_heaptop,"\376B\000\000\017C_data_pointer(");
+lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[762]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[763]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
+lf[764]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
+lf[765]=C_decode_literal(C_heaptop,"\376B\000\000\027C_c_bytevector_or_null(");
+lf[766]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_bytevector(");
+lf[767]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_u8vector_or_null(");
+lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_u8vector(");
+lf[769]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u16vector_or_null(");
+lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u16vector(");
+lf[771]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_u32vector_or_null(");
+lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_u32vector(");
+lf[773]=C_decode_literal(C_heaptop,"\376B\000\000\025C_c_s8vector_or_null(");
+lf[774]=C_decode_literal(C_heaptop,"\376B\000\000\015C_c_s8vector(");
+lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s16vector_or_null(");
+lf[776]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s16vector(");
+lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_s32vector_or_null(");
+lf[778]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_s32vector(");
+lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f32vector_or_null(");
+lf[780]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f32vector(");
+lf[781]=C_decode_literal(C_heaptop,"\376B\000\000\026C_c_f64vector_or_null(");
+lf[782]=C_decode_literal(C_heaptop,"\376B\000\000\016C_c_f64vector(");
+lf[783]=C_decode_literal(C_heaptop,"\376B\000\000\021C_string_or_null(");
+lf[784]=C_decode_literal(C_heaptop,"\376B\000\000\013C_c_string(");
+lf[785]=C_decode_literal(C_heaptop,"\376B\000\000\010C_truep(");
+lf[786]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[787]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[788]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[789]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[790]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[791]=C_decode_literal(C_heaptop,"\376B\000\000\017C_c_pointer_nn(");
+lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\024C_c_pointer_or_null(");
+lf[793]=C_decode_literal(C_heaptop,"\376B\000\000\015C_num_to_int(");
+lf[794]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
+lf[795]=C_decode_literal(C_heaptop,"\376B\000\000\020)C_c_pointer_nn(");
+lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\001*");
+lf[797]=C_decode_literal(C_heaptop,"\376B\000\000\002*(");
+lf[798]=C_decode_literal(C_heaptop,"\376B\000\000\021*)C_c_pointer_nn(");
+lf[799]=C_decode_literal(C_heaptop,"\376B\000\000 illegal foreign return type `~A\047");
+lf[800]=C_decode_literal(C_heaptop,"\376B\000\000\031C_make_character((C_word)");
+lf[801]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fix((C_word)");
+lf[802]=C_decode_literal(C_heaptop,"\376B\000\000%C_fix(C_MOST_POSITIVE_FIXNUM&(C_word)");
+lf[803]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fix((short)");
+lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\025C_fix(0xffff&(C_word)");
+lf[805]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fix((char)");
+lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fix(0xff&(C_word)");
+lf[807]=C_decode_literal(C_heaptop,"\376B\000\000\012C_flonum(&");
+lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\012C_number(&");
+lf[809]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[810]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[811]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[812]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[813]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
+lf[814]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_double_to_num(&");
+lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\027C_unsigned_int_to_num(&");
+lf[816]=C_decode_literal(C_heaptop,"\376B\000\000\017C_long_to_num(&");
+lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\030C_unsigned_long_to_num(&");
+lf[818]=C_decode_literal(C_heaptop,"\376B\000\000\012C_mk_bool(");
+lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\011((C_word)");
+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\011,(void*)&");
+lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[825]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[826]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[828]=C_decode_literal(C_heaptop,"\376B\000\000\011,(void*)&");
+lf[829]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[831]=C_decode_literal(C_heaptop,"\376B\000\000\025C_mpointer_or_false(&");
+lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\010,(void*)");
+lf[833]=C_decode_literal(C_heaptop,"\376B\000\000\014C_mpointer(&");
+lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\016C_int_to_num(&");
+lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\001");
+lf[836]=C_decode_literal(C_heaptop,"\376B\000\000\003\377\006\000");
+lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\012");
+lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\016");
+lf[839]=C_decode_literal(C_heaptop,"\376B\000\000\002\377>");
+lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\036");
+lf[841]=C_decode_literal(C_heaptop,"\376B\000\000\002\377U");
+lf[842]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
+lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\002\377\001");
+lf[844]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
+lf[845]=C_decode_literal(C_heaptop,"\376B\000\000\001\000");
+lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\001\001");
+lf[847]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid literal - cannot encode");
+lf[848]=C_h_intern(&lf[848],17,"\003sysstring-append");
+lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[850]=C_h_intern(&lf[850],5,"cons*");
+lf[851]=C_h_intern(&lf[851],6,"random");
+lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+C_register_lf2(lf,853,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2486,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k2484 */
+static void C_ccall f_2486(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2489,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k2487 in k2484 */
+static void C_ccall f_2489(C_word c,C_word t0,C_word 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_2489,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_2492,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_2535,tmp=(C_word)a,a+=2,tmp));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2575,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10148,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("open-output-string");
+((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t6);}
+
+/* k10146 in k2487 in k2484 */
+static void C_ccall f_10148(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_10148,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10151,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[852],t1);}
+
+/* k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10151(C_word c,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_10151,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10154,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_10174,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_10178,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 57 random");
+((C_proc3)C_retrieve_symbol_proc(lf[851]))(3,*((C_word*)lf[851]+1),t4,C_fix(16777216));}
+
+/* k10176 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10178(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));}
+
+/* k10172 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10174(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]);}
+
+/* k10152 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10154(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_10154,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10157,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(95),((C_word*)t0)[2]);}
+
+/* k10155 in k10152 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10157(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_10157,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10160,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_10170,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[226]))(2,*((C_word*)lf[226]+1),t3);}
+
+/* k10168 in k10155 in k10152 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10170(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]);}
+
+/* k10158 in k10155 in k10152 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10160(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_10160,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10163,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(95),((C_word*)t0)[2]);}
+
+/* k10161 in k10158 in k10155 in k10152 in k10149 in k10146 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10163,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10166,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[333]))(3,*((C_word*)lf[333]+1),t2,((C_word*)t0)[2]);}
+
+/* k10164 in k10161 in k10158 in k10155 in k10152 in k10149 in k10146 in k2487 in k2484 */
+static void C_ccall f_10166(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[528]))(3,*((C_word*)lf[528]+1),((C_word*)t0)[2],t1);}
+
+/* k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_2575,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_2577,tmp=(C_word)a,a+=2,tmp));
+t4=C_mutate((C_word*)lf[504]+1 /* (set! emit-procedure-table-info ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6702,tmp=(C_word)a,a+=2,tmp));
+t5=C_mutate((C_word*)lf[494]+1 /* (set! cleanup ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6779,tmp=(C_word)a,a+=2,tmp));
+t6=C_mutate((C_word*)lf[280]+1 /* (set! make-variable-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6868,tmp=(C_word)a,a+=2,tmp));
+t7=C_mutate((C_word*)lf[290]+1 /* (set! make-argument-list ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6884,tmp=(C_word)a,a+=2,tmp));
+t8=C_mutate((C_word*)lf[508]+1 /* (set! generate-external-variables ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6900,tmp=(C_word)a,a+=2,tmp));
+t9=C_mutate((C_word*)lf[200]+1 /* (set! generate-foreign-callback-stub-prototypes ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6954,tmp=(C_word)a,a+=2,tmp));
+t10=C_mutate((C_word*)lf[506]+1 /* (set! generate-foreign-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6994,tmp=(C_word)a,a+=2,tmp));
+t11=C_mutate((C_word*)lf[505]+1 /* (set! generate-foreign-callback-stubs ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7308,tmp=(C_word)a,a+=2,tmp));
+t12=C_mutate((C_word*)lf[537]+1 /* (set! generate-foreign-callback-header ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7802,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_7867,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_8751,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_9241,tmp=(C_word)a,a+=2,tmp));
+t16=C_mutate((C_word*)lf[360]+1 /* (set! encode-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9848,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 k2573 in k2487 in k2484 */
+static void C_ccall f_9848(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_9848,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9857,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9910,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_eqp(C_SCHEME_TRUE,t2);
+if(C_truep(t5)){
+t6=t1;
+t7=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t6,t7,lf[835]);}
+else{
+t6=(C_word)C_eqp(C_SCHEME_FALSE,t2);
+if(C_truep(t6)){
+t7=t1;
+t8=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t7,t8,lf[836]);}
+else{
+if(C_truep((C_word)C_charp(t2))){
+t7=(C_word)C_fix((C_word)C_character_code(t2));
+t8=f_9857(C_a_i(&a,4),t7);
+C_trace("c-backend.scm: 1366 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t4,lf[837],t8);}
+else{
+if(C_truep((C_word)C_i_nullp(t2))){
+t7=t1;
+t8=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t7,t8,lf[838]);}
+else{
+if(C_truep((C_word)C_eofp(t2))){
+t7=t1;
+t8=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t7,t8,lf[839]);}
+else{
+t7=C_retrieve(lf[349]);
+t8=(C_word)C_eqp(t7,t2);
+if(C_truep(t8)){
+t9=t1;
+t10=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t9,t10,lf[840]);}
+else{
+if(C_truep((C_word)C_fixnump(t2))){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10028,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1371 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),t9,t2);}
+else{
+if(C_truep((C_word)C_i_numberp(t2))){
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10041,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1380 number->string");
+C_number_to_string(3,0,t9,t2);}
+else{
+if(C_truep((C_word)C_i_symbolp(t2))){
+t9=(C_word)C_slot(t2,C_fix(1));
+t10=(C_word)C_i_string_length(t9);
+t11=f_9857(C_a_i(&a,4),t10);
+C_trace("c-backend.scm: 1383 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),t4,lf[846],t11,t9);}
+else{
+if(C_truep((C_word)C_immp(t2))){
+C_trace("c-backend.scm: 1388 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t4,lf[847],t2);}
+else{
+if(C_truep((C_word)C_byteblockp(t2))){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10080,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t10=t2;
+t11=(C_word)stub2437(C_SCHEME_UNDEFINED,t10);
+t12=(C_word)C_make_character((C_word)C_unfix(t11));
+t13=(C_word)C_a_i_string(&a,1,t12);
+t14=t2;
+t15=(C_word)stub2441(C_SCHEME_UNDEFINED,t14);
+t16=f_9857(C_a_i(&a,4),t15);
+C_trace("c-backend.scm: 1391 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t9,t13,t16);}
+else{
+t9=t2;
+t10=(C_word)stub2441(C_SCHEME_UNDEFINED,t9);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10110,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t12=t2;
+t13=(C_word)stub2437(C_SCHEME_UNDEFINED,t12);
+t14=(C_word)C_make_character((C_word)C_unfix(t13));
+t15=(C_word)C_a_i_string(&a,1,t14);
+t16=f_9857(C_a_i(&a,4),t10);
+t17=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10122,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_10124,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1401 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[534]))(4,*((C_word*)lf[534]+1),t17,t10,t18);}}}}}}}}}}}}
+
+/* a10123 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10124(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_10124,3,t0,t1,t2);}
+t3=(C_word)C_slot(((C_word*)t0)[2],t2);
+C_trace("c-backend.scm: 1401 encode-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),t1,t3);}
+
+/* k10120 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10122(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1398 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[850]))(5,*((C_word*)lf[850]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10108 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10110(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1397 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[849]);}
+
+/* k10078 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10080(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1390 ##sys#string-append");
+((C_proc4)C_retrieve_symbol_proc(lf[848]))(4,*((C_word*)lf[848]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k10039 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10041(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1380 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[844],t1,lf[845]);}
+
+/* k10026 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10028(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10028,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10024,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1378 number->string");
+C_number_to_string(3,0,t2,((C_word*)t0)[2]);}
+else{
+t2=(C_word)C_fixnum_shift_right(((C_word*)t0)[2],C_fix(24));
+t3=(C_word)C_fixnum_and(C_fix(255),t2);
+t4=(C_word)C_make_character((C_word)C_unfix(t3));
+t5=(C_word)C_fixnum_shift_right(((C_word*)t0)[2],C_fix(16));
+t6=(C_word)C_fixnum_and(C_fix(255),t5);
+t7=(C_word)C_make_character((C_word)C_unfix(t6));
+t8=(C_word)C_fixnum_shift_right(((C_word*)t0)[2],C_fix(8));
+t9=(C_word)C_fixnum_and(C_fix(255),t8);
+t10=(C_word)C_make_character((C_word)C_unfix(t9));
+t11=(C_word)C_fixnum_and(C_fix(255),((C_word*)t0)[2]);
+t12=(C_word)C_make_character((C_word)C_unfix(t11));
+t13=(C_word)C_a_i_string(&a,4,t4,t7,t10,t12);
+C_trace("c-backend.scm: 1372 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[843],t13);}}
+
+/* k10022 in k10026 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_10024(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1378 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[841],t1,lf[842]);}
+
+/* k9908 in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static void C_ccall f_9910(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_9910,2,t0,t1);}
+t2=((C_word*)t0)[2];
+t3=(C_word)C_a_i_string(&a,1,C_make_character(254));
+C_trace("c-backend.scm: 1362 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t2,t3,t1);}
+
+/* encode-size in ##compiler#encode-literal in k2573 in k2487 in k2484 */
+static C_word C_fcall f_9857(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_word)C_fixnum_shift_right(t1,C_fix(16));
+t3=(C_word)C_fixnum_and(C_fix(255),t2);
+t4=(C_word)C_make_character((C_word)C_unfix(t3));
+t5=(C_word)C_fixnum_shift_right(t1,C_fix(8));
+t6=(C_word)C_fixnum_and(C_fix(255),t5);
+t7=(C_word)C_make_character((C_word)C_unfix(t6));
+t8=(C_word)C_fixnum_and(C_fix(255),t1);
+t9=(C_word)C_make_character((C_word)C_unfix(t8));
+return((C_word)C_a_i_string(&a,3,t4,t7,t9));}
+
+/* ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9241(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_9241,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9243,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t5=t2;
+t6=(C_word)C_eqp(t5,lf[16]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(t5,lf[631]));
+if(C_truep(t7)){
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[800]);}
+else{
+t8=(C_word)C_eqp(t5,lf[626]);
+t9=(C_truep(t8)?t8:(C_word)C_eqp(t5,lf[627]));
+if(C_truep(t9)){
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[801]);}
+else{
+t10=(C_word)C_eqp(t5,lf[632]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(t5,lf[633]));
+if(C_truep(t11)){
+t12=t1;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[802]);}
+else{
+t12=(C_word)C_eqp(t5,lf[628]);
+if(C_truep(t12)){
+t13=t1;
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[803]);}
+else{
+t13=(C_word)C_eqp(t5,lf[629]);
+if(C_truep(t13)){
+t14=t1;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[804]);}
+else{
+t14=(C_word)C_eqp(t5,lf[634]);
+if(C_truep(t14)){
+t15=t1;
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[805]);}
+else{
+t15=(C_word)C_eqp(t5,lf[635]);
+if(C_truep(t15)){
+t16=t1;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[806]);}
+else{
+t16=(C_word)C_eqp(t5,lf[586]);
+t17=(C_truep(t16)?t16:(C_word)C_eqp(t5,lf[615]));
+if(C_truep(t17)){
+t18=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9310,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[337]))(2,*((C_word*)lf[337]+1),t18);}
+else{
+t18=(C_word)C_eqp(t5,lf[622]);
+if(C_truep(t18)){
+t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9331,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[337]))(2,*((C_word*)lf[337]+1),t19);}
+else{
+t19=(C_word)C_eqp(t5,lf[592]);
+t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9352,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_9352(t21,t19);}
+else{
+t21=(C_word)C_eqp(t5,lf[588]);
+if(C_truep(t21)){
+t22=t20;
+f_9352(t22,t21);}
+else{
+t22=(C_word)C_eqp(t5,lf[601]);
+if(C_truep(t22)){
+t23=t20;
+f_9352(t23,t22);}
+else{
+t23=(C_word)C_eqp(t5,lf[612]);
+if(C_truep(t23)){
+t24=t20;
+f_9352(t24,t23);}
+else{
+t24=(C_word)C_eqp(t5,lf[608]);
+if(C_truep(t24)){
+t25=t20;
+f_9352(t25,t24);}
+else{
+t25=(C_word)C_eqp(t5,lf[613]);
+if(C_truep(t25)){
+t26=t20;
+f_9352(t26,t25);}
+else{
+t26=(C_word)C_eqp(t5,lf[614]);
+if(C_truep(t26)){
+t27=t20;
+f_9352(t27,t26);}
+else{
+t27=(C_word)C_eqp(t5,lf[609]);
+if(C_truep(t27)){
+t28=t20;
+f_9352(t28,t27);}
+else{
+t28=(C_word)C_eqp(t5,lf[610]);
+if(C_truep(t28)){
+t29=t20;
+f_9352(t29,t28);}
+else{
+t29=(C_word)C_eqp(t5,lf[611]);
+if(C_truep(t29)){
+t30=t20;
+f_9352(t30,t29);}
+else{
+t30=(C_word)C_eqp(t5,lf[624]);
+t31=t20;
+f_9352(t31,(C_truep(t30)?t30:(C_word)C_eqp(t5,lf[625])));}}}}}}}}}}}}}}}}}}}}
+
+/* k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9352(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9352,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9355,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[337]))(2,*((C_word*)lf[337]+1),t2);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[599]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9376,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[337]))(2,*((C_word*)lf[337]+1),t3);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[4],lf[619]);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(((C_word*)t0)[4],lf[620]));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9400,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[337]))(2,*((C_word*)lf[337]+1),t5);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[4],lf[623]);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9421,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[337]))(2,*((C_word*)lf[337]+1),t6);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[4],lf[616]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[617]));
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9445,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[337]))(2,*((C_word*)lf[337]+1),t8);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[4],lf[618]);
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9466,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[337]))(2,*((C_word*)lf[337]+1),t9);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[4],lf[621]);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9487,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[337]))(2,*((C_word*)lf[337]+1),t10);}
+else{
+t10=(C_word)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[818]);}
+else{
+t11=(C_word)C_eqp(((C_word*)t0)[4],lf[550]);
+t12=(C_truep(t11)?t11:(C_word)C_eqp(((C_word*)t0)[4],lf[630]));
+if(C_truep(t12)){
+t13=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[819]);}
+else{
+t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9517,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_word)C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1315 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[606]))(4,*((C_word*)lf[606]+1),t13,C_retrieve(lf[607]),((C_word*)t0)[3]);}
+else{
+t14=t13;
+f_9517(2,t14,C_SCHEME_FALSE);}}}}}}}}}}}
+
+/* k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9517(C_word c,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_9517,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9521,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("g23462347");
+t3=t2;
+f_9521(t3,((C_word*)t0)[4],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9544,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_word)C_i_listp(((C_word*)t0)[3]))){
+t3=(C_word)C_i_length(((C_word*)t0)[3]);
+t4=t2;
+f_9544(t4,(C_word)C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
+else{
+t3=t2;
+f_9544(t3,C_SCHEME_FALSE);}}}
+
+/* k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9544(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9544,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+t3=(C_word)C_eqp(t2,lf[600]);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(t2,lf[601]));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9559,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[337]))(2,*((C_word*)lf[337]+1),t5);}
+else{
+t5=(C_word)C_eqp(t2,lf[595]);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9580,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[337]))(2,*((C_word*)lf[337]+1),t6);}
+else{
+t6=(C_word)C_eqp(t2,lf[603]);
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9601,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[337]))(2,*((C_word*)lf[337]+1),t7);}
+else{
+t7=(C_word)C_eqp(t2,lf[604]);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9622,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[337]))(2,*((C_word*)lf[337]+1),t8);}
+else{
+t8=(C_word)C_eqp(t2,lf[605]);
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9643,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[337]))(2,*((C_word*)lf[337]+1),t9);}
+else{
+t9=(C_word)C_eqp(t2,lf[597]);
+if(C_truep(t9)){
+t10=(C_word)C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1330 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_word)C_eqp(t2,lf[598]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(t2,lf[599]));
+if(C_truep(t11)){
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9680,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[337]))(2,*((C_word*)lf[337]+1),t12);}
+else{
+t12=(C_word)C_eqp(t2,lf[602]);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9701,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[337]))(2,*((C_word*)lf[337]+1),t13);}
+else{
+t13=(C_word)C_eqp(t2,lf[735]);
+if(C_truep(t13)){
+t14=(*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("open-output-string");
+((C_proc2)C_retrieve_symbol_proc(lf[337]))(2,*((C_word*)lf[337]+1),t14);}
+else{
+C_trace("c-backend.scm: 1335 err");
+t14=((C_word*)t0)[2];
+f_9243(t14,((C_word*)t0)[4]);}}}}}}}}}}
+else{
+C_trace("c-backend.scm: 1336 err");
+t2=((C_word*)t0)[2];
+f_9243(t2,((C_word*)t0)[4]);}}
+
+/* k9720 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9722,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9725,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);}
+
+/* k9723 in k9720 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9725(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_9725,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9728,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]);}
+
+/* k9726 in k9723 in k9720 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9728(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_9728,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9731,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9729 in k9726 in k9723 in k9720 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9731(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9699 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9701(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_9701,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9704,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[833],t1);}
+
+/* k9702 in k9699 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9704(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_9704,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9707,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]);}
+
+/* k9705 in k9702 in k9699 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9707(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_9707,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9710,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[832],((C_word*)t0)[2]);}
+
+/* k9708 in k9705 in k9702 in k9699 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9710(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9678 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9680(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_9680,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9683,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[831],t1);}
+
+/* k9681 in k9678 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9683(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_9683,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9686,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]);}
+
+/* k9684 in k9681 in k9678 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9686(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_9686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9689,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[830],((C_word*)t0)[2]);}
+
+/* k9687 in k9684 in k9681 in k9678 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9689(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9641 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9643(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_9643,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9646,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[829],t1);}
+
+/* k9644 in k9641 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9646(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_9646,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9649,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]);}
+
+/* k9647 in k9644 in k9641 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9649(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_9649,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9652,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[828],((C_word*)t0)[2]);}
+
+/* k9650 in k9647 in k9644 in k9641 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9652(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9620 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9622,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9625,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);}
+
+/* k9623 in k9620 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9625(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_9625,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9628,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]);}
+
+/* k9626 in k9623 in k9620 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9628(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_9628,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9631,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[826],((C_word*)t0)[2]);}
+
+/* k9629 in k9626 in k9623 in k9620 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9631(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9599 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9601(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_9601,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9604,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);}
+
+/* k9602 in k9599 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9604,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9607,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]);}
+
+/* k9605 in k9602 in k9599 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9607,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9610,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[824],((C_word*)t0)[2]);}
+
+/* k9608 in k9605 in k9602 in k9599 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9610(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9578 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9580(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_9580,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9583,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);}
+
+/* k9581 in k9578 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9583(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_9583,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9586,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]);}
+
+/* k9584 in k9581 in k9578 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9586(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_9586,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9589,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]);}
+
+/* k9587 in k9584 in k9581 in k9578 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9589(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9557 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9559(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_9559,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9562,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);}
+
+/* k9560 in k9557 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9562(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_9562,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9565,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]);}
+
+/* k9563 in k9560 in k9557 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9565(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_9565,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9568,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]);}
+
+/* k9566 in k9563 in k9560 in k9557 in k9542 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9568(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* g2346 in k9515 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9521(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_9521,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_vectorp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1317 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: 1317 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t1,t3,((C_word*)t0)[2]);}}
+
+/* k9485 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9487(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_9487,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9490,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[817],t1);}
+
+/* k9488 in k9485 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9490(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_9490,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9493,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]);}
+
+/* k9491 in k9488 in k9485 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9493(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_9493,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9496,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9494 in k9491 in k9488 in k9485 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9496(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9464 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9466(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_9466,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9469,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[816],t1);}
+
+/* k9467 in k9464 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9469(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_9469,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9472,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]);}
+
+/* k9470 in k9467 in k9464 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9472(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_9472,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9475,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9473 in k9470 in k9467 in k9464 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9475(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9443 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9445(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_9445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9448,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[815],t1);}
+
+/* k9446 in k9443 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9448(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_9448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9451,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]);}
+
+/* k9449 in k9446 in k9443 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9451(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_9451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9454,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9452 in k9449 in k9446 in k9443 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9454(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9419 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9421(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_9421,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9424,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[814],t1);}
+
+/* k9422 in k9419 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9424(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_9424,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9427,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]);}
+
+/* k9425 in k9422 in k9419 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9427(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_9427,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9430,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9428 in k9425 in k9422 in k9419 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9430(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9398 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9400(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_9400,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9403,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[813],t1);}
+
+/* k9401 in k9398 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9403(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_9403,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9406,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]);}
+
+/* k9404 in k9401 in k9398 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9406(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_9406,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9409,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9407 in k9404 in k9401 in k9398 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9409(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9374 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9376(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_9376,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9379,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[812],t1);}
+
+/* k9377 in k9374 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9379(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_9379,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9382,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]);}
+
+/* k9380 in k9377 in k9374 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9382(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_9382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9385,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[811],((C_word*)t0)[2]);}
+
+/* k9383 in k9380 in k9377 in k9374 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9385(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9353 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9355(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_9355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9358,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[810],t1);}
+
+/* k9356 in k9353 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9358(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_9358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9361,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]);}
+
+/* k9359 in k9356 in k9353 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9361(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_9361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9364,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[809],((C_word*)t0)[2]);}
+
+/* k9362 in k9359 in k9356 in k9353 in k9350 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9364(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9329 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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]=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[808],t1);}
+
+/* k9332 in k9329 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9337,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]);}
+
+/* k9335 in k9332 in k9329 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9337(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_9337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9340,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9338 in k9335 in k9332 in k9329 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9340(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9308 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9310,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9313,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[807],t1);}
+
+/* k9311 in k9308 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9316,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]);}
+
+/* k9314 in k9311 in k9308 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9316(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_9316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9319,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(44),((C_word*)t0)[2]);}
+
+/* k9317 in k9314 in k9311 in k9308 in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9319(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* err in ##compiler#foreign-result-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9243(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_9243,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1291 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t1,lf[799],((C_word*)t0)[2]);}
+
+/* ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_8751(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_8751,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8753,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=t2;
+t5=(C_word)C_eqp(t4,lf[630]);
+if(C_truep(t5)){
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[746]);}
+else{
+t6=(C_word)C_eqp(t4,lf[16]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(t4,lf[631]));
+if(C_truep(t7)){
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[747]);}
+else{
+t8=(C_word)C_eqp(t4,lf[634]);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8781,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_8781(t10,t8);}
+else{
+t10=(C_word)C_eqp(t4,lf[626]);
+if(C_truep(t10)){
+t11=t9;
+f_8781(t11,t10);}
+else{
+t11=(C_word)C_eqp(t4,lf[632]);
+if(C_truep(t11)){
+t12=t9;
+f_8781(t12,t11);}
+else{
+t12=(C_word)C_eqp(t4,lf[633]);
+t13=t9;
+f_8781(t13,(C_truep(t12)?t12:(C_word)C_eqp(t4,lf[635])));}}}}}}
+
+/* k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_8781(C_word t0,C_word t1){
+C_word 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_8781,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[748]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[628]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[749]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[4],lf[629]);
+if(C_truep(t3)){
+t4=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[750]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[4],lf[621]);
+if(C_truep(t4)){
+t5=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[751]);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[4],lf[615]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8808,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_8808(t7,t5);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[4],lf[622]);
+t8=t6;
+f_8808(t8,(C_truep(t7)?t7:(C_word)C_eqp(((C_word*)t0)[4],lf[586])));}}}}}}
+
+/* k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_8808(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8808,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[752]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[619]);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[4],lf[620]));
+if(C_truep(t3)){
+t4=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[753]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[4],lf[623]);
+if(C_truep(t4)){
+t5=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[754]);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[4],lf[618]);
+if(C_truep(t5)){
+t6=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[755]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[4],lf[616]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[617]));
+if(C_truep(t7)){
+t8=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[756]);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[4],lf[598]);
+if(C_truep(t8)){
+t9=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[757]);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[4],lf[600]);
+if(C_truep(t9)){
+t10=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[758]);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[4],lf[743]);
+if(C_truep(t10)){
+t11=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[759]);}
+else{
+t11=(C_word)C_eqp(((C_word*)t0)[4],lf[744]);
+if(C_truep(t11)){
+t12=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[760]);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[4],lf[599]);
+if(C_truep(t12)){
+t13=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,lf[761]);}
+else{
+t13=(C_word)C_eqp(((C_word*)t0)[4],lf[601]);
+if(C_truep(t13)){
+t14=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,lf[762]);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[4],lf[681]);
+if(C_truep(t14)){
+t15=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,lf[763]);}
+else{
+t15=(C_word)C_eqp(((C_word*)t0)[4],lf[740]);
+if(C_truep(t15)){
+t16=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,lf[764]);}
+else{
+t16=(C_word)C_eqp(((C_word*)t0)[4],lf[678]);
+if(C_truep(t16)){
+t17=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,lf[765]);}
+else{
+t17=(C_word)C_eqp(((C_word*)t0)[4],lf[679]);
+if(C_truep(t17)){
+t18=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,lf[766]);}
+else{
+t18=(C_word)C_eqp(((C_word*)t0)[4],lf[741]);
+if(C_truep(t18)){
+t19=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,lf[767]);}
+else{
+t19=(C_word)C_eqp(((C_word*)t0)[4],lf[742]);
+if(C_truep(t19)){
+t20=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t20+1)))(2,t20,lf[768]);}
+else{
+t20=(C_word)C_eqp(((C_word*)t0)[4],lf[683]);
+if(C_truep(t20)){
+t21=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t21+1)))(2,t21,lf[769]);}
+else{
+t21=(C_word)C_eqp(((C_word*)t0)[4],lf[684]);
+if(C_truep(t21)){
+t22=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,lf[770]);}
+else{
+t22=(C_word)C_eqp(((C_word*)t0)[4],lf[689]);
+if(C_truep(t22)){
+t23=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,lf[771]);}
+else{
+t23=(C_word)C_eqp(((C_word*)t0)[4],lf[690]);
+if(C_truep(t23)){
+t24=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t24+1)))(2,t24,lf[772]);}
+else{
+t24=(C_word)C_eqp(((C_word*)t0)[4],lf[686]);
+if(C_truep(t24)){
+t25=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t25+1)))(2,t25,lf[773]);}
+else{
+t25=(C_word)C_eqp(((C_word*)t0)[4],lf[687]);
+if(C_truep(t25)){
+t26=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t26+1)))(2,t26,lf[774]);}
+else{
+t26=(C_word)C_eqp(((C_word*)t0)[4],lf[692]);
+if(C_truep(t26)){
+t27=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t27+1)))(2,t27,lf[775]);}
+else{
+t27=(C_word)C_eqp(((C_word*)t0)[4],lf[693]);
+if(C_truep(t27)){
+t28=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t28+1)))(2,t28,lf[776]);}
+else{
+t28=(C_word)C_eqp(((C_word*)t0)[4],lf[695]);
+if(C_truep(t28)){
+t29=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t29+1)))(2,t29,lf[777]);}
+else{
+t29=(C_word)C_eqp(((C_word*)t0)[4],lf[696]);
+if(C_truep(t29)){
+t30=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t30+1)))(2,t30,lf[778]);}
+else{
+t30=(C_word)C_eqp(((C_word*)t0)[4],lf[698]);
+if(C_truep(t30)){
+t31=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,lf[779]);}
+else{
+t31=(C_word)C_eqp(((C_word*)t0)[4],lf[699]);
+if(C_truep(t31)){
+t32=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[780]);}
+else{
+t32=(C_word)C_eqp(((C_word*)t0)[4],lf[701]);
+if(C_truep(t32)){
+t33=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t33+1)))(2,t33,lf[781]);}
+else{
+t33=(C_word)C_eqp(((C_word*)t0)[4],lf[702]);
+if(C_truep(t33)){
+t34=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t34+1)))(2,t34,lf[782]);}
+else{
+t34=(C_word)C_eqp(((C_word*)t0)[4],lf[588]);
+t35=(*a=C_CLOSURE_TYPE|5,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],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(t34)){
+t36=t35;
+f_9003(t36,t34);}
+else{
+t36=(C_word)C_eqp(((C_word*)t0)[4],lf[612]);
+if(C_truep(t36)){
+t37=t35;
+f_9003(t37,t36);}
+else{
+t37=(C_word)C_eqp(((C_word*)t0)[4],lf[613]);
+t38=t35;
+f_9003(t38,(C_truep(t37)?t37:(C_word)C_eqp(((C_word*)t0)[4],lf[614])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+
+/* k9001 in k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9003(C_word t0,C_word 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_9003,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[783]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[592]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9012,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_9012(t4,t2);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[4],lf[608]);
+if(C_truep(t4)){
+t5=t3;
+f_9012(t5,t4);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[4],lf[609]);
+if(C_truep(t5)){
+t6=t3;
+f_9012(t6,t5);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[4],lf[610]);
+t7=t3;
+f_9012(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[611])));}}}}}
+
+/* k9010 in k9001 in k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9012(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_9012,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[784]);}
+else{
+t2=(C_word)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[785]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9021,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_word)C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1264 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[606]))(4,*((C_word*)lf[606]+1),t3,C_retrieve(lf[607]),((C_word*)t0)[3]);}
+else{
+t4=t3;
+f_9021(2,t4,C_SCHEME_FALSE);}}}}
+
+/* k9019 in k9010 in k9001 in k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9021(C_word c,C_word t0,C_word 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_9021,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+t3=t1;
+if(C_truep((C_word)C_i_vectorp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+C_trace("c-backend.scm: 1266 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: 1266 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_9048,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_word)C_i_listp(((C_word*)t0)[3]))){
+t3=(C_word)C_i_length(((C_word*)t0)[3]);
+t4=t2;
+f_9048(t4,(C_word)C_fixnum_greater_or_equal_p(t3,C_fix(2)));}
+else{
+t3=t2;
+f_9048(t3,C_SCHEME_FALSE);}}}
+
+/* k9046 in k9019 in k9010 in k9001 in k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_9048(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9048,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=(C_word)C_eqp(t2,lf[598]);
+if(C_truep(t3)){
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[786]);}
+else{
+t4=(C_word)C_eqp(t2,lf[600]);
+if(C_truep(t4)){
+t5=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[787]);}
+else{
+t5=(C_word)C_eqp(t2,lf[599]);
+if(C_truep(t5)){
+t6=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,lf[788]);}
+else{
+t6=(C_word)C_eqp(t2,lf[601]);
+if(C_truep(t6)){
+t7=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[789]);}
+else{
+t7=(C_word)C_eqp(t2,lf[603]);
+if(C_truep(t7)){
+t8=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[790]);}
+else{
+t8=(C_word)C_eqp(t2,lf[604]);
+if(C_truep(t8)){
+t9=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[791]);}
+else{
+t9=(C_word)C_eqp(t2,lf[602]);
+if(C_truep(t9)){
+t10=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,lf[792]);}
+else{
+t10=(C_word)C_eqp(t2,lf[597]);
+if(C_truep(t10)){
+t11=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1277 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_word)C_eqp(t2,lf[735]);
+if(C_truep(t11)){
+t12=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[793]);}
+else{
+t12=(C_word)C_eqp(t2,lf[595]);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9125,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t14=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1280 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t13,t14,lf[796]);}
+else{
+t13=(C_word)C_eqp(t2,lf[605]);
+if(C_truep(t13)){
+t14=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1283 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[797],t14,lf[798]);}
+else{
+C_trace("c-backend.scm: 1284 err");
+t14=((C_word*)t0)[2];
+f_8753(t14,((C_word*)t0)[3]);}}}}}}}}}}}}
+else{
+C_trace("c-backend.scm: 1285 err");
+t2=((C_word*)t0)[2];
+f_8753(t2,((C_word*)t0)[3]);}}
+
+/* k9123 in k9046 in k9019 in k9010 in k9001 in k8806 in k8779 in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_ccall f_9125(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1280 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[794],t1,lf[795]);}
+
+/* err in ##compiler#foreign-argument-conversion in k2573 in k2487 in k2484 */
+static void C_fcall f_8753(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_8753,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1218 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t1,lf[745],((C_word*)t0)[2]);}
+
+/* ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_7867(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_7867,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7869,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7874,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t6=t2;
+t7=(C_word)C_eqp(t6,lf[630]);
+if(C_truep(t7)){
+C_trace("c-backend.scm: 1125 str");
+t8=t5;
+f_7874(t8,t1,lf[661]);}
+else{
+t8=(C_word)C_eqp(t6,lf[16]);
+t9=(C_truep(t8)?t8:(C_word)C_eqp(t6,lf[634]));
+if(C_truep(t9)){
+C_trace("c-backend.scm: 1126 str");
+t10=t5;
+f_7874(t10,t1,lf[662]);}
+else{
+t10=(C_word)C_eqp(t6,lf[631]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(t6,lf[635]));
+if(C_truep(t11)){
+C_trace("c-backend.scm: 1127 str");
+t12=t5;
+f_7874(t12,t1,lf[663]);}
+else{
+t12=(C_word)C_eqp(t6,lf[632]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(t6,lf[616]));
+if(C_truep(t13)){
+C_trace("c-backend.scm: 1128 str");
+t14=t5;
+f_7874(t14,t1,lf[664]);}
+else{
+t14=(C_word)C_eqp(t6,lf[633]);
+t15=(C_truep(t14)?t14:(C_word)C_eqp(t6,lf[617]));
+if(C_truep(t15)){
+C_trace("c-backend.scm: 1129 str");
+t16=t5;
+f_7874(t16,t1,lf[665]);}
+else{
+t16=(C_word)C_eqp(t6,lf[626]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7944,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_7944(t18,t16);}
+else{
+t18=(C_word)C_eqp(t6,lf[619]);
+t19=t17;
+f_7944(t19,(C_truep(t18)?t18:(C_word)C_eqp(t6,lf[13])));}}}}}}}
+
+/* k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_7944(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_7944,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1130 str");
+t2=((C_word*)t0)[7];
+f_7874(t2,((C_word*)t0)[6],lf[666]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[627]);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[5],lf[620]));
+if(C_truep(t3)){
+C_trace("c-backend.scm: 1131 str");
+t4=((C_word*)t0)[7];
+f_7874(t4,((C_word*)t0)[6],lf[667]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[623]);
+if(C_truep(t4)){
+C_trace("c-backend.scm: 1132 str");
+t5=((C_word*)t0)[7];
+f_7874(t5,((C_word*)t0)[6],lf[668]);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[5],lf[628]);
+if(C_truep(t5)){
+C_trace("c-backend.scm: 1133 str");
+t6=((C_word*)t0)[7];
+f_7874(t6,((C_word*)t0)[6],lf[669]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[5],lf[618]);
+if(C_truep(t6)){
+C_trace("c-backend.scm: 1134 str");
+t7=((C_word*)t0)[7];
+f_7874(t7,((C_word*)t0)[6],lf[670]);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[5],lf[629]);
+if(C_truep(t7)){
+C_trace("c-backend.scm: 1135 str");
+t8=((C_word*)t0)[7];
+f_7874(t8,((C_word*)t0)[6],lf[671]);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[5],lf[621]);
+if(C_truep(t8)){
+C_trace("c-backend.scm: 1136 str");
+t9=((C_word*)t0)[7];
+f_7874(t9,((C_word*)t0)[6],lf[672]);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[5],lf[586]);
+if(C_truep(t9)){
+C_trace("c-backend.scm: 1137 str");
+t10=((C_word*)t0)[7];
+f_7874(t10,((C_word*)t0)[6],lf[673]);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[5],lf[615]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[5],lf[622]));
+if(C_truep(t11)){
+C_trace("c-backend.scm: 1138 str");
+t12=((C_word*)t0)[7];
+f_7874(t12,((C_word*)t0)[6],lf[674]);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[5],lf[598]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(((C_word*)t0)[5],lf[600]));
+if(C_truep(t13)){
+C_trace("c-backend.scm: 1140 str");
+t14=((C_word*)t0)[7];
+f_7874(t14,((C_word*)t0)[6],lf[675]);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[5],lf[599]);
+t15=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_8046(t16,t14);}
+else{
+t16=(C_word)C_eqp(((C_word*)t0)[5],lf[601]);
+if(C_truep(t16)){
+t17=t15;
+f_8046(t17,t16);}
+else{
+t17=(C_word)C_eqp(((C_word*)t0)[5],lf[743]);
+t18=t15;
+f_8046(t18,(C_truep(t17)?t17:(C_word)C_eqp(((C_word*)t0)[5],lf[744])));}}}}}}}}}}}}}
+
+/* k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8046(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8046,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1141 str");
+t2=((C_word*)t0)[7];
+f_7874(t2,((C_word*)t0)[6],lf[676]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[624]);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[5],lf[625]));
+if(C_truep(t3)){
+t4=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[677]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[678]);
+t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[5],lf[679]));
+if(C_truep(t5)){
+C_trace("c-backend.scm: 1144 str");
+t6=((C_word*)t0)[7];
+f_7874(t6,((C_word*)t0)[6],lf[680]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[5],lf[681]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8079,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_8079(t8,t6);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[5],lf[740]);
+if(C_truep(t8)){
+t9=t7;
+f_8079(t9,t8);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[5],lf[741]);
+t10=t7;
+f_8079(t10,(C_truep(t9)?t9:(C_word)C_eqp(((C_word*)t0)[5],lf[742])));}}}}}}
+
+/* k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8079(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8079,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1145 str");
+t2=((C_word*)t0)[7];
+f_7874(t2,((C_word*)t0)[6],lf[682]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[683]);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[5],lf[684]));
+if(C_truep(t3)){
+C_trace("c-backend.scm: 1146 str");
+t4=((C_word*)t0)[7];
+f_7874(t4,((C_word*)t0)[6],lf[685]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[686]);
+t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[5],lf[687]));
+if(C_truep(t5)){
+C_trace("c-backend.scm: 1147 str");
+t6=((C_word*)t0)[7];
+f_7874(t6,((C_word*)t0)[6],lf[688]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[5],lf[689]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[5],lf[690]));
+if(C_truep(t7)){
+C_trace("c-backend.scm: 1148 str");
+t8=((C_word*)t0)[7];
+f_7874(t8,((C_word*)t0)[6],lf[691]);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[5],lf[692]);
+t9=(C_truep(t8)?t8:(C_word)C_eqp(((C_word*)t0)[5],lf[693]));
+if(C_truep(t9)){
+C_trace("c-backend.scm: 1149 str");
+t10=((C_word*)t0)[7];
+f_7874(t10,((C_word*)t0)[6],lf[694]);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[5],lf[695]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[5],lf[696]));
+if(C_truep(t11)){
+C_trace("c-backend.scm: 1150 str");
+t12=((C_word*)t0)[7];
+f_7874(t12,((C_word*)t0)[6],lf[697]);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[5],lf[698]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(((C_word*)t0)[5],lf[699]));
+if(C_truep(t13)){
+C_trace("c-backend.scm: 1151 str");
+t14=((C_word*)t0)[7];
+f_7874(t14,((C_word*)t0)[6],lf[700]);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[5],lf[701]);
+t15=(C_truep(t14)?t14:(C_word)C_eqp(((C_word*)t0)[5],lf[702]));
+if(C_truep(t15)){
+C_trace("c-backend.scm: 1152 str");
+t16=((C_word*)t0)[7];
+f_7874(t16,((C_word*)t0)[6],lf[703]);}
+else{
+t16=(C_word)C_eqp(((C_word*)t0)[5],lf[592]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8175,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_8175(t18,t16);}
+else{
+t18=(C_word)C_eqp(((C_word*)t0)[5],lf[588]);
+if(C_truep(t18)){
+t19=t17;
+f_8175(t19,t18);}
+else{
+t19=(C_word)C_eqp(((C_word*)t0)[5],lf[608]);
+if(C_truep(t19)){
+t20=t17;
+f_8175(t20,t19);}
+else{
+t20=(C_word)C_eqp(((C_word*)t0)[5],lf[612]);
+t21=t17;
+f_8175(t21,(C_truep(t20)?t20:(C_word)C_eqp(((C_word*)t0)[5],lf[611])));}}}}}}}}}}}}
+
+/* k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8175(C_word t0,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_8175,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1154 str");
+t2=((C_word*)t0)[7];
+f_7874(t2,((C_word*)t0)[6],lf[704]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[609]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8187,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_8187(t4,t2);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[610]);
+if(C_truep(t4)){
+t5=t3;
+f_8187(t5,t4);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+t6=t3;
+f_8187(t6,(C_truep(t5)?t5:(C_word)C_eqp(((C_word*)t0)[5],lf[614])));}}}}
+
+/* k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_8187,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1156 str");
+t2=((C_word*)t0)[7];
+f_7874(t2,((C_word*)t0)[6],lf[705]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[550]);
+if(C_truep(t2)){
+C_trace("c-backend.scm: 1157 str");
+t3=((C_word*)t0)[7];
+f_7874(t3,((C_word*)t0)[6],lf[706]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8202,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_word)C_i_symbolp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 1159 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[606]))(4,*((C_word*)lf[606]+1),t3,C_retrieve(lf[607]),((C_word*)t0)[3]);}
+else{
+t4=t3;
+f_8202(2,t4,C_SCHEME_FALSE);}}}}
+
+/* k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8202(C_word c,C_word t0,C_word 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_8202,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8206,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("g19741975");
+t3=t2;
+f_8206(t3,((C_word*)t0)[5],t1);}
+else{
+if(C_truep((C_word)C_i_stringp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 1162 str");
+t2=((C_word*)t0)[3];
+f_7874(t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+if(C_truep((C_word)C_i_listp(((C_word*)t0)[4]))){
+t2=(C_word)C_i_length(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8247,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_word)C_eqp(C_fix(2),t2);
+if(C_truep(t4)){
+t5=(C_word)C_i_car(((C_word*)t0)[4]);
+t6=t3;
+f_8247(t6,(C_word)C_i_memq(t5,lf[739]));}
+else{
+t5=t3;
+f_8247(t5,C_SCHEME_FALSE);}}
+else{
+C_trace("c-backend.scm: 1212 err");
+t2=((C_word*)t0)[2];
+f_7869(t2,((C_word*)t0)[5]);}}}}
+
+/* k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8247(C_word t0,C_word 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_8247,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8258,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1169 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t3,lf[707],((C_word*)t0)[5]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8264,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_eqp(C_fix(2),((C_word*)t0)[2]);
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[7]);
+t5=t2;
+f_8264(t5,(C_word)C_eqp(lf[595],t4));}
+else{
+t4=t2;
+f_8264(t4,C_SCHEME_FALSE);}}}
+
+/* k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8264(C_word t0,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_8264,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8275,a[2]=t2,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1172 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t3,lf[708],((C_word*)t0)[5]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8281,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_word)C_fixnum_greaterp(((C_word*)t0)[2],C_fix(2)))){
+t3=(C_word)C_i_car(((C_word*)t0)[7]);
+t4=t2;
+f_8281(t4,(C_word)C_eqp(lf[738],t3));}
+else{
+t3=t2;
+f_8281(t3,C_SCHEME_FALSE);}}}
+
+/* k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8281(C_word t0,C_word t1){
+C_word 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_8281,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8288,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_8292,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1177 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,t4,lf[713]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8320,a[2]=((C_word*)t0)[2],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_eqp(((C_word*)t0)[2],C_fix(2));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[5]);
+t5=t2;
+f_8320(t5,(C_word)C_eqp(lf[597],t4));}
+else{
+t4=t2;
+f_8320(t4,C_SCHEME_FALSE);}}}
+
+/* k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8320(C_word t0,C_word 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_8320,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8327,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 1184 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_8337,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_word)C_eqp(((C_word*)t0)[2],C_fix(2));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[5]);
+t5=t2;
+f_8337(t5,(C_word)C_eqp(lf[737],t4));}
+else{
+t4=t2;
+f_8337(t4,C_SCHEME_FALSE);}}}
+
+/* k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8337(C_word t0,C_word 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_8337,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8344,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1186 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8354,a[2]=((C_word*)t0)[2],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_eqp(((C_word*)t0)[2],C_fix(2));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=t2;
+f_8354(t5,(C_word)C_eqp(lf[736],t4));}
+else{
+t4=t2;
+f_8354(t4,C_SCHEME_FALSE);}}}
+
+/* k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8354(C_word t0,C_word 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_8354,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8361,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1188 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8371,a[2]=((C_word*)t0)[2],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_eqp(((C_word*)t0)[2],C_fix(2));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=t2;
+f_8371(t5,(C_word)C_eqp(lf[735],t4));}
+else{
+t4=t2;
+f_8371(t4,C_SCHEME_FALSE);}}}
+
+/* k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8371(C_word t0,C_word 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_8371,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8378,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1190 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8388,a[2]=((C_word*)t0)[2],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_eqp(((C_word*)t0)[2],C_fix(3));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=t2;
+f_8388(t5,(C_word)C_i_memq(t4,lf[734]));}
+else{
+t4=t2;
+f_8388(t4,C_SCHEME_FALSE);}}}
+
+/* k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8388(C_word t0,C_word 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_8388,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8395,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1192 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8405,a[2]=((C_word*)t0)[2],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_eqp(((C_word*)t0)[2],C_fix(3));
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=t2;
+f_8405(t5,(C_word)C_eqp(lf[605],t4));}
+else{
+t4=t2;
+f_8405(t4,C_SCHEME_FALSE);}}}
+
+/* k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8405(C_word t0,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_8405,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8412,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1194 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8422,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_word)C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(3)))){
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=t2;
+f_8422(t4,(C_word)C_eqp(lf[602],t3));}
+else{
+t3=t2;
+f_8422(t3,C_SCHEME_FALSE);}}}
+
+/* k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8422(C_word t0,C_word 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_8422,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
+t3=(C_word)C_i_caddr(((C_word*)t0)[5]);
+t4=(C_word)C_i_cdddr(((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8434,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_word)C_i_nullp(t4))){
+t6=t5;
+f_8434(2,t6,lf[731]);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=t5;
+f_8434(2,t7,(C_word)C_i_car(t4));}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[732]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[733],t4);}}}
+else{
+C_trace("c-backend.scm: 1211 err");
+t2=((C_word*)t0)[2];
+f_7869(t2,((C_word*)t0)[4]);}}
+
+/* k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8434(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_8434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8441,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: 1200 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[730]);}
+
+/* k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+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 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_8441,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8445,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_8449,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_8451,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_8451(t11,t7,((C_word*)t0)[2]);}
+
+/* loop2035 in k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8451(C_word t0,C_word 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_8451,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_8461,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_8491,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_slot(t2,C_fix(0));
+t6=(C_word)C_eqp(lf[727],t5);
+if(C_truep(t6)){
+t7=t3;
+f_8461(t7,(C_word)C_a_i_cons(&a,2,lf[728],C_SCHEME_END_OF_LIST));}
+else{
+C_trace("c-backend.scm: 1207 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t4,t5,lf[729]);}}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8489 in loop2035 in k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8491(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_8491,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_8461(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
+
+/* k8459 in loop2035 in k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8461(C_word t0,C_word t1){
+C_word 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));
+C_trace("loop20352048");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_8451(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));
+C_trace("loop20352048");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_8451(t5,((C_word*)t0)[3],t4);}}
+
+/* k8447 in k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8449(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1203 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[726]);}
+
+/* k8443 in k8439 in k8432 in k8420 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+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: 1199 string-append");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[113]+1)))(9,*((C_word*)lf[113]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[723],((C_word*)t0)[2],lf[724],t1,lf[725]);}
+
+/* k8410 in k8403 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8412(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1194 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[3],t1,lf[722],((C_word*)t0)[2]);}
+
+/* k8393 in k8386 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8395(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1192 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[3],t1,lf[721],((C_word*)t0)[2]);}
+
+/* k8376 in k8369 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8378(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1190 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[113]+1)))(6,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[719],t1,lf[720],((C_word*)t0)[2]);}
+
+/* k8359 in k8352 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1188 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[113]+1)))(6,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[717],t1,lf[718],((C_word*)t0)[2]);}
+
+/* k8342 in k8335 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8344(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1186 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[113]+1)))(6,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[715],t1,lf[716],((C_word*)t0)[2]);}
+
+/* k8325 in k8318 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8327(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1184 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[714],t1);}
+
+/* k8290 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8292(C_word c,C_word t0,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_8292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8296,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_8300,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8302,tmp=(C_word)a,a+=2,tmp);
+t5=(C_word)C_i_cddr(((C_word*)t0)[2]);
+C_trace("map");
+t6=*((C_word*)lf[221]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
+
+/* a8301 in k8290 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8302(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_8302,3,t0,t1,t2);}
+t3=C_retrieve(lf[174]);
+C_trace("g20092010");
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[712]);}
+
+/* k8298 in k8290 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8300(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1179 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[711]);}
+
+/* k8294 in k8290 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8296(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1176 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[113]+1)))(6,*((C_word*)lf[113]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[709],t1,lf[710]);}
+
+/* k8286 in k8279 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8288(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1175 str");
+t2=((C_word*)t0)[3];
+f_7874(t2,((C_word*)t0)[2],t1);}
+
+/* k8273 in k8262 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8275(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1172 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);}
+
+/* k8256 in k8245 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_ccall f_8258(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1169 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);}
+
+/* g1974 in k8200 in k8185 in k8173 in k8077 in k8044 in k7942 in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_8206(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_8206,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_vectorp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1161 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: 1161 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 k2573 in k2487 in k2484 */
+static void C_fcall f_7874(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_7874,NULL,3,t0,t1,t2);}
+C_trace("c-backend.scm: 1123 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),t1,t2,lf[660],((C_word*)t0)[2]);}
+
+/* err in ##compiler#foreign-type-declaration in k2573 in k2487 in k2484 */
+static void C_fcall f_7869(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_7869,NULL,2,t0,t1);}
+C_trace("c-backend.scm: 1122 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[658]))(4,*((C_word*)lf[658]+1),t1,lf[659],((C_word*)t0)[2]);}
+
+/* ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7802(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_7802,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7806,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1104 foreign-callback-stub-name");
+((C_proc3)C_retrieve_symbol_proc(lf[657]))(3,*((C_word*)lf[657]+1),t4,t3);}
+
+/* k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7806,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7809,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: 1105 foreign-callback-stub-qualifiers");
+((C_proc3)C_retrieve_symbol_proc(lf[656]))(3,*((C_word*)lf[656]+1),t2,((C_word*)t0)[2]);}
+
+/* k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7809,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7812,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: 1106 foreign-callback-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[652]))(3,*((C_word*)lf[652]+1),t2,((C_word*)t0)[2]);}
+
+/* k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7812(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_7812,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7815,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: 1107 foreign-callback-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[651]))(3,*((C_word*)lf[651]+1),t2,((C_word*)t0)[2]);}
+
+/* k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7815(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_7815,2,t0,t1);}
+t2=(C_word)C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7821,a[2]=((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: 1109 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t3,t2,lf[655]);}
+
+/* k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7821(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_7821,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7824,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_7865,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: 1110 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t3,((C_word*)t0)[2],lf[654]);}
+
+/* k7863 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7865(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1110 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));}
+
+/* k7822 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7824(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_7824,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7827,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7832,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-backend.scm: 1111 pair-for-each");
+((C_proc5)C_retrieve_symbol_proc(lf[197]))(5,*((C_word*)lf[197]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a7831 in k7822 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7832(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_7832,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7836,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7853,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_car(t3);
+t7=(C_word)C_i_car(t2);
+C_trace("c-backend.scm: 1113 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t5,t6,t7);}
+
+/* k7851 in a7831 in k7822 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1113 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],t1);}
+
+/* k7834 in a7831 in k7822 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7836(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)[3]);
+if(C_truep((C_word)C_i_pairp(t2))){
+C_trace("c-backend.scm: 1114 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);}}
+
+/* k7825 in k7822 in k7819 in k7813 in k7810 in k7807 in k7804 in ##compiler#generate-foreign-callback-header in k2573 in k2487 in k2484 */
+static void C_ccall f_7827(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1116 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 k2573 in k2487 in k2484 */
+static void C_ccall f_7308(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_7308,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_7314,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_7314(t7,t1,t2);}
+
+/* loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7314(C_word t0,C_word 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_7314,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_7322,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7789,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));
+C_trace("g15011502");
+t6=t3;
+f_7322(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7787 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7789(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_7314(t3,((C_word*)t0)[2],t2);}
+
+/* g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7322(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_7322,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7326,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 1051 foreign-callback-stub-id");
+((C_proc3)C_retrieve_symbol_proc(lf[653]))(3,*((C_word*)lf[653]+1),t3,t2);}
+
+/* k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7326(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_7326,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7329,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: 1052 real-name2");
+((C_proc4)C_retrieve_symbol_proc(lf[584]))(4,*((C_word*)lf[584]+1),t2,t1,((C_word*)t0)[2]);}
+
+/* k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7332,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: 1053 foreign-callback-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[652]))(3,*((C_word*)lf[652]+1),t2,((C_word*)t0)[2]);}
+
+/* k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7332(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_7332,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7335,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: 1054 foreign-callback-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[651]))(3,*((C_word*)lf[651]+1),t2,((C_word*)t0)[3]);}
+
+/* k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7335(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_7335,2,t0,t1);}
+t2=(C_word)C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7341,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: 1056 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t3,t2,lf[650]);}
+
+/* k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7341(C_word c,C_word t0,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_7341,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_7343,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7687,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: 1083 fold");
+((C_proc6)C_retrieve_symbol_proc(lf[439]))(6,*((C_word*)lf[439]+1),t5,((C_word*)t3)[1],lf[649],((C_word*)t0)[4],t1);}
+
+/* k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7687(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_7687,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7690,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: 1084 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
+
+/* k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7690(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_7690,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7693,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_7786,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1086 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t3,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_7693(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k7784 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+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("c-backend.scm: 1086 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[647],t1,lf[648]);}
+
+/* k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7696,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: 1087 generate-foreign-callback-header");
+((C_proc4)C_retrieve_symbol_proc(lf[537]))(4,*((C_word*)lf[537]+1),t2,lf[646],((C_word*)t0)[2]);}
+
+/* k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7696(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_7696,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7699,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: 1088 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[644],((C_word*)t0)[2],lf[645]);}
+
+/* k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7699(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_7699,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7702,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 1089 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[643]);}
+
+/* k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7702(C_word c,C_word t0,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_7702,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7705,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_7735,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_7735(t6,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop1748 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7735(C_word t0,C_word 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_7735,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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7754,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7751,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1092 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t9,t8,lf[642]);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k7749 in loop1748 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7751(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1092 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[639],t1,((C_word*)t0)[2],lf[640],C_SCHEME_TRUE,lf[641]);}
+
+/* k7752 in loop1748 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7754(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7735(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k7703 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7705(C_word c,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_7705,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7708,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(lf[550],((C_word*)t0)[4]);
+if(C_truep(t3)){
+t4=t2;
+f_7708(2,t4,C_SCHEME_UNDEFINED);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7733,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1097 foreign-argument-conversion");
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t4,((C_word*)t0)[4]);}}
+
+/* k7731 in k7703 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7733(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1097 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[638],t1);}
+
+/* k7706 in k7703 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7708(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_7708,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7711,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 1098 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[637],((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],C_make_character(41));}
+
+/* k7709 in k7706 in k7703 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7711(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_7711,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7714,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_eqp(lf[550],((C_word*)t0)[2]);
+if(C_truep(t3)){
+C_trace("c-backend.scm: 1100 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[636]);}
+else{
+C_trace("c-backend.scm: 1099 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
+
+/* k7712 in k7709 in k7706 in k7703 in k7700 in k7697 in k7694 in k7691 in k7688 in k7685 in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1100 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[636]);}
+
+/* compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7343(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_7343,5,t0,t1,t2,t3,t4);}
+t5=t2;
+t6=(C_word)C_eqp(t5,lf[16]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7353,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_7353(t8,t6);}
+else{
+t8=(C_word)C_eqp(t5,lf[626]);
+if(C_truep(t8)){
+t9=t7;
+f_7353(t9,t8);}
+else{
+t9=(C_word)C_eqp(t5,lf[627]);
+if(C_truep(t9)){
+t10=t7;
+f_7353(t10,t9);}
+else{
+t10=(C_word)C_eqp(t5,lf[628]);
+if(C_truep(t10)){
+t11=t7;
+f_7353(t11,t10);}
+else{
+t11=(C_word)C_eqp(t5,lf[13]);
+if(C_truep(t11)){
+t12=t7;
+f_7353(t12,t11);}
+else{
+t12=(C_word)C_eqp(t5,lf[550]);
+if(C_truep(t12)){
+t13=t7;
+f_7353(t13,t12);}
+else{
+t13=(C_word)C_eqp(t5,lf[629]);
+if(C_truep(t13)){
+t14=t7;
+f_7353(t14,t13);}
+else{
+t14=(C_word)C_eqp(t5,lf[630]);
+if(C_truep(t14)){
+t15=t7;
+f_7353(t15,t14);}
+else{
+t15=(C_word)C_eqp(t5,lf[631]);
+if(C_truep(t15)){
+t16=t7;
+f_7353(t16,t15);}
+else{
+t16=(C_word)C_eqp(t5,lf[632]);
+if(C_truep(t16)){
+t17=t7;
+f_7353(t17,t16);}
+else{
+t17=(C_word)C_eqp(t5,lf[633]);
+if(C_truep(t17)){
+t18=t7;
+f_7353(t18,t17);}
+else{
+t18=(C_word)C_eqp(t5,lf[634]);
+t19=t7;
+f_7353(t19,(C_truep(t18)?t18:(C_word)C_eqp(t5,lf[635])));}}}}}}}}}}}}
+
+/* k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7353(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_7353,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_word)C_eqp(((C_word*)t0)[5],lf[586]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7362,a[2]=((C_word*)t0)[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_7362(t4,t2);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[615]);
+if(C_truep(t4)){
+t5=t3;
+f_7362(t5,t4);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[5],lf[599]);
+if(C_truep(t5)){
+t6=t3;
+f_7362(t6,t5);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[5],lf[616]);
+if(C_truep(t6)){
+t7=t3;
+f_7362(t7,t6);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[5],lf[617]);
+if(C_truep(t7)){
+t8=t3;
+f_7362(t8,t7);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[5],lf[618]);
+if(C_truep(t8)){
+t9=t3;
+f_7362(t9,t8);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[5],lf[619]);
+if(C_truep(t9)){
+t10=t3;
+f_7362(t10,t9);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[5],lf[620]);
+if(C_truep(t10)){
+t11=t3;
+f_7362(t11,t10);}
+else{
+t11=(C_word)C_eqp(((C_word*)t0)[5],lf[621]);
+if(C_truep(t11)){
+t12=t3;
+f_7362(t12,t11);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[5],lf[601]);
+if(C_truep(t12)){
+t13=t3;
+f_7362(t13,t12);}
+else{
+t13=(C_word)C_eqp(((C_word*)t0)[5],lf[622]);
+if(C_truep(t13)){
+t14=t3;
+f_7362(t14,t13);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[5],lf[623]);
+if(C_truep(t14)){
+t15=t3;
+f_7362(t15,t14);}
+else{
+t15=(C_word)C_eqp(((C_word*)t0)[5],lf[624]);
+t16=t3;
+f_7362(t16,(C_truep(t15)?t15:(C_word)C_eqp(((C_word*)t0)[5],lf[625])));}}}}}}}}}}}}}}
+
+/* k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7362(C_word t0,C_word 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_7362,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1065 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[587]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[588]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7374,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_7374(t4,t2);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[5],lf[612]);
+if(C_truep(t4)){
+t5=t3;
+f_7374(t5,t4);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+if(C_truep(t5)){
+t6=t3;
+f_7374(t6,t5);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[5],lf[613]);
+t7=t3;
+f_7374(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[5],lf[614])));}}}}}
+
+/* k7372 in k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7374(C_word t0,C_word 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_7374,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1067 string-append");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[113]+1)))(8,*((C_word*)lf[113]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[589],((C_word*)t0)[5],lf[590],((C_word*)t0)[5],lf[591]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[592]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7386,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_7386(t4,t2);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[4],lf[608]);
+if(C_truep(t4)){
+t5=t3;
+f_7386(t5,t4);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[4],lf[609]);
+if(C_truep(t5)){
+t6=t3;
+f_7386(t6,t5);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[4],lf[610]);
+t7=t3;
+f_7386(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[4],lf[611])));}}}}}
+
+/* k7384 in k7372 in k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7386(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_7386,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 1069 string-append");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[113]+1)))(6,*((C_word*)lf[113]+1),((C_word*)t0)[6],((C_word*)t0)[5],lf[593],((C_word*)t0)[4],lf[594]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7392,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_word)C_i_symbolp(((C_word*)t0)[2]))){
+C_trace("c-backend.scm: 1071 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[606]))(4,*((C_word*)lf[606]+1),t2,C_retrieve(lf[607]),((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_7392(2,t3,C_SCHEME_FALSE);}}}
+
+/* k7390 in k7384 in k7372 in k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7392(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_7392,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7396,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("g16951696");
+t3=t2;
+f_7396(t3,((C_word*)t0)[3],t1);}
+else{
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
+t2=(C_word)C_i_car(((C_word*)t0)[2]);
+t3=(C_word)C_eqp(t2,lf[595]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7431,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_7431(t5,t3);}
+else{
+t5=(C_word)C_eqp(t2,lf[598]);
+if(C_truep(t5)){
+t6=t4;
+f_7431(t6,t5);}
+else{
+t6=(C_word)C_eqp(t2,lf[599]);
+if(C_truep(t6)){
+t7=t4;
+f_7431(t7,t6);}
+else{
+t7=(C_word)C_eqp(t2,lf[600]);
+if(C_truep(t7)){
+t8=t4;
+f_7431(t8,t7);}
+else{
+t8=(C_word)C_eqp(t2,lf[601]);
+if(C_truep(t8)){
+t9=t4;
+f_7431(t9,t8);}
+else{
+t9=(C_word)C_eqp(t2,lf[602]);
+if(C_truep(t9)){
+t10=t4;
+f_7431(t10,t9);}
+else{
+t10=(C_word)C_eqp(t2,lf[603]);
+if(C_truep(t10)){
+t11=t4;
+f_7431(t11,t10);}
+else{
+t11=(C_word)C_eqp(t2,lf[604]);
+t12=t4;
+f_7431(t12,(C_truep(t11)?t11:(C_word)C_eqp(t2,lf[605])));}}}}}}}}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[4]);}}}
+
+/* k7429 in k7390 in k7384 in k7372 in k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7431(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: 1078 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[7],((C_word*)t0)[6],lf[596]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[5],lf[597]);
+if(C_truep(t2)){
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 1079 compute-size");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7343(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]);}}}
+
+/* g1695 in k7390 in k7384 in k7372 in k7360 in k7351 in compute-size in k7339 in k7333 in k7330 in k7327 in k7324 in g1501 in loop1494 in generate-foreign-callback-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7396(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_7396,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_vectorp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+C_trace("c-backend.scm: 1073 compute-size");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_7343(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t3=t2;
+C_trace("c-backend.scm: 1073 compute-size");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_7343(5,t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_6994(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_6994,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_7000,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_7000(t7,t1,t2);}
+
+/* loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7000(C_word t0,C_word 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_7000,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_7008,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7295,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));
+C_trace("g13901391");
+t6=t3;
+f_7008(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7293 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_7000(t3,((C_word*)t0)[2],t2);}
+
+/* g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7008(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_7008,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7012,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 984 foreign-stub-id");
+((C_proc3)C_retrieve_symbol_proc(lf[585]))(3,*((C_word*)lf[585]+1),t3,t2);}
+
+/* k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7012(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_7012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7015,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: 985 real-name2");
+((C_proc4)C_retrieve_symbol_proc(lf[584]))(4,*((C_word*)lf[584]+1),t2,t1,((C_word*)t0)[2]);}
+
+/* k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7015(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_7015,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7018,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: 986 foreign-stub-argument-types");
+((C_proc3)C_retrieve_symbol_proc(lf[583]))(3,*((C_word*)lf[583]+1),t2,((C_word*)t0)[2]);}
+
+/* k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7018(C_word c,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_7018,2,t0,t1);}
+t2=(C_word)C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7024,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_7292,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 988 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[280]))(4,*((C_word*)lf[280]+1),t4,t2,lf[582]);}
+
+/* k7290 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7292(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7292,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[581],t1);
+C_trace("c-backend.scm: 988 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t2,C_make_character(44));}
+
+/* k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7024(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_7024,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7027,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: 989 foreign-stub-return-type");
+((C_proc3)C_retrieve_symbol_proc(lf[580]))(3,*((C_word*)lf[580]+1),t2,((C_word*)t0)[2]);}
+
+/* k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7027(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_7027,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,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]=t1,a[9]=((C_word*)t0)[8],tmp=(C_word)a,a+=10,tmp);
+C_trace("c-backend.scm: 990 foreign-stub-name");
+((C_proc3)C_retrieve_symbol_proc(lf[579]))(3,*((C_word*)lf[579]+1),t2,((C_word*)t0)[2]);}
+
+/* k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7030(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_7030,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7033,a[2]=((C_word*)t0)[2],a[3]=((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: 991 foreign-stub-body");
+((C_proc3)C_retrieve_symbol_proc(lf[578]))(3,*((C_word*)lf[578]+1),t2,((C_word*)t0)[2]);}
+
+/* k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7033(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_7033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7036,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 992 foreign-stub-argument-names");
+((C_proc3)C_retrieve_symbol_proc(lf[577]))(3,*((C_word*)lf[577]+1),t2,((C_word*)t0)[2]);}
+
+/* k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7036(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_7036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_7039(2,t3,t1);}
+else{
+C_trace("c-backend.scm: 992 make-list");
+((C_proc4)C_retrieve_symbol_proc(lf[241]))(4,*((C_word*)lf[241]+1),t2,((C_word*)t0)[8],C_SCHEME_FALSE);}}
+
+/* k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7039(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_7039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7042,a[2]=((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: 993 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t2,((C_word*)t0)[9],lf[576]);}
+
+/* k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7042(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_7042,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7045,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 994 foreign-stub-cps");
+((C_proc3)C_retrieve_symbol_proc(lf[575]))(3,*((C_word*)lf[575]+1),t2,((C_word*)t0)[2]);}
+
+/* k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7045(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_7045,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7048,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: 995 foreign-stub-callback");
+((C_proc3)C_retrieve_symbol_proc(lf[574]))(3,*((C_word*)lf[574]+1),t2,((C_word*)t0)[2]);}
+
+/* k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7048(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_7048,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7051,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 996 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
+
+/* k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7051(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_7051,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7054,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_7281,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 998 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t3,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_7054(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k7279 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7281(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 998 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[572],t1,lf[573]);}
+
+/* k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7054(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_7054,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7057,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1000 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[570],((C_word*)t0)[6],lf[571]);}
+else{
+t3=t2;
+f_7057(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7057(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_7057,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7060,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1003 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[565],((C_word*)t0)[2],lf[566],C_SCHEME_TRUE,lf[567],((C_word*)t0)[2],lf[568]);}
+else{
+C_trace("c-backend.scm: 1005 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[569],((C_word*)t0)[2],C_make_character(40));}}
+
+/* k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7060(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_7060,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7063,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]);}
+
+/* k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7063(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_7063,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7066,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: 1008 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[560],C_SCHEME_TRUE,lf[561],((C_word*)t0)[2],lf[562]);}
+else{
+C_trace("c-backend.scm: 1009 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[563],C_SCHEME_TRUE,lf[564],((C_word*)t0)[2],C_make_character(40));}}
+
+/* k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7066(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_7066,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7069,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]);}
+
+/* k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7069(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_7069,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7072,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1011 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[559]);}
+
+/* k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7072(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_7072,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7075,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1012 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[558]);}
+
+/* k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7075(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_7075,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7078,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_7172,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: 1021 iota");
+((C_proc3)C_retrieve_symbol_proc(lf[59]))(3,*((C_word*)lf[59]+1),t3,((C_word*)t0)[6]);}
+
+/* k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7172,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_7174,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_7174(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7174(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_7174,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7181,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_word)C_i_pairp(t2))){
+t6=(C_word)C_i_pairp(t3);
+t7=t5;
+f_7181(t7,(C_truep(t6)?(C_word)C_i_pairp(t4):C_SCHEME_FALSE));}
+else{
+t6=t5;
+f_7181(t6,C_SCHEME_FALSE);}}
+
+/* k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_fcall f_7181(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_7181,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,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],tmp=(C_word)a,a+=7,tmp);
+t3=(C_word)C_slot(((C_word*)t0)[6],C_fix(0));
+t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(0));
+t5=(C_word)C_slot(((C_word*)t0)[4],C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7190,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_7202,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(t5)){
+C_trace("c-backend.scm: 1018 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t7,t5);}
+else{
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7208,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[337]))(2,*((C_word*)lf[337]+1),t8);}}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k7206 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7208,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7211,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(116),t1);}
+
+/* k7209 in k7206 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7214,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]);}
+
+/* k7212 in k7209 in k7206 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7214(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[333]))(3,*((C_word*)lf[333]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k7200 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7202(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1016 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);}
+
+/* k7188 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7190,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7194,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: 1019 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[557]);}
+
+/* k7192 in k7188 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7194(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_7194,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7198,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: 1020 foreign-argument-conversion");
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
+
+/* k7196 in k7192 in k7188 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7198(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1015 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[554],((C_word*)t0)[3],C_make_character(41),t1,lf[555],((C_word*)t0)[2],lf[556]);}
+
+/* k7218 in k7179 in loop1417 in k7170 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word *a;
+t2=(C_word)C_slot(((C_word*)t0)[6],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_7174(t5,((C_word*)t0)[2],t2,t3,t4);}
+
+/* k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7078(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_7078,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7081,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1022 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[553]);}
+else{
+t3=t2;
+f_7081(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7081(C_word c,C_word t0,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_7081,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7084,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_7090,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: 1024 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[544]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7111,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_word)C_eqp(((C_word*)t0)[5],lf[550]);
+if(C_truep(t4)){
+C_trace("c-backend.scm: 1035 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: 1034 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[552],((C_word*)t0)[2]);}}}
+
+/* k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7111,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7114,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: 1036 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));}
+
+/* k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7114(C_word c,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_7114,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7117,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_7148,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7152,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 1037 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t4,((C_word*)t0)[2],lf[551]);}
+
+/* k7150 in k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7152(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1037 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
+
+/* k7146 in k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7148(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);}
+
+/* k7115 in k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7117(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_7117,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7120,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_eqp(((C_word*)t0)[2],lf[550]);
+if(C_truep(t3)){
+t4=t2;
+f_7120(2,t4,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 1038 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
+
+/* k7118 in k7115 in k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7120(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_7120,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7123,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: 1039 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[549]);}
+
+/* k7121 in k7118 in k7115 in k7112 in k7109 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7123(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: 1041 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[545],C_SCHEME_TRUE,lf[546]);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+C_trace("c-backend.scm: 1043 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[547]);}
+else{
+C_trace("c-backend.scm: 1044 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[548]);}}}
+
+/* k7088 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7090(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_7090,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7093,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: 1026 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[543],C_SCHEME_TRUE);}
+
+/* k7091 in k7088 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7093(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: 1028 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[539],C_SCHEME_TRUE,lf[540]);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+C_trace("c-backend.scm: 1030 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[541]);}
+else{
+C_trace("c-backend.scm: 1031 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[542]);}}}
+
+/* k7082 in k7079 in k7076 in k7073 in k7070 in k7067 in k7064 in k7061 in k7058 in k7055 in k7052 in k7049 in k7046 in k7043 in k7040 in k7037 in k7034 in k7031 in k7028 in k7025 in k7022 in k7016 in k7013 in k7010 in g1390 in loop1383 in ##compiler#generate-foreign-stubs in k2573 in k2487 in k2484 */
+static void C_ccall f_7084(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 1045 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 k2573 in k2487 in k2484 */
+static void C_ccall f_6954(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_6954,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_6960,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_6960(t6,t1,t2);}
+
+/* loop1364 in ##compiler#generate-foreign-callback-stub-prototypes in k2573 in k2487 in k2484 */
+static void C_fcall f_6960(C_word t0,C_word 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_6960,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_6981,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_6972,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 976 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);}}
+
+/* k6970 in loop1364 in ##compiler#generate-foreign-callback-stub-prototypes in k2573 in k2487 in k2484 */
+static void C_ccall f_6972(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6972,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6975,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 977 generate-foreign-callback-header");
+((C_proc4)C_retrieve_symbol_proc(lf[537]))(4,*((C_word*)lf[537]+1),t2,lf[538],((C_word*)t0)[2]);}
+
+/* k6973 in k6970 in loop1364 in ##compiler#generate-foreign-callback-stub-prototypes in k2573 in k2487 in k2484 */
+static void C_ccall f_6975(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 978 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));}
+
+/* k6979 in loop1364 in ##compiler#generate-foreign-callback-stub-prototypes in k2573 in k2487 in k2484 */
+static void C_ccall f_6981(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_6960(t3,((C_word*)t0)[2],t2);}
+
+/* ##compiler#generate-external-variables in k2573 in k2487 in k2484 */
+static void C_ccall f_6900(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_6900,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6904,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 961 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE);}
+
+/* k6902 in ##compiler#generate-external-variables in k2573 in k2487 in k2484 */
+static void C_ccall f_6904(C_word c,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_6904,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_6909,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_6909(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop1344 in k6902 in ##compiler#generate-external-variables in k2573 in k2487 in k2484 */
+static void C_fcall f_6909(C_word t0,C_word 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_6909,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_6941,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_vector_ref(t4,C_fix(0));
+t6=(C_word)C_i_vector_ref(t4,C_fix(1));
+t7=(C_word)C_i_vector_ref(t4,C_fix(2));
+t8=(C_truep(t7)?lf[535]:lf[536]);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6938,a[2]=t8,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 967 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);}}
+
+/* k6936 in loop1344 in k6902 in ##compiler#generate-external-variables in k2573 in k2487 in k2484 */
+static void C_ccall f_6938(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 967 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));}
+
+/* k6939 in loop1344 in k6902 in ##compiler#generate-external-variables in k2573 in k2487 in k2484 */
+static void C_ccall f_6941(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_6909(t3,((C_word*)t0)[2],t2);}
+
+/* ##compiler#make-argument-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6884(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_6884,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6890,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 953 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[534]))(4,*((C_word*)lf[534]+1),t1,t2,t4);}
+
+/* a6889 in ##compiler#make-argument-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6890(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_6890,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6898,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 955 number->string");
+C_number_to_string(3,0,t3,t2);}
+
+/* k6896 in a6889 in ##compiler#make-argument-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6898(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 955 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* ##compiler#make-variable-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6868(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_6868,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6874,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 948 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[534]))(4,*((C_word*)lf[534]+1),t1,t2,t4);}
+
+/* a6873 in ##compiler#make-variable-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6874(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_6874,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6882,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 950 number->string");
+C_number_to_string(3,0,t3,t2);}
+
+/* k6880 in a6873 in ##compiler#make-variable-list in k2573 in k2487 in k2484 */
+static void C_ccall f_6882(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 950 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[3],lf[533],((C_word*)t0)[2],t1);}
+
+/* ##compiler#cleanup in k2573 in k2487 in k2484 */
+static void C_ccall f_6779(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_6779,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_word)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_6788,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_6788(t9,t1,C_fix(0));}
+
+/* loop in ##compiler#cleanup in k2573 in k2487 in k2484 */
+static void C_fcall f_6788(C_word t0,C_word 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_6788,NULL,3,t0,t1,t2);}
+t3=t2;
+if(C_truep((C_word)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_word)C_i_string_ref(((C_word*)t0)[3],t2);
+t5=(C_word)C_fixnum_lessp(t4,C_make_character(32));
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6817,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_6817(t7,t5);}
+else{
+t7=(C_word)C_fixnum_greaterp(t4,C_make_character(126));
+if(C_truep(t7)){
+t8=t6;
+f_6817(t8,t7);}
+else{
+t8=(C_word)C_eqp(t4,C_make_character(42));
+if(C_truep(t8)){
+t9=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
+t10=t2;
+if(C_truep((C_word)C_fixnum_lessp(t10,t9))){
+t11=(C_word)C_fixnum_increase(t2);
+t12=(C_word)C_i_string_ref(((C_word*)t0)[3],t11);
+t13=t6;
+f_6817(t13,(C_word)C_eqp(C_make_character(47),t12));}
+else{
+t11=t6;
+f_6817(t11,C_SCHEME_FALSE);}}
+else{
+t9=t6;
+f_6817(t9,C_SCHEME_FALSE);}}}}}
+
+/* k6815 in loop in ##compiler#cleanup in k2573 in k2487 in k2484 */
+static void C_fcall f_6817(C_word t0,C_word t1){
+C_word 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_6817,NULL,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
+t2=(C_word)C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],C_make_character(126));
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 942 loop");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_6788(t4,((C_word*)t0)[4],t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6827,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: 939 string-copy");
+((C_proc3)C_retrieve_symbol_proc(lf[532]))(3,*((C_word*)lf[532]+1),t2,((C_word*)t0)[3]);}}
+else{
+if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
+t2=(C_word)C_i_string_set(((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[2]);
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 942 loop");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_6788(t4,((C_word*)t0)[4],t3);}
+else{
+t2=(C_word)C_fixnum_increase(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 942 loop");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_6788(t3,((C_word*)t0)[4],t2);}}}
+
+/* k6825 in k6815 in loop in ##compiler#cleanup in k2573 in k2487 in k2484 */
+static void C_ccall f_6827(C_word 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_word)C_i_string_set(((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4],C_make_character(126));
+t4=(C_word)C_fixnum_increase(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 942 loop");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_6788(t5,((C_word*)t0)[2],t4);}
+
+/* emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6702(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_6702,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6706,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_i_length(t2);
+t6=(C_word)C_fixnum_increase(t5);
+C_trace("c-backend.scm: 904 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[529],C_SCHEME_TRUE,lf[530],t6,lf[531]);}
+
+/* k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6706(C_word c,C_word t0,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_6706,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6709,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_6720,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_6720(t6,t2,((C_word*)t0)[2]);}
+
+/* doloop1286 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_fcall f_6720(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_6720,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+C_trace("c-backend.scm: 908 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_SCHEME_TRUE,lf[521]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6733,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_word)C_i_car(t2);
+C_trace("c-backend.scm: 909 lambda-literal-id");
+((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t3,t4);}}
+
+/* k6731 in doloop1286 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6733(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_6733,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6736,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_6765,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 910 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[528]))(3,*((C_word*)lf[528]+1),t3,((C_word*)t0)[2]);}
+
+/* k6763 in k6731 in doloop1286 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6765(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 910 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[526],((C_word*)t0)[2],C_make_character(58),t1,lf[527]);}
+
+/* k6734 in k6731 in doloop1286 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6736(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_6736,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6739,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_eqp(lf[256],((C_word*)t0)[2]);
+if(C_truep(t3)){
+if(C_truep(C_retrieve(lf[207]))){
+C_trace("c-backend.scm: 913 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[522],C_retrieve(lf[207]),lf[523]);}
+else{
+C_trace("c-backend.scm: 914 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[524]);}}
+else{
+C_trace("c-backend.scm: 915 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[525]);}}
+
+/* k6737 in k6734 in k6731 in doloop1286 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_6720(t3,((C_word*)t0)[2],t2);}
+
+/* k6707 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6709(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6709,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6712,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 916 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[520]);}
+
+/* k6710 in k6707 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6712(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6712,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6715,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 917 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[519]);}
+
+/* k6713 in k6710 in k6707 in k6704 in emit-procedure-table-info in k2573 in k2487 in k2484 */
+static void C_ccall f_6715(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 918 gen");
+((C_proc15)C_retrieve_proc(*((C_word*)lf[1]+1)))(15,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[512],C_SCHEME_TRUE,lf[513],C_SCHEME_TRUE,lf[514],C_SCHEME_TRUE,lf[515],C_SCHEME_TRUE,lf[516],C_SCHEME_TRUE,lf[517],C_SCHEME_TRUE,lf[518]);}
+
+/* ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2577(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_2577,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_2580,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_2622,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_4410,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_4579,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_4750,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_5090,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_5420,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_5475,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_5669,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_5811,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_5888,tmp=(C_word)a,a+=2,tmp));
+t44=C_set_block_item(t32,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5900,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_6669,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: 887 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[495]))(4,*((C_word*)lf[495]+1),t45,lf[510],lf[511]);}
+
+/* k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6669(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_6669,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_6673,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: 889 header");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_4410(t4,t3);}
+
+/* k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6673(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_6673,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6676,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: 890 declarations");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_4579(t3,t2);}
+
+/* k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6676(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_6676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6679,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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: 891 generate-external-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[508]))(3,*((C_word*)lf[508]+1),t2,C_retrieve(lf[509]));}
+
+/* k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6679(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_6679,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6682,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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: 892 generate-foreign-stubs");
+((C_proc4)C_retrieve_symbol_proc(lf[506]))(4,*((C_word*)lf[506]+1),t2,C_retrieve(lf[507]),((C_word*)t0)[3]);}
+
+/* k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6682(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_6682,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6685,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: 893 prototypes");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_4750(t3,t2);}
+
+/* k6683 in k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6688,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: 894 generate-foreign-callback-stubs");
+((C_proc4)C_retrieve_symbol_proc(lf[505]))(4,*((C_word*)lf[505]+1),t2,C_retrieve(lf[201]),((C_word*)t0)[2]);}
+
+/* k6686 in k6683 in k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6688(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_6688,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6691,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: 895 trampolines");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_5090(t3,t2);}
+
+/* k6689 in k6686 in k6683 in k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6691(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_6691,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6694,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: 896 procedures");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_5900(t3,t2);}
+
+/* k6692 in k6689 in k6686 in k6683 in k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6694(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6694,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6697,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 897 emit-procedure-table-info");
+((C_proc4)C_retrieve_symbol_proc(lf[504]))(4,*((C_word*)lf[504]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6695 in k6692 in k6689 in k6686 in k6683 in k6680 in k6677 in k6674 in k6671 in k6667 in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6697(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: 468 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[503],C_SCHEME_TRUE);}
+
+/* procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5900(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_5900,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_5906,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_5906(t5,t1,((C_word*)t0)[2]);}
+
+/* loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5906(C_word t0,C_word 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_5906,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_5914,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_6655,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));
+C_trace("g10091010");
+t6=t3;
+f_5914(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6653 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5906(t3,((C_word*)t0)[2],t2);}
+
+/* g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5914(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_5914,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5918,a[2]=((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: 711 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t3,t2);}
+
+/* k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5918(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_5918,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5921,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 712 lambda-literal-id");
+((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[6]);}
+
+/* k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5921,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5924,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: 713 real-name");
+((C_proc4)C_retrieve_symbol_proc(lf[502]))(4,*((C_word*)lf[502]+1),t2,t1,((C_word*)t0)[2]);}
+
+/* k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5924(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_5924,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5927,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: 714 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[276]))(3,*((C_word*)lf[276]+1),t2,((C_word*)t0)[6]);}
+
+/* k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5927(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_5927,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5930,a[2]=((C_word*)t0)[2],a[3]=((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: 715 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[279]))(3,*((C_word*)lf[279]+1),t2,((C_word*)t0)[7]);}
+
+/* k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5930(C_word c,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_5930,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_5933,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 716 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t4,((C_word*)t0)[8]);}
+
+/* k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5933,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5936,a[2]=((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_6652,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 717 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),t3,((C_word*)t0)[8]);}
+else{
+t3=t2;
+f_5936(t3,C_SCHEME_FALSE);}}
+
+/* k6650 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6652(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_5936(t2,(C_word)C_eqp(t1,C_fix(0)));}
+
+/* k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5936(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_5936,NULL,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_fixnum_difference(((C_word*)t0)[13],C_fix(1)):(C_word)C_a_i_minus(&a,2,((C_word*)t0)[13],C_fix(0)));
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5942,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: 719 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[280]))(4,*((C_word*)lf[280]+1),t3,((C_word*)t0)[13],lf[501]);}
+
+/* k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5942(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_5942,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5945,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: 720 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t2,((C_word*)t0)[13],lf[500]);}
+
+/* k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5945(C_word c,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_5945,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5948,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_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 721 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: 721 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
+
+/* k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5948(C_word c,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_5948,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5951,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_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 722 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: 722 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t2,t3,C_make_character(44));}}
+
+/* k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5951(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_5951,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_5954,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 723 lambda-literal-external");
+((C_proc3)C_retrieve_symbol_proc(lf[332]))(3,*((C_word*)lf[332]+1),t2,((C_word*)t0)[12]);}
+
+/* k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5954(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_5954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_5957,a[2]=((C_word*)t0)[2],a[3]=((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: 724 lambda-literal-looping");
+((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),t2,((C_word*)t0)[13]);}
+
+/* k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5957(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_5957,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_5960,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: 725 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[277]))(3,*((C_word*)lf[277]+1),t2,((C_word*)t0)[14]);}
+
+/* k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[21],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_5963,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 726 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[278]))(3,*((C_word*)lf[278]+1),t2,((C_word*)t0)[15]);}
+
+/* k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5963(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_5963,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_5966,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],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: 727 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t2,((C_word*)t0)[16]);}
+
+/* k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[23],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5966,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5969,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep(C_retrieve(lf[207]))){
+C_trace("c-backend.scm: 729 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t2,C_retrieve(lf[207]),lf[498]);}
+else{
+t3=t2;
+f_5969(2,t3,lf[499]);}}
+
+/* k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5969(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_5969,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_5972,a[2]=((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],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_word*)t0)[4])){
+C_trace("c-backend.scm: 731 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[495]))(5,*((C_word*)lf[495]+1),t2,lf[496],lf[497],((C_word*)t0)[14]);}
+else{
+t3=t2;
+f_5972(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5972(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_5972,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_5975,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 732 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5975(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word ab[26],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5975,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5978,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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6621,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 733 cleanup");
+((C_proc3)C_retrieve_symbol_proc(lf[494]))(3,*((C_word*)lf[494]+1),t3,((C_word*)t0)[2]);}
+
+/* k6619 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6621(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 733 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[492],t1,lf[493],C_SCHEME_TRUE);}
+
+/* k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5978(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word ab[29],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5981,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_eqp(lf[256],((C_word*)t0)[14]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6604,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 742 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[486]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6582,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[14],a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 735 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[491]);}}
+
+/* k6580 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6582(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_6582,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6585,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: 736 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[489]);}
+else{
+C_trace("c-backend.scm: 736 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[490]);}}
+
+/* k6583 in k6580 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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: 738 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[487]);}
+else{
+C_trace("c-backend.scm: 739 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[488]);}}
+
+/* k6586 in k6583 in k6580 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6588(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 740 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]);}
+
+/* k6602 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6604(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_6604,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6607,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[207]))){
+t3=t2;
+f_6607(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 744 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[485]);}}
+
+/* k6605 in k6602 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6607(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 745 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[479],C_SCHEME_TRUE,lf[480],C_SCHEME_TRUE,lf[481],C_SCHEME_TRUE,lf[482],((C_word*)t0)[2],lf[483],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[484],((C_word*)t0)[2]);}
+
+/* k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5981(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_5981,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5984,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("c-backend.scm: 750 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
+
+/* k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5984(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_5984,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5987,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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(((C_word*)t0)[10])){
+t3=t2;
+f_5987(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 751 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[478]);}}
+
+/* k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5987(C_word c,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_5987,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5990,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6554,a[2]=t2,a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[9])){
+t4=(C_word)C_eqp(((C_word*)t0)[17],C_fix(0));
+t5=t3;
+f_6554(t5,(C_word)C_i_not(t4));}
+else{
+t4=t3;
+f_6554(t4,C_SCHEME_FALSE);}}
+
+/* k6552 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6554(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_6554,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6557,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 753 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[477]);}
+else{
+t2=((C_word*)t0)[2];
+f_5990(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k6555 in k6552 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6557(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_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 754 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_5990(2,t3,t2);}}
+
+/* k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5990(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_5990,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5993,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_apply(4,0,t2,*((C_word*)lf[1]+1),((C_word*)t0)[15]);}
+
+/* k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5993(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_5993,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5996,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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(((C_word*)((C_word*)t0)[21])[1])){
+C_trace("c-backend.scm: 756 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[476]);}
+else{
+t3=t2;
+f_5996(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[23],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_5999,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("c-backend.scm: 757 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[475]);}
+
+/* k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5999(C_word c,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_5999,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_eqp(((C_word*)t0)[13],lf[245]);
+if(C_truep(t3)){
+t4=C_set_block_item(((C_word*)t0)[21],0,C_SCHEME_FALSE);
+t5=t2;
+f_6002(t5,t4);}
+else{
+t4=t2;
+f_6002(t4,C_SCHEME_UNDEFINED);}}
+
+/* k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6002(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_6002,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_6005,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("c-backend.scm: 759 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[474]);}
+
+/* k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6005(C_word c,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_6005,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|22,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)[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(((C_word*)((C_word*)t0)[21])[1])){
+C_trace("c-backend.scm: 761 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[472],((C_word*)t0)[20],C_make_character(59));}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6514,a[2]=((C_word*)t0)[20],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[2])){
+t4=(C_word)C_fixnum_decrease(((C_word*)t0)[20]);
+t5=t3;
+f_6514(t5,(C_word)C_fixnum_plus(((C_word*)t0)[16],t4));}
+else{
+t4=t3;
+f_6514(t4,((C_word*)t0)[16]);}}}
+
+/* k6512 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6514(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_6514,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_6516,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_6516(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* doloop1061 in k6512 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6516(C_word t0,C_word 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_6516,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_6526,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: 765 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[473],t2,C_make_character(59));}}
+
+/* k6524 in doloop1061 in k6512 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6526(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_fixnum_increase(((C_word*)t0)[5]);
+t3=(C_word)C_fixnum_decrease(((C_word*)t0)[4]);
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_6516(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6008(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_6008,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_6011,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],a[9]=((C_word*)t0)[15],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)[20],a[15]=((C_word*)t0)[21],a[16]=((C_word*)t0)[22],tmp=(C_word)a,a+=17,tmp);
+t3=(C_word)C_eqp(lf[256],((C_word*)t0)[14]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6228,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[17],a[4]=((C_word*)t0)[6],a[5]=t2,a[6]=((C_word*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6303,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 767 fold");
+((C_proc5)C_retrieve_symbol_proc(lf[439]))(5,*((C_word*)lf[439]+1),t4,t5,C_fix(0),((C_word*)t0)[7]);}
+else{
+if(C_truep(((C_word*)((C_word*)t0)[21])[1])){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6317,a[2]=((C_word*)t0)[3],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: 801 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[453]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6381,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[20],a[4]=((C_word*)t0)[13],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],a[7]=t2,a[8]=((C_word*)t0)[17],a[9]=((C_word*)t0)[2],tmp=(C_word)a,a+=10,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6459,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[17],a[4]=t4,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+t6=((C_word*)t0)[9];
+if(C_truep(t6)){
+t7=t5;
+f_6459(t7,C_SCHEME_FALSE);}
+else{
+t7=((C_word*)t0)[17];
+t8=t5;
+f_6459(t8,(C_word)C_fixnum_greaterp(t7,C_fix(0)));}}}}
+
+/* k6457 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6459(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_6459,NULL,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep(((C_word*)t0)[5])){
+C_trace("c-backend.scm: 815 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[463],C_SCHEME_TRUE,lf[464],C_SCHEME_TRUE,lf[465],((C_word*)t0)[3],lf[466]);}
+else{
+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)[4],C_SCHEME_TRUE,lf[467],((C_word*)t0)[3],lf[468]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6471,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_6471(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 820 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[471]);}}}
+
+/* k6469 in k6457 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6471(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_6471,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6474,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: 821 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[470]);}
+else{
+t3=t2;
+f_6474(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6472 in k6469 in k6457 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6474(C_word c,C_word t0,C_word 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[129]);
+if(C_truep(t2)){
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[2];
+f_6381(2,t4,t3);}
+else{
+t3=C_retrieve(lf[433]);
+if(C_truep(t3)){
+t4=C_SCHEME_UNDEFINED;
+t5=((C_word*)t0)[2];
+f_6381(2,t5,t4);}
+else{
+C_trace("c-backend.scm: 823 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[469]);}}}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[2];
+f_6381(2,t3,t2);}}
+
+/* k6379 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6381(C_word c,C_word t0,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_6381,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6384,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_6423,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[129]);
+if(C_truep(t4)){
+t5=t3;
+f_6423(t5,C_SCHEME_FALSE);}
+else{
+t5=C_retrieve(lf[447]);
+t6=t3;
+f_6423(t6,(C_truep(t5)?C_SCHEME_FALSE:(C_word)C_i_not(((C_word*)t0)[2])));}}
+else{
+t4=t3;
+f_6423(t4,C_SCHEME_FALSE);}}
+
+/* k6421 in k6379 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6423(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_eqp(((C_word*)t0)[4],lf[245]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(2)))){
+C_trace("c-backend.scm: 827 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[457],((C_word*)t0)[3],lf[458],((C_word*)t0)[3],lf[459]);}
+else{
+t4=((C_word*)t0)[2];
+f_6384(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+C_trace("c-backend.scm: 828 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[460],((C_word*)t0)[3],lf[461],((C_word*)t0)[3],lf[462]);}}
+else{
+t2=((C_word*)t0)[2];
+f_6384(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k6382 in k6379 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6384(C_word c,C_word t0,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_6384,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6390,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_6390(t4,C_SCHEME_FALSE);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+t4=((C_word*)t0)[2];
+t5=t2;
+f_6390(t5,t4);}
+else{
+t4=((C_word*)t0)[5];
+t5=t2;
+f_6390(t5,(C_word)C_fixnum_greaterp(t4,C_fix(0)));}}}
+
+/* k6388 in k6382 in k6379 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6390(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_6390,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6393,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[442]))){
+C_trace("c-backend.scm: 830 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[456]);}
+else{
+t3=t2;
+f_6393(2,t3,C_SCHEME_UNDEFINED);}}
+else{
+t2=((C_word*)t0)[2];
+f_6011(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k6391 in k6388 in k6382 in k6379 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+if(C_truep(((C_word*)t0)[4])){
+t2=((C_word*)t0)[3];
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
+C_trace("c-backend.scm: 832 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[454]);}
+else{
+C_trace("c-backend.scm: 833 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[455]);}}
+else{
+C_trace("c-backend.scm: 833 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[455]);}}
+
+/* k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6317(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_6317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6320,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: 802 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[452]);}
+
+/* k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6320(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_6320,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6323,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: 803 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[451]);}
+
+/* k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6323(C_word c,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_6323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6326,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_word)C_fixnum_greaterp(t3,C_fix(0)))){
+t4=(C_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+C_trace("c-backend.scm: 805 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: 806 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[450]);}}
+
+/* k6324 in k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6326(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_6326,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6329,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: 807 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[448],((C_word*)t0)[3],lf[449]);}
+
+/* k6327 in k6324 in k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6329(C_word c,C_word t0,C_word t1){
+C_word 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_6329,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6332,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_6344,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=C_retrieve(lf[129]);
+if(C_truep(t4)){
+t5=t3;
+f_6344(t5,C_SCHEME_FALSE);}
+else{
+t5=C_retrieve(lf[447]);
+if(C_truep(t5)){
+t6=t3;
+f_6344(t6,C_SCHEME_FALSE);}
+else{
+t6=((C_word*)t0)[3];
+t7=(C_word)C_fixnum_greaterp(t6,C_fix(2));
+t8=t3;
+f_6344(t8,(C_truep(t7)?(C_word)C_i_not(((C_word*)t0)[2]):C_SCHEME_FALSE));}}}
+
+/* k6342 in k6327 in k6324 in k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6344(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("c-backend.scm: 809 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[444],((C_word*)t0)[2],lf[445],((C_word*)t0)[2],lf[446]);}
+else{
+t2=((C_word*)t0)[3];
+f_6332(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k6330 in k6327 in k6324 in k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6332(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_6332,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6335,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[442]))){
+C_trace("c-backend.scm: 810 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[443]);}
+else{
+C_trace("c-backend.scm: 811 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[440],((C_word*)t0)[2],lf[441]);}}
+
+/* k6333 in k6330 in k6327 in k6324 in k6321 in k6318 in k6315 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6335(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 811 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[440],((C_word*)t0)[2],lf[441]);}
+
+/* a6302 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6303(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_6303,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6311,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 767 literal-size");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_5475(t5,t4,t2);}
+
+/* k6309 in a6302 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6311(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_fixnum_plus(((C_word*)t0)[2],t1));}
+
+/* k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6228(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_6228,2,t0,t1);}
+t2=(C_word)C_i_length(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6234,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: 769 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[435],C_SCHEME_TRUE,lf[436],C_SCHEME_TRUE,lf[437],((C_word*)t0)[2],lf[438]);}
+
+/* k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6234(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_6234,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6237,a[2]=((C_word*)t0)[2],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[433]))){
+C_trace("c-backend.scm: 773 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[434]);}
+else{
+t3=t2;
+f_6237(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6237(C_word c,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_6237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6240,a[2]=((C_word*)t0)[2],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[207]))){
+t3=t2;
+f_6240(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6271,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[426]))){
+C_trace("c-backend.scm: 776 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[427],C_retrieve(lf[426]),lf[428]);}
+else{
+if(C_truep(C_retrieve(lf[429]))){
+C_trace("c-backend.scm: 778 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[430],C_retrieve(lf[429]),lf[431],C_SCHEME_TRUE,lf[432]);}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t3;
+f_6271(2,t5,t4);}}}}
+
+/* k6269 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6271(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6271,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6274,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: 781 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_6274(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6272 in k6269 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6274(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6277,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[422]))){
+C_trace("c-backend.scm: 783 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[423],C_retrieve(lf[422]),C_make_character(59));}
+else{
+t3=t2;
+f_6277(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6275 in k6272 in k6269 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6277(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[419]))){
+C_trace("c-backend.scm: 785 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[420],C_retrieve(lf[419]),lf[421]);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[2];
+f_6240(2,t3,t2);}}
+
+/* k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6240(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_6240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6243,a[2]=((C_word*)t0)[2],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: 786 gen");
+((C_proc16)C_retrieve_proc(*((C_word*)lf[1]+1)))(16,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[412],((C_word*)t0)[3],lf[413],C_SCHEME_TRUE,lf[414],((C_word*)t0)[3],lf[415],C_SCHEME_TRUE,lf[416],C_SCHEME_TRUE,lf[417],C_SCHEME_TRUE,lf[418]);}
+
+/* k6241 in k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6243(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_6243,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6246,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: 791 gen");
+((C_proc14)C_retrieve_proc(*((C_word*)lf[1]+1)))(14,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[406],((C_word*)t0)[2],lf[407],C_SCHEME_TRUE,lf[408],C_SCHEME_TRUE,lf[409],((C_word*)t0)[2],lf[410],C_SCHEME_TRUE,lf[411]);}
+
+/* k6244 in k6241 in k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6246(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_6246,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6249,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: 795 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[404],((C_word*)t0)[2],lf[405]);}
+
+/* k6247 in k6244 in k6241 in k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6249(C_word c,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_6249,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[4],C_fix(0));
+if(C_truep(t2)){
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[3];
+f_6011(2,t4,t3);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6258,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: 797 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[402],((C_word*)t0)[4],lf[403]);}}
+
+/* k6256 in k6247 in k6244 in k6241 in k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6258(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_6258,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6261,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 798 literal-frame");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_5420(t3,t2);}
+
+/* k6259 in k6256 in k6247 in k6244 in k6241 in k6238 in k6235 in k6232 in k6226 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6261(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 799 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[400],((C_word*)t0)[2],lf[401]);}
+
+/* k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6011(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6011,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6014,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6034,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)[14],a[10]=t2,a[11]=((C_word*)t0)[11],a[12]=((C_word*)t0)[15],tmp=(C_word)a,a+=13,tmp);
+t4=(C_word)C_eqp(lf[256],((C_word*)t0)[8]);
+if(C_truep(t4)){
+t5=t3;
+f_6034(t5,C_SCHEME_FALSE);}
+else{
+t5=((C_word*)t0)[3];
+if(C_truep(t5)){
+t6=t3;
+f_6034(t6,C_SCHEME_FALSE);}
+else{
+t6=((C_word*)((C_word*)t0)[15])[1];
+if(C_truep(t6)){
+t7=t3;
+f_6034(t7,t6);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+t7=((C_word*)t0)[2];
+t8=t3;
+f_6034(t8,t7);}
+else{
+t7=((C_word*)t0)[11];
+t8=t3;
+f_6034(t8,(C_word)C_fixnum_greaterp(t7,C_fix(0)));}}}}}
+
+/* k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6034(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_6034,NULL,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep(((C_word*)((C_word*)t0)[12])[1])){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6040,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)C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
+C_trace("c-backend.scm: 844 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[391],lf[392],((C_word*)t0)[9],C_make_character(114));}
+else{
+C_trace("c-backend.scm: 844 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[393],lf[392],((C_word*)t0)[9],C_make_character(114));}}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6169,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[4],a[7]=((C_word*)t0)[10],tmp=(C_word)a,a+=8,tmp);
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[4],C_fix(0)))){
+C_trace("c-backend.scm: 870 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[397],lf[398]);}
+else{
+C_trace("c-backend.scm: 870 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[399],lf[398]);}}}
+else{
+t2=((C_word*)t0)[10];
+f_6014(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k6167 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6169(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_6169,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6172,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: 872 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,((C_word*)t0)[3],lf[395]);}
+else{
+C_trace("c-backend.scm: 873 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,((C_word*)t0)[2],lf[396],((C_word*)t0)[3]);}}
+
+/* k6170 in k6167 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6172(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_6172,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6175,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6184,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 875 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: 877 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[4],lf[394]);}}
+
+/* k6182 in k6170 in k6167 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6184(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]);}
+
+/* k6173 in k6170 in k6167 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6175(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 877 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[394]);}
+
+/* k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6040(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_6040,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6043,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_eqp(((C_word*)t0)[4],lf[331]);
+if(C_truep(t3)){
+C_trace("c-backend.scm: 845 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(118));}
+else{
+t4=t2;
+f_6043(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6043(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_6043,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6046,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 846 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[389],((C_word*)t0)[5],lf[390]);}
+
+/* k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6046(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_6046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6049,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)C_fixnum_greaterp(((C_word*)t0)[3],C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6150,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 848 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_6049(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6148 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6150(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]);}
+
+/* k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6049,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6052,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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: 850 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,lf[385],C_SCHEME_TRUE,lf[386],C_SCHEME_TRUE,lf[387],((C_word*)t0)[6],lf[388]);}
+
+/* k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6052(C_word c,C_word t0,C_word 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_6052,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,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],a[7]=((C_word*)t0)[8],tmp=(C_word)a,a+=8,tmp);
+t3=(C_word)C_eqp(((C_word*)t0)[2],lf[380]);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(((C_word*)t0)[2],C_SCHEME_FALSE));
+if(C_truep(t4)){
+C_trace("c-backend.scm: 854 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[381],((C_word*)t0)[6],lf[382]);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[2],lf[331]);
+if(C_truep(t5)){
+C_trace("c-backend.scm: 855 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[383],((C_word*)t0)[6],lf[384]);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t2;
+f_6055(2,t7,t6);}}}
+
+/* k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6055(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_6055,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6058,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 856 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[379]);}
+
+/* k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t5;
+C_word ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6058,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6061,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_6119,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6123,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 857 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t4,((C_word*)t0)[5],lf[378]);}
+
+/* k6121 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6123(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 857 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
+
+/* k6117 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6119(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);}
+
+/* k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6061(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_6061,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6064,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 858 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[376],((C_word*)t0)[5],lf[377]);}
+
+/* k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6064(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_6064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6067,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: 860 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[374],((C_word*)t0)[2],lf[375]);}
+
+/* k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6067(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_6067,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6070,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]);}
+
+/* k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6070(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_6070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6073,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: 862 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[372],((C_word*)t0)[3],lf[373]);}
+
+/* k6071 in k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6073(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_6073,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6076,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: 863 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[371]);}
+
+/* k6074 in k6071 in k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6076(C_word c,C_word t0,C_word 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_6076,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6079,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)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_6094,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t7=((C_word*)t5)[1];
+f_6094(t7,t2,t3,((C_word*)t0)[2]);}
+
+/* doloop1208 in k6074 in k6071 in k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_6094(C_word t0,C_word 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_6094,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_6104,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: 867 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[370],t2,C_make_character(59));}}
+
+/* k6102 in doloop1208 in k6074 in k6071 in k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word *a;
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_6094(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k6077 in k6074 in k6071 in k6068 in k6065 in k6062 in k6059 in k6056 in k6053 in k6050 in k6047 in k6044 in k6041 in k6038 in k6032 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6079(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_word)C_fixnum_greaterp(t2,C_fix(0)))){
+C_trace("c-backend.scm: 868 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[368],((C_word*)t0)[3],lf[369]);}
+else{
+t3=((C_word*)t0)[2];
+f_6014(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k6012 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6014(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_6014,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6017,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6024,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: 879 lambda-literal-body");
+((C_proc3)C_retrieve_symbol_proc(lf[367]))(3,*((C_word*)lf[367]+1),t3,((C_word*)t0)[2]);}
+
+/* k6022 in k6012 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6024(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_word)C_fixnum_increase(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 878 expression");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2622(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[5];
+C_trace("c-backend.scm: 878 expression");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2622(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}}
+
+/* k6015 in k6012 in k6009 in k6006 in k6003 in k6000 in k5997 in k5994 in k5991 in k5988 in k5985 in k5982 in k5979 in k5976 in k5973 in k5970 in k5967 in k5964 in k5961 in k5958 in k5955 in k5952 in k5949 in k5946 in k5943 in k5940 in k5934 in k5931 in k5928 in k5925 in k5922 in k5919 in k5916 in g1009 in loop1002 in procedures in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_6017(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 884 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 k2573 in k2487 in k2484 */
+static void C_fcall f_5888(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_5888,NULL,4,t1,t2,t3,t4);}
+t5=(C_word)C_fixnum_difference(t4,t3);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5895,a[2]=t5,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 704 make-string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[366]+1)))(3,*((C_word*)lf[366]+1),t6,t5);}
+
+/* k5893 in string-like-substring in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5895(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_5895,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5898,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 705 ##sys#copy-bytes");
+((C_proc7)C_retrieve_symbol_proc(lf[365]))(7,*((C_word*)lf[365]+1),t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
+
+/* k5896 in k5893 in string-like-substring in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5898(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 k2573 in k2487 in k2484 */
+static void C_fcall f_5811(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_5811,NULL,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5818,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: 693 fx/");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[364]+1)))(4,*((C_word*)lf[364]+1),t4,t3,C_fix(80));}
+
+/* k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5818,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5821,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: 694 modulo");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[363]+1)))(4,*((C_word*)lf[363]+1),t2,((C_word*)t0)[5],C_fix(80));}
+
+/* k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5821(C_word c,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_5821,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_5826,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_5826(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
+
+/* doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5826(C_word t0,C_word 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_5826,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t2,C_fix(0));
+if(C_truep(t4)){
+t5=(C_word)C_eqp(((C_word*)t0)[6],C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5842,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_5842(t7,t5);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[3],C_fix(0));
+t8=t6;
+f_5842(t8,(C_word)C_i_not(t7));}}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5863,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_5878,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5882,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_fixnum_plus(t3,C_fix(80));
+C_trace("c-backend.scm: 700 string-like-substring");
+f_5888(t7,((C_word*)t0)[4],t3,t8);}}
+
+/* k5880 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5882(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 700 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+
+/* k5876 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5878(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 700 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);}
+
+/* k5861 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word *a;
+t2=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(80));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_5826(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k5840 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5842(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_5842,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5849,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5853,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 699 string-like-substring");
+f_5888(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);}}
+
+/* k5851 in k5840 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 699 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+
+/* k5847 in k5840 in doloop978 in k5819 in k5816 in gen-string-constant in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5849(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 699 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 k2573 in k2487 in k2484 */
+static void C_fcall f_5669(C_word 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_5669,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5676,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_word)C_fixnump(t2))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5809,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 666 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),t5,t2);}
+else{
+t5=t4;
+f_5676(t5,C_SCHEME_FALSE);}}
+
+/* k5807 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5809(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_5676(t2,(C_word)C_i_not(t1));}
+
+/* k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5676(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_5676,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-backend.scm: 667 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[347],((C_word*)t0)[3],lf[348]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5682,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: 668 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[345]))(3,*((C_word*)lf[345]+1),t2,((C_word*)t0)[3]);}}
+
+/* k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5682(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_5682,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[349]);
+t3=(C_word)C_eqp(((C_word*)t0)[4],t2);
+if(C_truep(t3)){
+C_trace("c-backend.scm: 670 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[350]);}
+else{
+if(C_truep((C_word)C_booleanp(((C_word*)t0)[4]))){
+if(C_truep(((C_word*)t0)[4])){
+C_trace("c-backend.scm: 672 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[351],C_make_character(59));}
+else{
+C_trace("c-backend.scm: 672 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[352],C_make_character(59));}}
+else{
+if(C_truep((C_word)C_charp(((C_word*)t0)[4]))){
+t4=(C_word)C_fix((C_word)C_character_code(((C_word*)t0)[4]));
+C_trace("c-backend.scm: 674 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[353],t4,lf[354]);}
+else{
+if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[4]))){
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5732,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: 677 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),t5,t4);}
+else{
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 682 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[358]);}
+else{
+t4=(C_word)C_immp(((C_word*)t0)[4]);
+t5=(C_truep(t4)?C_SCHEME_FALSE:(C_word)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_word)C_fixnump(((C_word*)t0)[4]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5765,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_5765(t8,t6);}
+else{
+t8=(C_word)C_immp(((C_word*)t0)[4]);
+t9=t7;
+f_5765(t9,(C_word)C_i_not(t8));}}}}}}}}}
+
+/* k5763 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5765(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_5765,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5768,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: 686 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[361]);}
+else{
+t2=((C_word*)t0)[5];
+t3=((C_word*)t0)[3];
+C_trace("c-backend.scm: 643 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[342],t3);}}
+
+/* k5766 in k5763 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5768,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5771,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5778,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 687 encode-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[360]))(3,*((C_word*)lf[360]+1),t3,((C_word*)t0)[2]);}
+
+/* k5776 in k5766 in k5763 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5778(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 687 gen-string-constant");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_5811(t2,((C_word*)t0)[2],t1);}
+
+/* k5769 in k5766 in k5763 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5771(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 688 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[359]);}
+
+/* k5730 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5732(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_5732,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5738,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: 679 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[357]);}
+
+/* k5736 in k5730 in k5680 in k5674 in gen-lit in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5738(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 680 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),((C_word*)t0)[5],lf[355],((C_word*)t0)[4],C_make_character(44),((C_word*)t0)[3],C_make_character(44),((C_word*)t0)[2],lf[356]);}
+
+/* literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5475(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_5475,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5482,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 646 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[346]))(3,*((C_word*)lf[346]+1),t3,t2);}
+
+/* k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5482(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_5482,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_word)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_word)C_i_numberp(((C_word*)t0)[3]))){
+t2=C_retrieve(lf[338]);
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+if(C_truep((C_word)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_word)C_i_pairp(((C_word*)t0)[3]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5513,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)[3]);
+C_trace("c-backend.scm: 650 literal-size");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_5475(t4,t2,t3);}
+else{
+if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[3]))){
+t2=(C_word)C_i_vector_length(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5542,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_5546,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5550,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: 651 vector->list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[341]+1)))(3,*((C_word*)lf[341]+1),t9,((C_word*)t0)[3]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5591,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: 652 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[345]))(3,*((C_word*)lf[345]+1),t2,((C_word*)t0)[3]);}}}}}}}
+
+/* k5589 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5591(C_word c,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_5591,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_word)C_immp(((C_word*)t0)[3]))){
+t2=((C_word*)t0)[4];
+t3=((C_word*)t0)[3];
+C_trace("c-backend.scm: 643 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[342],t3);}
+else{
+if(C_truep((C_word)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_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);
+C_trace("c-backend.scm: 655 ##sys#bytevector?");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[344]+1)))(3,*((C_word*)lf[344]+1),t2,((C_word*)t0)[3]);}}}}
+
+/* k5607 in k5589 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 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_5609,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5616,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_block_size(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 655 words");
+((C_proc3)C_retrieve_symbol_proc(lf[343]))(3,*((C_word*)lf[343]+1),t2,t3);}
+else{
+if(C_truep((C_word)C_structurep(((C_word*)t0)[3]))){
+t2=(C_word)C_block_size(((C_word*)t0)[3]);
+t3=(C_word)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_5638,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_5638(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: 643 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[8]))(4,*((C_word*)lf[8]+1),t2,lf[342],t3);}}}
+
+/* loop in k5607 in k5589 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5638(C_word t0,C_word 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_5638,NULL,4,t0,t1,t2,t3);}
+t4=t2;
+if(C_truep((C_word)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_word)C_fixnum_increase(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5660,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_slot(((C_word*)t0)[3],t2);
+C_trace("c-backend.scm: 661 literal-size");
+t8=((C_word*)((C_word*)t0)[2])[1];
+f_5475(t8,t6,t7);}}
+
+/* k5658 in loop in k5607 in k5589 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5660(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_plus(((C_word*)t0)[5],t1);
+C_trace("c-backend.scm: 661 loop");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_5638(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k5614 in k5607 in k5589 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5616(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(2),t1));}
+
+/* k5548 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5550(C_word c,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_5550,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_5552,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_5552(t5,((C_word*)t0)[2],t1);}
+
+/* loop913 in k5548 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5552(C_word 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_5552,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_5581,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));
+C_trace("g929930");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_5475(t5,t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5579 in loop913 in k5548 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5581(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5581,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));
+C_trace("loop913926");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5552(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));
+C_trace("loop913926");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5552(t6,((C_word*)t0)[3],t5);}}
+
+/* k5544 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5546(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 651 reduce");
+((C_proc5)C_retrieve_symbol_proc(lf[339]))(5,*((C_word*)lf[339]+1),((C_word*)t0)[2],*((C_word*)lf[340]+1),C_fix(0),t1);}
+
+/* k5540 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5542(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_fixnum_plus((C_word)C_fixnum_plus(C_fix(1),((C_word*)t0)[2]),t1));}
+
+/* k5511 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5513(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_5513,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5517,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]);
+C_trace("c-backend.scm: 650 literal-size");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_5475(t4,t2,t3);}
+
+/* k5515 in k5511 in k5480 in literal-size in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5517(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_fixnum_plus((C_word)C_fixnum_plus(C_fix(3),((C_word*)t0)[2]),t1));}
+
+/* literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5420(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_5420,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_5426,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_5426(t5,t1,C_fix(0),((C_word*)t0)[2]);}
+
+/* doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5426(C_word t0,C_word 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_5426,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_5436,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t5=(C_word)C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5455,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[337]))(2,*((C_word*)lf[337]+1),t6);}}
+
+/* k5453 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5455(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_5455,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5458,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[336],t1);}
+
+/* k5456 in k5453 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5461,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[335]+1)))(4,*((C_word*)lf[335]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* k5459 in k5456 in k5453 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5461(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_5461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5464,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[334]);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(93),((C_word*)t0)[2]);}
+
+/* k5462 in k5459 in k5456 in k5453 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5464,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5467,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[333]))(3,*((C_word*)lf[333]+1),t2,((C_word*)t0)[2]);}
+
+/* k5465 in k5462 in k5459 in k5456 in k5453 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5467(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 640 gen-lit");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_5669(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k5434 in doloop887 in literal-frame in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word *a;
+t2=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_5426(t4,((C_word*)t0)[2],t2,t3);}
+
+/* trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5090(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[32],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_5090,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_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_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5093,tmp=(C_word)a,a+=2,tmp));
+t13=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5129,a[2]=t9,tmp=(C_word)a,a+=3,tmp));
+t14=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5209,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=t11,a[6]=t7,a[7]=t1,tmp=(C_word)a,a+=8,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|6,a[1]=(C_word)f_5279,a[2]=t16,a[3]=t3,a[4]=t5,a[5]=t7,a[6]=t9,tmp=(C_word)a,a+=7,tmp));
+t18=((C_word*)t16)[1];
+f_5279(t18,t14,((C_word*)t0)[2]);}
+
+/* loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5279(C_word t0,C_word 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_5279,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_5287,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_5407,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));
+C_trace("g808809");
+t6=t3;
+f_5287(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5405 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5407(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_5279(t3,((C_word*)t0)[2],t2);}
+
+/* g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5287(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_5287,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5291,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]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("c-backend.scm: 599 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t3,t2);}
+
+/* k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5291(C_word c,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_5291,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_5294,a[2]=((C_word*)t0)[2],a[3]=((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("c-backend.scm: 600 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[279]))(3,*((C_word*)lf[279]+1),t4,((C_word*)t0)[2]);}
+
+/* k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5294,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5297,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: 601 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[278]))(3,*((C_word*)lf[278]+1),t2,((C_word*)t0)[2]);}
+
+/* k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5297(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_5297,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5300,a[2]=((C_word*)t0)[2],a[3]=((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: 602 lambda-literal-id");
+((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
+
+/* k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5300,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5303,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("c-backend.scm: 603 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[2]);}
+
+/* k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5306,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep(t1)){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5404,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 604 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),t3,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_5306(t3,C_SCHEME_FALSE);}}
+
+/* k5402 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5404(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_5306(t2,(C_word)C_eqp(t1,C_fix(0)));}
+
+/* k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5306(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_5306,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5309,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+if(C_truep(t1)){
+t3=(C_word)C_fixnum_decrease(((C_word*)((C_word*)t0)[10])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[10])+1,t3);
+t5=t2;
+f_5309(t5,t4);}
+else{
+t3=t2;
+f_5309(t3,C_SCHEME_UNDEFINED);}}
+
+/* k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5309(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_5309,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5315,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 606 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[277]))(3,*((C_word*)lf[277]+1),t2,((C_word*)t0)[2]);}
+
+/* k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5315(C_word c,C_word t0,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_5315,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[12];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+if(C_truep(((C_word*)t0)[11])){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5321,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[12],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 608 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[327],((C_word*)t0)[9],lf[328],C_SCHEME_TRUE,lf[329],((C_word*)t0)[9],lf[330]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5349,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)[12],a[7]=((C_word*)t0)[6],a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=t2;
+f_5349(2,t3,((C_word*)t0)[3]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5393,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 616 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[276]))(3,*((C_word*)lf[276]+1),t3,((C_word*)t0)[2]);}}}}
+
+/* k5391 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5393(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_greaterp(t1,C_fix(0));
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+f_5349(2,t3,t2);}
+else{
+C_trace("c-backend.scm: 616 lambda-literal-external");
+((C_proc3)C_retrieve_symbol_proc(lf[332]))(3,*((C_word*)lf[332]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k5347 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5349(C_word c,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_5349,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5355,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);
+if(C_truep(((C_word*)t0)[2])){
+t3=(C_word)C_eqp(((C_word*)t0)[8],lf[245]);
+t4=t2;
+f_5355(t4,(C_word)C_i_not(t3));}
+else{
+t3=t2;
+f_5355(t3,C_SCHEME_FALSE);}}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k5353 in k5347 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5355(C_word t0,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*)trf_5355,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_eqp(((C_word*)t0)[7],lf[331]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5365,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 619 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[273]))(5,*((C_word*)lf[273]+1),t3,*((C_word*)lf[274]+1),((C_word*)((C_word*)t0)[6])[1],((C_word*)((C_word*)t0)[4])[1]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5369,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 620 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[273]))(5,*((C_word*)lf[273]+1),t3,*((C_word*)lf[274]+1),((C_word*)((C_word*)t0)[3])[1],((C_word*)((C_word*)t0)[4])[1]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5373,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 621 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[273]))(5,*((C_word*)lf[273]+1),t2,*((C_word*)lf[274]+1),((C_word*)((C_word*)t0)[2])[1],((C_word*)((C_word*)t0)[4])[1]);}}
+
+/* k5371 in k5353 in k5347 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5373(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);}
+
+/* k5367 in k5353 in k5347 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5369(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);}
+
+/* k5363 in k5353 in k5347 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5365(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);}
+
+/* k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5321(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_5321,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5324,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: 610 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[325],((C_word*)t0)[3],lf[326]);}
+
+/* k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[5],*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)[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: 611 restore");
+f_5093(t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k5325 in k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[4],*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);
+C_trace("c-backend.scm: 612 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));}
+
+/* k5328 in k5325 in k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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_5333,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 613 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t2,((C_word*)((C_word*)t0)[2])[1],lf[324]);}
+
+/* k5331 in k5328 in k5325 in k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5333(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_5333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5336,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5343,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 614 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),t3,t1,C_make_character(44));}
+
+/* k5341 in k5331 in k5328 in k5325 in k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5343(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);}
+
+/* k5334 in k5331 in k5328 in k5325 in k5322 in k5319 in k5313 in k5307 in k5304 in k5301 in k5298 in k5295 in k5292 in k5289 in g808 in loop770 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5336(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[323]);}
+
+/* k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5209(C_word c,C_word t0,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_5209,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,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],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_5228,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_5228(t6,t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5228(C_word t0,C_word 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_5228,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_5236,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5266,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));
+C_trace("g860861");
+t6=t3;
+f_5236(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5264 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5228(t3,((C_word*)t0)[2],t2);}
+
+/* g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5236(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_5236,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5240,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 625 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[318],t2,lf[319],C_SCHEME_TRUE,lf[320],t2,lf[321],t2,lf[322]);}
+
+/* k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5240(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_5240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5243,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: 627 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[315],((C_word*)t0)[3],lf[316],((C_word*)t0)[3],lf[317]);}
+
+/* k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5243,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5246,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 628 restore");
+f_5093(t2,((C_word*)t0)[3]);}
+
+/* k5244 in k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5246,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5249,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 629 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[314],((C_word*)t0)[2],C_make_character(44));}
+
+/* k5247 in k5244 in k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5249(C_word c,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_5249,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5252,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5259,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5263,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 630 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t4,((C_word*)t0)[2],lf[313]);}
+
+/* k5261 in k5247 in k5244 in k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5263(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 630 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
+
+/* k5257 in k5247 in k5244 in k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5259(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);}
+
+/* k5250 in k5247 in k5244 in k5241 in k5238 in g860 in loop853 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5252(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 631 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[312]);}
+
+/* k5210 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5212(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_5212,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5215,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_5226,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 633 emitter");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_5129(t4,t3,C_SCHEME_FALSE);}
+
+/* k5224 in k5210 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5226(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[311]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k5213 in k5210 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5215,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5222,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 634 emitter");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_5129(t3,t2,C_SCHEME_TRUE);}
+
+/* k5220 in k5213 in k5210 in k5207 in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5222(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[311]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* emitter in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5129(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_5129,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_5131,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp));}
+
+/* f_5131 in emitter in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5131(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_5131,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5135,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[306]);
+t5=(C_truep(((C_word*)t0)[3])?C_make_character(118):lf[307]);
+C_trace("c-backend.scm: 577 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[308],t2,C_make_character(114),t4,lf[309],C_SCHEME_TRUE,lf[310],t2,C_make_character(114),t5);}
+
+/* k5133 */
+static void C_ccall f_5135(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_5135,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5138,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: 579 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[304],((C_word*)t0)[4],lf[305]);}
+
+/* k5136 in k5133 */
+static void C_ccall f_5138(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_5138,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5141,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: 580 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[303],((C_word*)t0)[4],C_make_character(114));}
+
+/* k5139 in k5136 in k5133 */
+static void C_ccall f_5141(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_5141,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5144,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: 581 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_5144(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5144(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_5144,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5147,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: 582 gen");
+((C_proc11)C_retrieve_proc(*((C_word*)lf[1]+1)))(11,*((C_word*)lf[1]+1),t2,lf[299],((C_word*)t0)[4],lf[300],C_SCHEME_TRUE,lf[301],C_SCHEME_TRUE,lf[302],((C_word*)t0)[4],C_make_character(59));}
+
+/* k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5147(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_5147,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5150,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: 585 restore");
+f_5093(t2,((C_word*)t0)[4]);}
+
+/* k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5150,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5153,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: 586 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[298]);}
+
+/* k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5153(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_5153,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5156,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: 588 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[296]);}
+else{
+C_trace("c-backend.scm: 589 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[297]);}}
+
+/* k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5156(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_5156,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5159,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: 590 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[295]);}
+
+/* k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5159(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_5159,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5162,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: 591 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[294]);}
+else{
+t3=t2;
+f_5162(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5162(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_5162,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5165,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 592 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[293]);}
+
+/* k5163 in k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5165(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_5165,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5168,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 593 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[292]);}
+
+/* k5166 in k5163 in k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5168(C_word c,C_word t0,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_5168,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5171,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5178,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5182,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_fixnum_plus(((C_word*)t0)[2],C_fix(1));
+C_trace("c-backend.scm: 594 make-argument-list");
+((C_proc4)C_retrieve_symbol_proc(lf[290]))(4,*((C_word*)lf[290]+1),t4,t5,lf[291]);}
+
+/* k5180 in k5166 in k5163 in k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5182(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 594 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
+
+/* k5176 in k5166 in k5163 in k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5178(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);}
+
+/* k5169 in k5166 in k5163 in k5160 in k5157 in k5154 in k5151 in k5148 in k5145 in k5142 in k5139 in k5136 in k5133 */
+static void C_ccall f_5171(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 595 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[289]);}
+
+/* restore in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5093(C_word 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_5093,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5097,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)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_5106,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t8=((C_word*)t6)[1];
+f_5106(t8,t3,t4,C_fix(0));}
+
+/* doloop778 in restore in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5106(C_word 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_5106,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_5116,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: 572 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE,lf[286],t2,lf[287],t3,lf[288]);}}
+
+/* k5114 in doloop778 in restore in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5116(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_fixnum_difference(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_5106(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k5095 in restore in trampolines in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5097(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 573 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[284],((C_word*)t0)[2],lf[285]);}
+
+/* prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4750(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_4750,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_4754,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 501 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,C_SCHEME_TRUE);}
+
+/* k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4754(C_word c,C_word t0,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_4754,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4757,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_4823,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_4823(t6,t2,((C_word*)t0)[2]);}
+
+/* loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4823(C_word t0,C_word 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_4823,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_4831,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5077,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));
+C_trace("g653654");
+t6=t3;
+f_4831(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5075 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5077(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_4823(t3,((C_word*)t0)[2],t2);}
+
+/* g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4831(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_4831,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4835,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 504 lambda-literal-argument-count");
+((C_proc3)C_retrieve_symbol_proc(lf[283]))(3,*((C_word*)lf[283]+1),t3,t2);}
+
+/* k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4835(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_4835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4838,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: 505 lambda-literal-customizable");
+((C_proc3)C_retrieve_symbol_proc(lf[282]))(3,*((C_word*)lf[282]+1),t2,((C_word*)t0)[2]);}
+
+/* k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4838(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_4838,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4841,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_5074,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 506 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),t3,((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_4841(t3,C_SCHEME_FALSE);}}
+
+/* k5072 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5074(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_4841(t2,(C_word)C_eqp(t1,C_fix(0)));}
+
+/* k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4841(C_word t0,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_4841,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4844,a[2]=((C_word*)t0)[2],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_5060,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t1)){
+t4=(C_word)C_fixnum_decrease(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 507 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[280]))(4,*((C_word*)lf[280]+1),t3,t4,lf[281]);}
+else{
+t4=((C_word*)t0)[5];
+C_trace("c-backend.scm: 507 make-variable-list");
+((C_proc4)C_retrieve_symbol_proc(lf[280]))(4,*((C_word*)lf[280]+1),t3,t4,lf[281]);}}
+
+/* k5058 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5060(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 507 intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[5]))(4,*((C_word*)lf[5]+1),((C_word*)t0)[2],t1,C_make_character(44));}
+
+/* k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4844(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_4844,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4847,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: 508 lambda-literal-id");
+((C_proc3)C_retrieve_symbol_proc(lf[10]))(3,*((C_word*)lf[10]+1),t2,((C_word*)t0)[2]);}
+
+/* k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4847(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_4847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4850,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: 509 lambda-literal-rest-argument");
+((C_proc3)C_retrieve_symbol_proc(lf[279]))(3,*((C_word*)lf[279]+1),t2,((C_word*)t0)[2]);}
+
+/* k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4850(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_4850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4853,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 510 lambda-literal-rest-argument-mode");
+((C_proc3)C_retrieve_symbol_proc(lf[278]))(3,*((C_word*)lf[278]+1),t2,((C_word*)t0)[2]);}
+
+/* k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4853(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_4853,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4856,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 511 lambda-literal-direct");
+((C_proc3)C_retrieve_symbol_proc(lf[277]))(3,*((C_word*)lf[277]+1),t2,((C_word*)t0)[2]);}
+
+/* k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4856(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_4856,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4859,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: 512 lambda-literal-allocated");
+((C_proc3)C_retrieve_symbol_proc(lf[276]))(3,*((C_word*)lf[276]+1),t2,((C_word*)t0)[2]);}
+
+/* k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4859(C_word c,C_word t0,C_word 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_4859,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4862,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[272]);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5052,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_fixnum_increase(((C_word*)t0)[8]);
+C_trace("c-backend.scm: 514 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[273]))(5,*((C_word*)lf[273]+1),t5,*((C_word*)lf[274]+1),((C_word*)((C_word*)t0)[3])[1],t6);}
+else{
+t5=t2;
+f_4862(t5,C_SCHEME_UNDEFINED);}}
+
+/* k5050 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5052(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_4862(t3,t2);}
+
+/* k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4862(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_4862,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,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]=((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: 515 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
+
+/* k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4865,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4868,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_5006,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 520 lambda-literal-callee-signatures");
+((C_proc3)C_retrieve_symbol_proc(lf[275]))(3,*((C_word*)lf[275]+1),t3,((C_word*)t0)[2]);}
+
+/* k5004 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5006(C_word c,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_5006,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_5008,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_5008(t5,((C_word*)t0)[2],t1);}
+
+/* loop672 in k5004 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5008(C_word t0,C_word 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_5008,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_5016,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5034,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));
+C_trace("g679680");
+t6=t3;
+f_5016(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5032 in loop672 in k5004 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5034(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_5008(t3,((C_word*)t0)[2],t2);}
+
+/* g679 in loop672 in k5004 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_5016(C_word t0,C_word 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_5016,NULL,3,t0,t1,t2);}
+t3=t2;
+t4=C_retrieve(lf[272]);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t3,t4))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5027,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_fixnum_increase(t2);
+C_trace("c-backend.scm: 519 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[273]))(5,*((C_word*)lf[273]+1),t5,*((C_word*)lf[274]+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);}}
+
+/* k5025 in g679 in loop672 in k5004 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_5027(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);}
+
+/* k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4868(C_word c,C_word t0,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_4868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4871,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_eqp(lf[256],((C_word*)t0)[5]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4980,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[207]))){
+C_trace("c-backend.scm: 530 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),t4,C_retrieve(lf[207]),lf[263]);}
+else{
+t5=t4;
+f_4980(2,t5,lf[264]);}}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4955,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: 522 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t4,lf[270],((C_word*)t0)[5],lf[271],C_SCHEME_TRUE);}}
+
+/* k4953 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4955(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_4955,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4958,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: 523 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[269]);}
+
+/* k4956 in k4953 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4958(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_4958,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4961,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: 524 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[267]);}
+else{
+C_trace("c-backend.scm: 524 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[268]);}}
+
+/* k4959 in k4956 in k4953 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4961(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_4961,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4964,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: 526 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[265]);}
+else{
+C_trace("c-backend.scm: 527 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[266]);}}
+
+/* k4962 in k4959 in k4956 in k4953 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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-backend.scm: 528 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]);}
+
+/* k4978 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4980,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4983,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 531 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,lf[261],t1,lf[262],C_SCHEME_TRUE);}
+
+/* k4981 in k4978 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4986,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[259]))){
+C_trace("c-backend.scm: 533 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[260],C_SCHEME_TRUE);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f11016,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 534 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[258]);}}
+
+/* f11016 in k4981 in k4978 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f11016(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 535 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[257],((C_word*)t0)[2]);}
+
+/* k4984 in k4981 in k4978 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4989,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 534 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[258]);}
+
+/* k4987 in k4984 in k4981 in k4978 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4989(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 535 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[257],((C_word*)t0)[2]);}
+
+/* k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4871(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_4871,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4874,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 536 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(40));}
+
+/* k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4874(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_4874,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4877,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_4877(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 537 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[255]);}}
+
+/* k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4877(C_word c,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_4877,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4880,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_4927,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_word)C_eqp(((C_word*)t0)[2],C_fix(0));
+t5=t3;
+f_4927(t5,(C_word)C_i_not(t4));}
+else{
+t4=t3;
+f_4927(t4,C_SCHEME_FALSE);}}
+
+/* k4925 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4927(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_4927,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4930,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 539 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[254]);}
+else{
+t2=((C_word*)t0)[2];
+f_4880(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k4928 in k4925 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4930(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_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 540 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_4880(2,t3,t2);}}
+
+/* k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4880(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_4880,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4883,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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]);}
+
+/* k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4883(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_4883,2,t0,t1);}
+if(C_truep(((C_word*)t0)[8])){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4889,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: 543 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[252]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4915,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 551 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(41));}}
+
+/* k4913 in k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4915(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4915,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4918,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: 554 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: 553 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[253]);}}
+
+/* k4916 in k4913 in k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4918(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 554 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));}
+
+/* k4887 in k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4889,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[6],lf[245]);
+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_4898,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: 546 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[248],((C_word*)t0)[2],lf[249],C_SCHEME_TRUE,lf[250],((C_word*)t0)[2],lf[251]);}}
+
+/* k4896 in k4887 in k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4898(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_4898,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4901,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]);}
+
+/* k4899 in k4896 in k4887 in k4881 in k4878 in k4875 in k4872 in k4869 in k4866 in k4863 in k4860 in k4857 in k4854 in k4851 in k4848 in k4845 in k4842 in k4839 in k4836 in k4833 in g653 in loop646 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+C_trace("c-backend.scm: 549 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[246],t2,lf[247]);}
+
+/* k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4757,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_4762,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_4762(t5,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4762(C_word t0,C_word 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_4762,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_4810,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_4774,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 558 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t5,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);}}
+
+/* k4772 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4774(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_4774,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4777,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4784,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 559 make-list");
+((C_proc4)C_retrieve_symbol_proc(lf[241]))(4,*((C_word*)lf[241]+1),t3,((C_word*)t0)[2],lf[242]);}
+
+/* k4782 in k4772 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4784,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_4786,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_4786(t5,((C_word*)t0)[2],t1);}
+
+/* loop748 in k4782 in k4772 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4786(C_word t0,C_word 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_4786,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[1]+1);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4796,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));
+C_trace("g755756");
+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);}}
+
+/* k4794 in loop748 in k4782 in k4772 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4786(t3,((C_word*)t0)[2],t2);}
+
+/* k4775 in k4772 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4777(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+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],lf[240]);}
+
+/* k4808 in loop736 in k4755 in k4752 in prototypes in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4810(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_4762(t3,((C_word*)t0)[2],t2);}
+
+/* declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4579(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_4579,NULL,2,t0,t1);}
+t2=(C_word)C_i_length(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4586,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 472 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[239]);}
+
+/* k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4586(C_word c,C_word t0,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_4586,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4589,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_4722,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_4722(t6,t2,C_retrieve(lf[209]));}
+
+/* loop597 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4722(C_word 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_4722,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_4737,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));
+C_trace("c-backend.scm: 475 gen");
+((C_proc10)C_retrieve_proc(*((C_word*)lf[1]+1)))(10,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[235],t4,lf[236],C_SCHEME_TRUE,lf[237],t4,lf[238]);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4735 in loop597 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4722(t3,((C_word*)t0)[2],t2);}
+
+/* k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4589(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_4589,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4592,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_eqp(((C_word*)t0)[2],C_fix(0));
+if(C_truep(t3)){
+t4=t2;
+f_4592(2,t4,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 479 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[233],((C_word*)t0)[2],lf[234]);}}
+
+/* k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4592(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_4592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4595,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 480 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[232]);}
+
+/* k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4595(C_word c,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_4595,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_4600,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_4600(t5,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
+
+/* doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4600(C_word t0,C_word 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_4600,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_4610,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);
+C_trace("c-backend.scm: 484 ##sys#lambda-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[231]))(3,*((C_word*)lf[231]+1),t4,t5);}}
+
+/* k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4610(C_word c,C_word t0,C_word t1){
+C_word 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_4610,2,t0,t1);}
+t2=(C_word)C_i_string_length(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4616,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_word)C_fixnum_shift_right(t2,C_fix(16));
+t5=(C_word)C_fixnum_shift_right(t2,C_fix(8));
+t6=(C_word)C_fixnum_and(C_fix(255),t5);
+t7=(C_word)C_fixnum_and(C_fix(255),t2);
+C_trace("c-backend.scm: 486 gen");
+((C_proc12)C_retrieve_proc(*((C_word*)lf[1]+1)))(12,*((C_word*)lf[1]+1),t3,C_SCHEME_TRUE,lf[229],((C_word*)t0)[5],lf[230],t4,C_make_character(44),t6,C_make_character(44),t7,C_make_character(41));}
+
+/* k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4616(C_word c,C_word t0,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_4616,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4619,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_4669,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_4669(t6,t2,C_fix(0));}
+
+/* doloop620 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4669(C_word t0,C_word 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_4669,NULL,3,t0,t1,t2);}
+t3=t2;
+if(C_truep((C_word)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_4679,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_i_string_ref(((C_word*)t0)[2],t2);
+t6=(C_word)C_fix((C_word)C_character_code(t5));
+C_trace("c-backend.scm: 493 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t4,C_make_character(44),t6);}}
+
+/* k4677 in doloop620 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4679(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)[4]);
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4669(t3,((C_word*)t0)[2],t2);}
+
+/* k4617 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 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_4619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4622,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)C_fixnum_plus(((C_word*)t0)[2],C_fix(7));
+t4=(C_word)C_fixnum_and(C_fix(16777208),t3);
+t5=(C_word)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_4642,a[2]=t7,tmp=(C_word)a,a+=3,tmp));
+t9=((C_word*)t7)[1];
+f_4642(t9,t2,t5);}
+
+/* doloop627 in k4617 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4642(C_word 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_4642,NULL,3,t0,t1,t2);}
+t3=(C_word)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_4652,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 496 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t4,lf[228]);}}
+
+/* k4650 in doloop627 in k4617 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_fixnum_decrease(((C_word*)t0)[4]);
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4642(t3,((C_word*)t0)[2],t2);}
+
+/* k4620 in k4617 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4622,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4625,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: 497 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[227]);}
+
+/* k4623 in k4620 in k4617 in k4614 in k4608 in doloop611 in k4593 in k4590 in k4587 in k4584 in declarations in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4625(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_fixnum_increase(((C_word*)t0)[5]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4600(t4,((C_word*)t0)[2],t2,t3);}
+
+/* header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4410(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_4410,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4413,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4430,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_4571,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 438 current-seconds");
+((C_proc2)C_retrieve_symbol_proc(lf[226]))(2,*((C_word*)lf[226]+1),t4);}
+
+/* k4569 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4571(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 438 ##sys#decode-seconds");
+((C_proc4)C_retrieve_symbol_proc(lf[225]))(4,*((C_word*)lf[225]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4430(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_4430,2,t0,t1);}
+t2=(C_word)C_i_vector_ref(t1,C_fix(1));
+t3=(C_word)C_i_vector_ref(t1,C_fix(2));
+t4=(C_word)C_i_vector_ref(t1,C_fix(3));
+t5=(C_word)C_i_vector_ref(t1,C_fix(4));
+t6=(C_word)C_i_vector_ref(t1,C_fix(5));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4448,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_fixnum_plus(C_fix(1900),t6);
+t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4529,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_word)C_fixnum_increase(t5);
+C_trace("c-backend.scm: 446 pad0");
+f_4413(t9,t10);}
+
+/* k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4529(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_4529,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4533,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: 446 pad0");
+f_4413(t2,((C_word*)t0)[2]);}
+
+/* k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4533,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4537,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: 446 pad0");
+f_4413(t2,((C_word*)t0)[2]);}
+
+/* k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4537(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_4537,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4541,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: 446 pad0");
+f_4413(t2,((C_word*)t0)[2]);}
+
+/* k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 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_4541,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4545,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_4549,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4551,tmp=(C_word)a,a+=2,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4559,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4563,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 449 chicken-version");
+((C_proc3)C_retrieve_symbol_proc(lf[224]))(3,*((C_word*)lf[224]+1),t6,C_SCHEME_TRUE);}
+
+/* k4561 in k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4563(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 449 string-split");
+((C_proc4)C_retrieve_symbol_proc(lf[222]))(4,*((C_word*)lf[222]+1),((C_word*)t0)[2],t1,lf[223]);}
+
+/* k4557 in k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4559(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[221]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a4550 in k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4551(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_4551,3,t0,t1,t2);}
+t3=*((C_word*)lf[113]+1);
+C_trace("g556557");
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,lf[219],t2,lf[220]);}
+
+/* k4547 in k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4549(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 447 string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[217]))(4,*((C_word*)lf[217]+1),((C_word*)t0)[2],t1,lf[218]);}
+
+/* k4543 in k4539 in k4535 in k4531 in k4527 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4545(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 444 gen");
+((C_proc21)C_retrieve_proc(*((C_word*)lf[1]+1)))(21,*((C_word*)lf[1]+1),((C_word*)t0)[8],lf[212],((C_word*)t0)[7],lf[213],C_SCHEME_TRUE,lf[214],C_SCHEME_TRUE,lf[215],((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[216]);}
+
+/* k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 452 gen-list");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),t2,C_retrieve(lf[211]));}
+
+/* k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4454,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 453 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE);}
+
+/* k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4454(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_4454,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4457,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[207]))){
+C_trace("c-backend.scm: 454 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t2,lf[208],C_retrieve(lf[207]));}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4518,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 456 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,lf[210]);}}
+
+/* k4516 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4518(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 457 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[209]));}
+
+/* k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4457(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4457,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4460,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 458 gen");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[1]+1)))(9,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[203],C_SCHEME_TRUE,C_SCHEME_TRUE,lf[204],C_retrieve(lf[205]),lf[206]);}
+
+/* k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4460,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4463,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(C_retrieve(lf[199]))){
+C_trace("c-backend.scm: 460 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[200]))(3,*((C_word*)lf[200]+1),t2,C_retrieve(lf[201]));}
+else{
+t3=t2;
+f_4463(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4461 in k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4463,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4466,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(C_retrieve(lf[202])))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4478,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 462 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[199]))){
+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: 465 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[200]))(3,*((C_word*)lf[200]+1),((C_word*)t0)[2],C_retrieve(lf[201]));}}}
+
+/* k4476 in k4461 in k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4478,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_4483,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_4483(t5,((C_word*)t0)[2],C_retrieve(lf[202]));}
+
+/* loop571 in k4476 in k4461 in k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4483(C_word 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_4483,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_4498,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));
+C_trace("c-backend.scm: 463 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);}}
+
+/* k4496 in loop571 in k4476 in k4461 in k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4498(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_4483(t3,((C_word*)t0)[2],t2);}
+
+/* k4464 in k4461 in k4458 in k4455 in k4452 in k4449 in k4446 in k4428 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4466(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[199]))){
+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: 465 generate-foreign-callback-stub-prototypes");
+((C_proc3)C_retrieve_symbol_proc(lf[200]))(3,*((C_word*)lf[200]+1),((C_word*)t0)[2],C_retrieve(lf[201]));}}
+
+/* pad0 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4413(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_4413,NULL,2,t1,t2);}
+t3=t2;
+if(C_truep((C_word)C_fixnum_lessp(t3,C_fix(10)))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4427,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 436 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);}}
+
+/* k4425 in pad0 in header in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4427(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 436 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[113]+1)))(4,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[198],t1);}
+
+/* expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_2622(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_2622,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_2625,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_4378,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+C_trace("c-backend.scm: 431 expr");
+t11=((C_word*)t6)[1];
+f_2625(t11,t1,t2,t3);}
+
+/* expr-args in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4378(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_4378,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4384,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 425 pair-for-each");
+((C_proc4)C_retrieve_symbol_proc(lf[197]))(4,*((C_word*)lf[197]+1),t1,t4,t2);}
+
+/* a4383 in expr-args in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4384(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_4384,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4388,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)C_eqp(t2,((C_word*)t0)[2]);
+if(C_truep(t4)){
+t5=(C_word)C_i_car(t2);
+C_trace("c-backend.scm: 428 expr");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t6,t1,t5,((C_word*)t0)[3]);}
+else{
+C_trace("c-backend.scm: 427 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t3,C_make_character(44));}}
+
+/* k4386 in a4383 in expr-args in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4388(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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 428 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_2625(C_word t0,C_word 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 ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2625,NULL,4,t0,t1,t2,t3);}
+t4=t2;
+t5=(C_word)C_slot(t4,C_fix(3));
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=t2;
+t9=(C_word)C_slot(t8,C_fix(1));
+t10=(C_word)C_eqp(t9,lf[12]);
+if(C_truep(t10)){
+t11=(C_word)C_i_car(t7);
+t12=(C_word)C_eqp(t11,lf[13]);
+if(C_truep(t12)){
+if(C_truep((C_word)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_word)C_eqp(t11,lf[16]);
+if(C_truep(t13)){
+t14=(C_word)C_i_cadr(t7);
+t15=(C_word)C_fix((C_word)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_word)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_word)C_eqp(t11,lf[20]);
+if(C_truep(t15)){
+t16=(C_word)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_word)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_word)C_eqp(t9,lf[25]);
+if(C_truep(t11)){
+t12=(C_word)C_i_car(t7);
+if(C_truep((C_word)C_i_vectorp(t12))){
+t13=(C_word)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_word)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_word)C_eqp(t9,lf[29]);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2764,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_word)C_eqp(t9,lf[33]);
+if(C_truep(t13)){
+t14=(C_word)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_word)C_eqp(t9,lf[35]);
+if(C_truep(t14)){
+t15=(C_word)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_2822,a[2]=((C_word*)t0)[5],a[3]=t17,tmp=(C_word)a,a+=4,tmp));
+t19=((C_word*)t17)[1];
+f_2822(t19,t1,t5,t3,t15);}
+else{
+t15=(C_word)C_eqp(t9,lf[36]);
+if(C_truep(t15)){
+t16=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2873,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: 119 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t16,lf[38]);}
+else{
+t16=(C_word)C_eqp(t9,lf[39]);
+if(C_truep(t16)){
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2900,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: 124 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t17,lf[41]);}
+else{
+t17=(C_word)C_eqp(t9,lf[42]);
+if(C_truep(t17)){
+t18=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2919,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: 129 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t18,lf[43]);}
+else{
+t18=(C_word)C_eqp(t9,lf[44]);
+if(C_truep(t18)){
+t19=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2952,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[47]);}
+else{
+t19=(C_word)C_eqp(t9,lf[48]);
+if(C_truep(t19)){
+t20=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2989,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: 143 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t20,lf[50]);}
+else{
+t20=(C_word)C_eqp(t9,lf[51]);
+if(C_truep(t20)){
+t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3018,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[53]);}
+else{
+t21=(C_word)C_eqp(t9,lf[54]);
+if(C_truep(t21)){
+t22=(C_word)C_i_car(t7);
+t23=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3050,a[2]=t5,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t1,a[6]=t22,tmp=(C_word)a,a+=7,tmp);
+C_trace("c-backend.scm: 158 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t23,lf[60],t22,C_make_character(44));}
+else{
+t22=(C_word)C_eqp(t9,lf[61]);
+if(C_truep(t22)){
+t23=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3121,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: 168 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t23,lf[63]);}
+else{
+t23=(C_word)C_eqp(t9,lf[64]);
+if(C_truep(t23)){
+t24=(C_word)C_i_car(t7);
+C_trace("c-backend.scm: 172 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t1,C_make_character(116),t24);}
+else{
+t24=(C_word)C_eqp(t9,lf[65]);
+if(C_truep(t24)){
+t25=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3153,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+t26=(C_word)C_i_car(t7);
+C_trace("c-backend.scm: 175 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t25,C_make_character(116),t26,C_make_character(61));}
+else{
+t25=(C_word)C_eqp(t9,lf[66]);
+if(C_truep(t25)){
+t26=(C_word)C_i_car(t7);
+t27=(C_word)C_i_cadr(t7);
+if(C_truep((C_word)C_i_caddr(t7))){
+if(C_truep(t27)){
+C_trace("c-backend.scm: 184 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[67],t26,lf[68]);}
+else{
+t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3195,a[2]=t26,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3199,a[2]=t28,tmp=(C_word)a,a+=3,tmp);
+t30=(C_word)C_i_cadddr(t7);
+C_trace("c-backend.scm: 185 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t29,t30);}}
+else{
+if(C_truep(t27)){
+C_trace("c-backend.scm: 186 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[73],t26,lf[74]);}
+else{
+C_trace("c-backend.scm: 187 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t1,lf[75],t26,lf[76]);}}}
+else{
+t26=(C_word)C_eqp(t9,lf[77]);
+if(C_truep(t26)){
+t27=(C_word)C_i_car(t7);
+t28=(C_word)C_i_cadr(t7);
+t29=(C_word)C_i_caddr(t7);
+t30=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3230,a[2]=t29,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(t28)){
+C_trace("c-backend.scm: 194 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t30,lf[83],t27,lf[84]);}
+else{
+C_trace("c-backend.scm: 195 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t30,lf[85],t27,lf[86]);}}
+else{
+t27=(C_word)C_eqp(t9,lf[87]);
+if(C_truep(t27)){
+t28=(C_word)C_i_car(t7);
+t29=(C_word)C_i_cadr(t7);
+t30=(C_word)C_i_caddr(t7);
+if(C_truep(t29)){
+t31=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3278,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3292,a[2]=t28,a[3]=t31,tmp=(C_word)a,a+=4,tmp);
+t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3296,a[2]=t32,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 206 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t33,t30);}
+else{
+t31=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3299,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3313,a[2]=t28,a[3]=t31,tmp=(C_word)a,a+=4,tmp);
+t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3317,a[2]=t32,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 211 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t33,t30);}}
+else{
+t28=(C_word)C_eqp(t9,lf[96]);
+if(C_truep(t28)){
+C_trace("c-backend.scm: 215 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t1,lf[97]);}
+else{
+t29=(C_word)C_eqp(t9,lf[98]);
+if(C_truep(t29)){
+t30=(C_word)C_i_cdr(t5);
+t31=(C_word)C_i_length(t30);
+t32=t3;
+t33=(C_word)C_fixnum_increase(t31);
+t34=(C_word)C_i_cdr(t7);
+t35=(C_word)C_i_pairp(t34);
+t36=(C_truep(t35)?(C_word)C_i_cadr(t7):C_SCHEME_FALSE);
+t37=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3350,a[2]=t35,a[3]=((C_word*)t0)[2],a[4]=t36,a[5]=t32,a[6]=((C_word*)t0)[3],a[7]=((C_word*)t0)[5],a[8]=t31,a[9]=t33,a[10]=t3,a[11]=t30,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: 224 source-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[147]))(3,*((C_word*)lf[147]+1),t37,t36);}
+else{
+t30=(C_word)C_eqp(t9,lf[148]);
+if(C_truep(t30)){
+t31=(C_word)C_i_length(t5);
+t32=(C_word)C_fixnum_increase(t31);
+t33=(C_word)C_i_car(t7);
+t34=(C_word)C_i_cadr(t7);
+t35=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3938,a[2]=t34,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=t32,a[6]=t5,a[7]=t3,a[8]=((C_word*)t0)[5],a[9]=t31,a[10]=t1,a[11]=t33,tmp=(C_word)a,a+=12,tmp);
+C_trace("c-backend.scm: 308 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),t35,((C_word*)t0)[3]);}
+else{
+t31=(C_word)C_eqp(t9,lf[152]);
+if(C_truep(t31)){
+t32=(C_word)C_i_cdr(t5);
+t33=(C_word)C_i_length(t32);
+t34=(C_word)C_fixnum_increase(t33);
+t35=(C_word)C_i_caddr(t7);
+t36=(C_word)C_i_cadddr(t7);
+t37=(C_word)C_eqp(t36,C_fix(0));
+t38=(C_word)C_i_not(t37);
+t39=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4023,a[2]=t35,a[3]=t36,a[4]=t38,a[5]=((C_word*)t0)[5],a[6]=t3,a[7]=((C_word*)t0)[4],a[8]=t32,a[9]=t1,a[10]=t5,tmp=(C_word)a,a+=11,tmp);
+t40=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4027,a[2]=t39,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 336 find-lambda");
+t41=((C_word*)((C_word*)t0)[2])[1];
+f_2580(t41,t40,t35);}
+else{
+t32=(C_word)C_eqp(t9,lf[154]);
+if(C_truep(t32)){
+t33=(C_word)C_i_length(t5);
+t34=(C_word)C_fixnum_plus(t33,C_fix(1));
+t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4046,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t36=(C_word)C_i_car(t7);
+C_trace("c-backend.scm: 353 gen");
+((C_proc8)C_retrieve_proc(*((C_word*)lf[1]+1)))(8,*((C_word*)lf[1]+1),t35,C_SCHEME_TRUE,lf[156],t36,lf[157],t34,lf[158]);}
+else{
+t33=(C_word)C_eqp(t9,lf[159]);
+if(C_truep(t33)){
+t34=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4065,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: 358 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t34,C_SCHEME_TRUE,lf[161]);}
+else{
+t34=(C_word)C_eqp(t9,lf[162]);
+if(C_truep(t34)){
+t35=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4084,a[2]=t3,a[3]=t5,a[4]=((C_word*)t0)[4],a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t36=(C_word)C_i_car(t7);
+C_trace("c-backend.scm: 363 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t35,lf[163],t36,C_make_character(40));}
+else{
+t35=(C_word)C_eqp(t9,lf[164]);
+if(C_truep(t35)){
+t36=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4103,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t37=(C_word)C_i_car(t7);
+t38=(C_word)C_i_length(t5);
+C_trace("c-backend.scm: 368 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t36,lf[165],t37,lf[166],t38);}
+else{
+t36=(C_word)C_eqp(t9,lf[167]);
+if(C_truep(t36)){
+t37=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4139,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+t38=(C_word)C_i_cadr(t7);
+C_trace("c-backend.scm: 376 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t37,t38,lf[169]);}
+else{
+t37=(C_word)C_eqp(t9,lf[170]);
+if(C_truep(t37)){
+t38=(C_word)C_i_cadr(t7);
+t39=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4159,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t40=(C_word)C_i_car(t7);
+t41=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4177,a[2]=t38,a[3]=t40,a[4]=t39,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-backend.scm: 380 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t41,t38,lf[175]);}
+else{
+t38=(C_word)C_eqp(t9,lf[176]);
+if(C_truep(t38)){
+t39=(C_word)C_i_car(t7);
+t40=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4193,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t41=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4207,a[2]=t39,a[3]=t40,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 386 foreign-result-conversion");
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t41,t39,lf[181]);}
+else{
+t39=(C_word)C_eqp(t9,lf[182]);
+if(C_truep(t39)){
+t40=(C_word)C_i_car(t7);
+t41=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4223,a[2]=t40,a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4251,a[2]=t41,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 392 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t42,t40,lf[187]);}
+else{
+t40=(C_word)C_eqp(t9,lf[188]);
+if(C_truep(t40)){
+t41=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4260,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: 399 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t41,C_SCHEME_TRUE,lf[192]);}
+else{
+t41=(C_word)C_eqp(t9,lf[193]);
+if(C_truep(t41)){
+t42=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4343,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: 414 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t42,lf[195]);}
+else{
+C_trace("c-backend.scm: 422 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[8]))(3,*((C_word*)lf[8]+1),t1,lf[196]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+
+/* k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4343(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_4343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4346,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_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 415 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4344 in k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4346(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_4346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4349,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: 416 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[194]);}
+
+/* k4347 in k4344 in k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4349(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_4349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4352,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_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 417 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4350 in k4347 in k4344 in k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4352(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_4352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4355,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: 418 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
+
+/* k4353 in k4350 in k4347 in k4344 in k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4355(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_4355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4358,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_caddr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 419 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4356 in k4353 in k4350 in k4347 in k4344 in k4341 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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-backend.scm: 420 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));}
+
+/* k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4260(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_4260,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4263,a[2]=((C_word*)t0)[2],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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 400 expr");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+
+/* k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4263(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_4263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4266,a[2]=((C_word*)t0)[2],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: 401 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[191]);}
+
+/* k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4266(C_word c,C_word t0,C_word 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_4266,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(C_word)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_4279,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_4279(t7,((C_word*)t0)[2],t2,t3);}
+
+/* doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_4279(C_word t0,C_word 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_4279,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t2,C_fix(0));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4289,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: 405 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[189]);}
+else{
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4302,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: 408 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),t5,C_SCHEME_TRUE,lf[190]);}}
+
+/* k4300 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4302(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_4302,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4305,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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)[6]);
+C_trace("c-backend.scm: 409 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4303 in k4300 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4305(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_4305,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4308,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 410 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,C_make_character(58));}
+
+/* k4306 in k4303 in k4300 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4308(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_4308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4311,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_word)C_i_cadr(((C_word*)t0)[6]);
+C_trace("c-backend.scm: 411 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4309 in k4306 in k4303 in k4300 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4311(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_fixnum_decrease(((C_word*)t0)[5]);
+t3=(C_word)C_i_cddr(((C_word*)t0)[4]);
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4279(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k4287 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4292,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 406 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4290 in k4287 in doloop500 in k4264 in k4261 in k4258 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4292(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 407 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));}
+
+/* k4249 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4251(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 392 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]);}
+
+/* k4221 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4223(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_4223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4226,a[2]=((C_word*)t0)[2],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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 393 expr");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+
+/* k4224 in k4221 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4226(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_4226,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4229,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_4243,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 394 foreign-argument-conversion");
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t3,((C_word*)t0)[2]);}
+
+/* k4241 in k4224 in k4221 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4243(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 394 gen");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[1]+1)))(4,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[184],t1);}
+
+/* k4227 in k4224 in k4221 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4229(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_4229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4232,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 395 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4230 in k4227 in k4224 in k4221 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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: 396 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[183]);}
+
+/* k4205 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4207(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_4207,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4211,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 386 foreign-type-declaration");
+((C_proc4)C_retrieve_symbol_proc(lf[174]))(4,*((C_word*)lf[174]+1),t2,((C_word*)t0)[2],lf[180]);}
+
+/* k4209 in k4205 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4211(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 386 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]);}
+
+/* k4191 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4193(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_4193,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4196,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 387 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4194 in k4191 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4196(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 388 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[177]);}
+
+/* k4175 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4177(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_4177,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4181,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: 380 foreign-argument-conversion");
+((C_proc3)C_retrieve_symbol_proc(lf[173]))(3,*((C_word*)lf[173]+1),t2,((C_word*)t0)[2]);}
+
+/* k4179 in k4175 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4181(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_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);}
+
+/* k4157 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4159,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4162,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 381 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4160 in k4157 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4162(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 382 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[171]);}
+
+/* k4137 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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_i_car(((C_word*)t0)[3]);
+C_trace("c-backend.scm: 376 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));}
+
+/* k4101 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4103,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4106,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4115,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: 371 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: 373 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));}}
+
+/* k4113 in k4101 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4115(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 372 expr-args");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_4378(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k4104 in k4101 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4106(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 373 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));}
+
+/* k4082 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4084(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4084,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4087,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 364 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k4085 in k4082 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4087(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 365 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));}
+
+/* k4063 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4065(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_4065,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4068,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 359 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k4066 in k4063 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4068(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 360 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[160]);}
+
+/* k4044 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4046(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4049,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 354 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k4047 in k4044 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4049(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 355 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[155]);}
+
+/* k4025 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4027(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 336 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),((C_word*)t0)[2],t1);}
+
+/* k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4023,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_fix(0));
+t3=(C_word)C_i_car(((C_word*)t0)[10]);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3971,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: 338 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));}
+
+/* k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3971(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_3971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3974,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_4004,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: 340 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t3,lf[153],((C_word*)t0)[2],C_make_character(41));}
+else{
+t3=t2;
+f_3974(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k4002 in k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_4004(C_word 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_not(((C_word*)t0)[4]);
+if(C_truep(t2)){
+if(C_truep(t2)){
+C_trace("c-backend.scm: 341 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_3974(2,t4,t3);}}
+else{
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
+C_trace("c-backend.scm: 341 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_3974(2,t4,t3);}}}
+
+/* k3972 in k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3974(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_3974,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3977,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_3977(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3992,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 343 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t3,((C_word*)t0)[2],((C_word*)t0)[5]);}}
+
+/* k3990 in k3972 in k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3992(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_pairp(((C_word*)t0)[3]))){
+C_trace("c-backend.scm: 344 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_3977(2,t3,t2);}}
+
+/* k3975 in k3972 in k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3977,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3980,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
+C_trace("c-backend.scm: 345 expr-args");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4378(t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
+else{
+C_trace("c-backend.scm: 346 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));}}
+
+/* k3978 in k3975 in k3972 in k3969 in k4021 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3980(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 346 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));}
+
+/* k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3938(C_word c,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_3938,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_fix(0));
+if(C_truep(((C_word*)t0)[11])){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3809,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: 310 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t3,((C_word*)t0)[4]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3922,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: 323 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));}}
+
+/* k3920 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3922(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_3922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3925,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)f10988,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 325 expr-args");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_4378(t4,t3,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+C_trace("c-backend.scm: 324 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[151]);}}
+
+/* f10988 in k3920 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10988(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 326 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));}
+
+/* k3923 in k3920 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3928,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 325 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3926 in k3923 in k3920 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3928(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 326 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));}
+
+/* k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3809(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_3809,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3812,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)C_fixnum_plus(t1,((C_word*)t0)[2]);
+C_trace("c-backend.scm: 311 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[59]))(5,*((C_word*)lf[59]+1),t2,((C_word*)t0)[6],t3,C_fix(1));}
+
+/* k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3812(C_word c,C_word t0,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_3812,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3815,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_3869,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_3869(t6,t2,((C_word*)t0)[2],t1);}
+
+/* loop402 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3869(C_word t0,C_word 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_3869,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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3877,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_3890,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=(C_word)C_slot(t2,C_fix(0));
+t9=(C_word)C_slot(t3,C_fix(0));
+C_trace("g413414");
+t10=t6;
+f_3877(t10,t7,t8,t9);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k3888 in loop402 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3890(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3869(t4,((C_word*)t0)[2],t2,t3);}
+
+/* g413 in loop402 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3877(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_3877,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3881,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: 314 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));}
+
+/* k3879 in g413 in loop402 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3881,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3884,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 315 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3882 in k3879 in g413 in loop402 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3884(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 316 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));}
+
+/* k3813 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3815(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_3815,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3818,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3825,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 320 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[59]))(5,*((C_word*)lf[59]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
+
+/* k3823 in k3813 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3825(C_word c,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_3825,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_3827,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_3827(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop423 in k3823 in k3813 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3827(C_word t0,C_word 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_3827,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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3842,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+C_trace("c-backend.scm: 319 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[150],t7,C_make_character(59));}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k3840 in loop423 in k3823 in k3813 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3842(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3827(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k3816 in k3813 in k3810 in k3807 in k3936 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3818(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 321 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[149]);}
+
+/* k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t5;
+C_word ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3350,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3353,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_word)C_i_cddr(((C_word*)t0)[15]);
+t4=(C_word)C_i_pairp(t3);
+t5=t2;
+f_3353(t5,(C_truep(t4)?(C_word)C_i_caddr(((C_word*)t0)[15]):C_SCHEME_FALSE));}
+else{
+t3=t2;
+f_3353(t3,C_SCHEME_FALSE);}}
+
+/* k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3353(C_word t0,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_3353,NULL,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_i_cadddr(((C_word*)t0)[15]):C_SCHEME_FALSE);
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_3359,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_3755,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3759,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 227 find-lambda");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_2580(t6,t5,t1);}
+else{
+t4=t3;
+f_3359(t4,C_SCHEME_FALSE);}}
+
+/* k3757 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3759(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 227 lambda-literal-closure-size");
+((C_proc3)C_retrieve_symbol_proc(lf[146]))(3,*((C_word*)lf[146]+1),((C_word*)t0)[2],t1);}
+
+/* k3753 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3755(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_3359(t2,(C_word)C_eqp(t1,C_fix(0)));}
+
+/* k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3359(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3359,NULL,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[16]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_3365,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[137]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3741,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_2610,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 71 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t6,t5);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3748,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)f10980,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 72 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t6,t5);}}
+else{
+t4=t3;
+f_3365(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* f10980 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10980(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[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[145]);}
+
+/* k3746 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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_trace("c-backend.scm: 232 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[143],t1,lf[144]);}
+
+/* k2608 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2610(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[140]))(5,*((C_word*)lf[140]+1),((C_word*)t0)[2],t1,lf[141],lf[142]);}
+
+/* k3739 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3741(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 231 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[138],t1,lf[139]);}
+
+/* k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_3365,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[15],C_fix(1));
+t3=(C_word)C_eqp(lf[33],t2);
+if(C_truep(t3)){
+t4=(C_word)C_slot(((C_word*)t0)[15],C_fix(2));
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3382,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_word)C_i_car(t4);
+C_trace("c-backend.scm: 235 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[100]);}
+else{
+if(C_truep(((C_word*)t0)[9])){
+t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_3401,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_3563,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: 239 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_3569,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_word)C_slot(((C_word*)t0)[15],C_fix(1));
+t6=(C_word)C_eqp(lf[66],t5);
+if(C_truep(t6)){
+t7=C_retrieve(lf[129]);
+if(C_truep(t7)){
+t8=t4;
+f_3569(t8,C_SCHEME_FALSE);}
+else{
+t8=C_retrieve(lf[134]);
+if(C_truep(t8)){
+t9=t4;
+f_3569(t9,C_SCHEME_FALSE);}
+else{
+t9=(C_word)C_i_car(((C_word*)t0)[2]);
+t10=t4;
+f_3569(t10,(C_word)C_i_not(t9));}}}
+else{
+t7=t4;
+f_3569(t7,C_SCHEME_FALSE);}}}}
+
+/* k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3569(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3569,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_slot(((C_word*)t0)[10],C_fix(2));
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cadr(t2);
+t5=(C_word)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_3589,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: 273 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t8,C_SCHEME_TRUE,lf[124],((C_word*)t0)[5],lf[125]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3658,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: 292 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));}}
+
+/* k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3658,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3661,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: 293 expr");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t3,t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
+
+/* k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3661(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_3661,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3664,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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: 294 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[135],((C_word*)t0)[4],lf[136]);}
+
+/* k3662 in k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3664(C_word c,C_word t0,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_3664,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3667,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[129]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3679,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(t3)){
+t5=t4;
+f_3679(t5,t3);}
+else{
+t5=C_retrieve(lf[134]);
+t6=t4;
+f_3679(t6,(C_truep(t5)?t5:(C_word)C_i_car(((C_word*)t0)[2])));}}
+
+/* k3677 in k3662 in k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3679(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("c-backend.scm: 297 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[130],((C_word*)t0)[2],lf[131]);}
+else{
+C_trace("c-backend.scm: 298 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]);}}
+
+/* k3665 in k3662 in k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3667,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3670,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: 299 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[127],((C_word*)t0)[3],lf[128],((C_word*)t0)[2],C_make_character(44));}
+
+/* k3668 in k3665 in k3662 in k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 300 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3671 in k3668 in k3665 in k3662 in k3659 in k3656 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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: 301 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[126]);}
+
+/* k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3589(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3589,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3592,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_3605,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_3630,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 275 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_3637,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_3644,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{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3648,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_3655,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 286 number->string");
+C_number_to_string(3,0,t4,((C_word*)t0)[2]);}}}
+
+/* k3653 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3655(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 286 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[122],t1,lf[123]);}
+
+/* k3646 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3648(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: 287 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[120],((C_word*)t0)[2],lf[121]);}
+
+/* k3642 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3644(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[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[118],t1,lf[119]);}
+
+/* k3635 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3637(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: 283 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[116],((C_word*)((C_word*)t0)[3])[1],lf[117]);}
+
+/* k3628 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3630(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 275 string-append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[113]+1)))(5,*((C_word*)lf[113]+1),((C_word*)t0)[2],lf[114],t1,lf[115]);}
+
+/* k3603 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3605(C_word c,C_word t0,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_3605,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: 277 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[109],((C_word*)((C_word*)t0)[5])[1],lf[110]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3618,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_3622,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_i_cadddr(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 279 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t4,t5);}}
+
+/* k3620 in k3603 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3622(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 279 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+
+/* k3616 in k3603 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3618(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 278 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[111],((C_word*)((C_word*)t0)[2])[1],lf[112],t1,C_make_character(41));}
+
+/* k3590 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3592(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_3592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3595,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: 288 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),t2,lf[108],((C_word*)t0)[3],C_make_character(44),((C_word*)((C_word*)t0)[2])[1],C_make_character(44));}
+
+/* k3593 in k3590 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3595(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3595,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3598,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 289 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3596 in k3593 in k3590 in k3587 in k3567 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3598(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 290 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[107]);}
+
+/* k3561 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3563(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)){
+C_trace("c-backend.scm: 240 lambda-literal-looping");
+((C_proc3)C_retrieve_symbol_proc(lf[106]))(3,*((C_word*)lf[106]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t3=((C_word*)t0)[3];
+f_3401(2,t3,C_SCHEME_FALSE);}}
+
+/* k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3401,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3404,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: 241 lambda-literal-temporaries");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t2,((C_word*)t0)[7]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3523,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_3523(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3547,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: 256 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));}}}
+
+/* k3545 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3547,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3550,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 257 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3548 in k3545 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3550(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 258 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));}
+
+/* k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3523(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_3523,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3526,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: 259 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));}
+
+/* k3524 in k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3526(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_3526,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3529,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_3529(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("c-backend.scm: 260 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));}}
+
+/* k3527 in k3524 in k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3529(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_3529,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3532,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)f10975,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 262 expr-args");
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_4378(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+C_trace("c-backend.scm: 261 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));}}
+
+/* f10975 in k3527 in k3524 in k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10975(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 263 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[105]);}
+
+/* k3530 in k3527 in k3524 in k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3532(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3532,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3535,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 262 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3533 in k3530 in k3527 in k3524 in k3521 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3535(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 263 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[105]);}
+
+/* k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3404(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_3404,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3407,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_fixnum_plus(t1,((C_word*)t0)[6]);
+C_trace("c-backend.scm: 242 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[59]))(5,*((C_word*)lf[59]+1),t2,((C_word*)t0)[5],t3,C_fix(1));}
+
+/* k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3407(C_word c,C_word t0,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_3407,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3410,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_3470,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_3470(t6,t2,((C_word*)t0)[2],t1);}
+
+/* loop281 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3470(C_word t0,C_word 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_3470,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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3478,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_3491,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=(C_word)C_slot(t2,C_fix(0));
+t9=(C_word)C_slot(t3,C_fix(0));
+C_trace("g292293");
+t10=t6;
+f_3478(t10,t7,t8,t9);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k3489 in loop281 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3470(t4,((C_word*)t0)[2],t2,t3);}
+
+/* g292 in loop281 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3478(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_3478,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3482,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: 245 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));}
+
+/* k3480 in g292 in loop281 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3485,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 246 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3483 in k3480 in g292 in loop281 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3485(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 247 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));}
+
+/* k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3410(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_3410,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3413,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_3426,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-backend.scm: 251 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[59]))(5,*((C_word*)lf[59]+1),t3,((C_word*)t0)[2],C_fix(1),C_fix(1));}
+
+/* k3424 in k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3426(C_word c,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_3426,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_3428,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_3428(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop302 in k3424 in k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3428(C_word t0,C_word 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_3428,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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3443,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+C_trace("c-backend.scm: 250 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[103],t7,C_make_character(59));}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k3441 in loop302 in k3424 in k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3443(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3428(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k3411 in k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3413,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3416,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: 253 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[101]);}
+else{
+C_trace("c-backend.scm: 252 gen");
+((C_proc6)C_retrieve_proc(*((C_word*)lf[1]+1)))(6,*((C_word*)lf[1]+1),t2,C_SCHEME_TRUE,lf[102],((C_word*)t0)[2],C_make_character(59));}}
+
+/* k3414 in k3411 in k3408 in k3405 in k3402 in k3399 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3416(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 253 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[101]);}
+
+/* k3380 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3382(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3385,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 236 expr-args");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_4378(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3383 in k3380 in k3363 in k3357 in k3351 in k3348 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3385(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 237 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[99]);}
+
+/* k3315 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3317(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3317,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10967,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[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+
+/* f10967 in k3315 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10967(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[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[95]);}
+
+/* k3311 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3313(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 210 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[92],((C_word*)t0)[2],lf[93],t1,lf[94]);}
+
+/* k3297 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3299(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_3299,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3302,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 212 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3300 in k3297 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3302(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 213 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));}
+
+/* k3294 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3296(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3296,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10962,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[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+
+/* f10962 in k3294 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10962(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[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[91]);}
+
+/* k3290 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3292(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_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[88],((C_word*)t0)[2],lf[89],t1,lf[90]);}
+
+/* k3276 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3278(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_3278,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3281,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 207 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3279 in k3276 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3281(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 208 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));}
+
+/* k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3230(C_word c,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_3230,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3233,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_3247,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3251,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 196 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[72]+1)))(3,*((C_word*)lf[72]+1),t4,((C_word*)t0)[2]);}
+
+/* k3249 in k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3251,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f10957,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[82]))(3,*((C_word*)lf[82]+1),t2,t1);}
+
+/* f10957 in k3249 in k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f10957(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[80]))(4,*((C_word*)lf[80]+1),((C_word*)t0)[2],t1,lf[81]);}
+
+/* k3245 in k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 196 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[78],t1,lf[79]);}
+
+/* k3231 in k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3233,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3236,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 197 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3234 in k3231 in k3228 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3236(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 198 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));}
+
+/* k3197 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3199(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 185 c-ify-string");
+((C_proc3)C_retrieve_symbol_proc(lf[71]))(3,*((C_word*)lf[71]+1),((C_word*)t0)[2],t1);}
+
+/* k3193 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3195(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 185 gen");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[1]+1)))(7,*((C_word*)lf[1]+1),((C_word*)t0)[3],lf[69],((C_word*)t0)[2],lf[70],t1,C_make_character(41));}
+
+/* k3151 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3153(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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 176 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* k3119 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+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)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 169 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3122 in k3119 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3124(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],lf[62]);}
+
+/* k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3050(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_3050,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3053,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_3064,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: 164 iota");
+((C_proc5)C_retrieve_symbol_proc(lf[59]))(5,*((C_word*)lf[59]+1),t3,((C_word*)t0)[6],C_fix(1),C_fix(1));}
+
+/* k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3064,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_3066,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_3066(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop177 in k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3066(C_word t0,C_word 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_3066,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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3074,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_3087,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t8=(C_word)C_slot(t2,C_fix(0));
+t9=(C_word)C_slot(t3,C_fix(0));
+C_trace("g188189");
+t10=t6;
+f_3074(t10,t7,t8,t9);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k3085 in loop177 in k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3087(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3066(t4,((C_word*)t0)[2],t2,t3);}
+
+/* g188 in loop177 in k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_3074(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_3074,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3078,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: 161 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t4,lf[57],t3,lf[58]);}
+
+/* k3076 in g188 in loop177 in k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3078(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3078,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3081,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-backend.scm: 162 expr");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3079 in k3076 in g188 in loop177 in k3062 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 163 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));}
+
+/* k3051 in k3048 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3053(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)[3]);
+C_trace("c-backend.scm: 165 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[55],t2,lf[56]);}
+
+/* k3016 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3018(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_3018,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3021,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_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 151 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3019 in k3016 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3021(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_3021,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3024,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[52]);}
+
+/* k3022 in k3019 in k3016 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3024(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_3024,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3027,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 153 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k3025 in k3022 in k3019 in k3016 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_3027(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));}
+
+/* k2987 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2989,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2992,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_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 144 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2990 in k2987 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2992,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,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],tmp=(C_word)a,a+=6,tmp);
+C_trace("c-backend.scm: 145 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),t2,lf[49]);}
+
+/* k2993 in k2990 in k2987 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[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)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 146 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2996 in k2993 in k2990 in k2987 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2998(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));}
+
+/* k2950 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2952(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_2952,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2955,a[2]=((C_word*)t0)[2],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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 137 expr");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+
+/* k2953 in k2950 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2955,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2958,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)C_i_car(((C_word*)t0)[2]);
+t4=(C_word)C_fixnum_plus(t3,C_fix(1));
+C_trace("c-backend.scm: 138 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),t2,lf[45],t4,lf[46]);}
+
+/* k2956 in k2953 in k2950 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2958(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_2958,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2961,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 139 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2959 in k2956 in k2953 in k2950 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2961(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));}
+
+/* k2917 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2922,a[2]=((C_word*)t0)[2],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_car(((C_word*)t0)[5]);
+C_trace("c-backend.scm: 130 expr");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[3]);}
+
+/* k2920 in k2917 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2922(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_2922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2925,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)C_i_car(((C_word*)t0)[2]);
+C_trace("c-backend.scm: 131 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));}
+
+/* k2923 in k2920 in k2917 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2925(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_2925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2928,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 132 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2926 in k2923 in k2920 in k2917 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2928(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],C_make_character(41));}
+
+/* k2898 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2900(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_2900,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2903,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 125 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2901 in k2898 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2903(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-backend.scm: 126 gen");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[1]+1)))(3,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[40]);}
+
+/* k2871 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2873(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_2873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2876,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 120 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2874 in k2871 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2876(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_car(((C_word*)t0)[3]);
+t3=(C_word)C_fixnum_plus(t2,C_fix(1));
+C_trace("c-backend.scm: 121 gen");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[1]+1)))(5,*((C_word*)lf[1]+1),((C_word*)t0)[2],lf[37],t3,C_make_character(93));}
+
+/* loop in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_fcall f_2822(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_2822,NULL,5,t0,t1,t2,t3,t4);}
+t5=t4;
+if(C_truep((C_word)C_fixnum_greaterp(t5,C_fix(0)))){
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2832,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_word)C_i_car(t2);
+C_trace("c-backend.scm: 116 expr");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_2625(t7,t1,t6,t3);}}
+
+/* k2830 in loop in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2832(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_2832,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2835,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)C_i_car(((C_word*)t0)[7]);
+C_trace("c-backend.scm: 113 expr");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[6]);}
+
+/* k2833 in k2830 in loop in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2835(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_2835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2838,a[2]=((C_word*)t0)[2],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));}
+
+/* k2836 in k2833 in k2830 in loop in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2838(C_word 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_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[5]);
+t4=(C_word)C_fixnum_decrease(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 115 loop");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_2822(t5,((C_word*)t0)[2],t2,t3,t4);}
+
+/* k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2764,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2767,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_i_car(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 99 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2765 in k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2767,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2770,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]);}
+
+/* k2768 in k2765 in k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2770,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2773,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_i_cadr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 101 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2771 in k2768 in k2765 in k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2773,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2776,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]);}
+
+/* k2774 in k2771 in k2768 in k2765 in k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 t4;
+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)[5],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_caddr(((C_word*)t0)[4]);
+C_trace("c-backend.scm: 103 expr");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2625(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k2777 in k2774 in k2771 in k2768 in k2765 in k2762 in expr in expression in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2779(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 k2573 in k2487 in k2484 */
+static void C_fcall f_2580(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_2580,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2584,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2592,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]);}
+
+/* a2591 in find-lambda in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2592(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_2592,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2600,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);}
+
+/* k2598 in a2591 in find-lambda in ##compiler#generate-code in k2573 in k2487 in k2484 */
+static void C_ccall f_2600(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_eqp(((C_word*)t0)[2],t1));}
+
+/* k2582 in find-lambda in ##compiler#generate-code in k2573 in k2487 in k2484 */
+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 *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 k2487 in k2484 */
+static void C_ccall f_2535(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_2535,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2543,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));}
+
+/* k2541 in ##compiler#gen-list in k2487 in k2484 */
+static void C_ccall f_2543(C_word c,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_2543,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_2545,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_2545(t5,((C_word*)t0)[2],t1);}
+
+/* loop50 in k2541 in ##compiler#gen-list in k2487 in k2484 */
+static void C_fcall f_2545(C_word 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_2545,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_2560,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));
+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);}}
+
+/* k2558 in loop50 in k2541 in ##compiler#gen-list in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2545(t3,((C_word*)t0)[2],t2);}
+
+/* ##compiler#gen in k2487 in k2484 */
+static void C_ccall f_2492(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_2492r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_2492r(t0,t1,t2);}}
+
+static void C_ccall f_2492r(C_word 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_2498,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_2498(t6,t1,t2);}
+
+/* loop34 in ##compiler#gen in k2487 in k2484 */
+static void C_fcall f_2498(C_word t0,C_word 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_2498,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_2522,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_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);}}
+
+/* k2520 in loop34 in ##compiler#gen in k2487 in k2484 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2498(t3,((C_word*)t0)[2],t2);}
+
+#ifdef C_ENABLE_PTABLES
+static C_PTABLE_ENTRY ptable[785] = {
+{"toplevel:c_backend_scm",(void*)C_backend_toplevel},
+{"f_2486:c_backend_scm",(void*)f_2486},
+{"f_2489:c_backend_scm",(void*)f_2489},
+{"f_10148:c_backend_scm",(void*)f_10148},
+{"f_10151:c_backend_scm",(void*)f_10151},
+{"f_10178:c_backend_scm",(void*)f_10178},
+{"f_10174:c_backend_scm",(void*)f_10174},
+{"f_10154:c_backend_scm",(void*)f_10154},
+{"f_10157:c_backend_scm",(void*)f_10157},
+{"f_10170:c_backend_scm",(void*)f_10170},
+{"f_10160:c_backend_scm",(void*)f_10160},
+{"f_10163:c_backend_scm",(void*)f_10163},
+{"f_10166:c_backend_scm",(void*)f_10166},
+{"f_2575:c_backend_scm",(void*)f_2575},
+{"f_9848:c_backend_scm",(void*)f_9848},
+{"f_10124:c_backend_scm",(void*)f_10124},
+{"f_10122:c_backend_scm",(void*)f_10122},
+{"f_10110:c_backend_scm",(void*)f_10110},
+{"f_10080:c_backend_scm",(void*)f_10080},
+{"f_10041:c_backend_scm",(void*)f_10041},
+{"f_10028:c_backend_scm",(void*)f_10028},
+{"f_10024:c_backend_scm",(void*)f_10024},
+{"f_9910:c_backend_scm",(void*)f_9910},
+{"f_9857:c_backend_scm",(void*)f_9857},
+{"f_9241:c_backend_scm",(void*)f_9241},
+{"f_9352:c_backend_scm",(void*)f_9352},
+{"f_9517:c_backend_scm",(void*)f_9517},
+{"f_9544:c_backend_scm",(void*)f_9544},
+{"f_9722:c_backend_scm",(void*)f_9722},
+{"f_9725:c_backend_scm",(void*)f_9725},
+{"f_9728:c_backend_scm",(void*)f_9728},
+{"f_9731:c_backend_scm",(void*)f_9731},
+{"f_9701:c_backend_scm",(void*)f_9701},
+{"f_9704:c_backend_scm",(void*)f_9704},
+{"f_9707:c_backend_scm",(void*)f_9707},
+{"f_9710:c_backend_scm",(void*)f_9710},
+{"f_9680:c_backend_scm",(void*)f_9680},
+{"f_9683:c_backend_scm",(void*)f_9683},
+{"f_9686:c_backend_scm",(void*)f_9686},
+{"f_9689:c_backend_scm",(void*)f_9689},
+{"f_9643:c_backend_scm",(void*)f_9643},
+{"f_9646:c_backend_scm",(void*)f_9646},
+{"f_9649:c_backend_scm",(void*)f_9649},
+{"f_9652:c_backend_scm",(void*)f_9652},
+{"f_9622:c_backend_scm",(void*)f_9622},
+{"f_9625:c_backend_scm",(void*)f_9625},
+{"f_9628:c_backend_scm",(void*)f_9628},
+{"f_9631:c_backend_scm",(void*)f_9631},
+{"f_9601:c_backend_scm",(void*)f_9601},
+{"f_9604:c_backend_scm",(void*)f_9604},
+{"f_9607:c_backend_scm",(void*)f_9607},
+{"f_9610:c_backend_scm",(void*)f_9610},
+{"f_9580:c_backend_scm",(void*)f_9580},
+{"f_9583:c_backend_scm",(void*)f_9583},
+{"f_9586:c_backend_scm",(void*)f_9586},
+{"f_9589:c_backend_scm",(void*)f_9589},
+{"f_9559:c_backend_scm",(void*)f_9559},
+{"f_9562:c_backend_scm",(void*)f_9562},
+{"f_9565:c_backend_scm",(void*)f_9565},
+{"f_9568:c_backend_scm",(void*)f_9568},
+{"f_9521:c_backend_scm",(void*)f_9521},
+{"f_9487:c_backend_scm",(void*)f_9487},
+{"f_9490:c_backend_scm",(void*)f_9490},
+{"f_9493:c_backend_scm",(void*)f_9493},
+{"f_9496:c_backend_scm",(void*)f_9496},
+{"f_9466:c_backend_scm",(void*)f_9466},
+{"f_9469:c_backend_scm",(void*)f_9469},
+{"f_9472:c_backend_scm",(void*)f_9472},
+{"f_9475:c_backend_scm",(void*)f_9475},
+{"f_9445:c_backend_scm",(void*)f_9445},
+{"f_9448:c_backend_scm",(void*)f_9448},
+{"f_9451:c_backend_scm",(void*)f_9451},
+{"f_9454:c_backend_scm",(void*)f_9454},
+{"f_9421:c_backend_scm",(void*)f_9421},
+{"f_9424:c_backend_scm",(void*)f_9424},
+{"f_9427:c_backend_scm",(void*)f_9427},
+{"f_9430:c_backend_scm",(void*)f_9430},
+{"f_9400:c_backend_scm",(void*)f_9400},
+{"f_9403:c_backend_scm",(void*)f_9403},
+{"f_9406:c_backend_scm",(void*)f_9406},
+{"f_9409:c_backend_scm",(void*)f_9409},
+{"f_9376:c_backend_scm",(void*)f_9376},
+{"f_9379:c_backend_scm",(void*)f_9379},
+{"f_9382:c_backend_scm",(void*)f_9382},
+{"f_9385:c_backend_scm",(void*)f_9385},
+{"f_9355:c_backend_scm",(void*)f_9355},
+{"f_9358:c_backend_scm",(void*)f_9358},
+{"f_9361:c_backend_scm",(void*)f_9361},
+{"f_9364:c_backend_scm",(void*)f_9364},
+{"f_9331:c_backend_scm",(void*)f_9331},
+{"f_9334:c_backend_scm",(void*)f_9334},
+{"f_9337:c_backend_scm",(void*)f_9337},
+{"f_9340:c_backend_scm",(void*)f_9340},
+{"f_9310:c_backend_scm",(void*)f_9310},
+{"f_9313:c_backend_scm",(void*)f_9313},
+{"f_9316:c_backend_scm",(void*)f_9316},
+{"f_9319:c_backend_scm",(void*)f_9319},
+{"f_9243:c_backend_scm",(void*)f_9243},
+{"f_8751:c_backend_scm",(void*)f_8751},
+{"f_8781:c_backend_scm",(void*)f_8781},
+{"f_8808:c_backend_scm",(void*)f_8808},
+{"f_9003:c_backend_scm",(void*)f_9003},
+{"f_9012:c_backend_scm",(void*)f_9012},
+{"f_9021:c_backend_scm",(void*)f_9021},
+{"f_9048:c_backend_scm",(void*)f_9048},
+{"f_9125:c_backend_scm",(void*)f_9125},
+{"f_8753:c_backend_scm",(void*)f_8753},
+{"f_7867:c_backend_scm",(void*)f_7867},
+{"f_7944:c_backend_scm",(void*)f_7944},
+{"f_8046:c_backend_scm",(void*)f_8046},
+{"f_8079:c_backend_scm",(void*)f_8079},
+{"f_8175:c_backend_scm",(void*)f_8175},
+{"f_8187:c_backend_scm",(void*)f_8187},
+{"f_8202:c_backend_scm",(void*)f_8202},
+{"f_8247:c_backend_scm",(void*)f_8247},
+{"f_8264:c_backend_scm",(void*)f_8264},
+{"f_8281:c_backend_scm",(void*)f_8281},
+{"f_8320:c_backend_scm",(void*)f_8320},
+{"f_8337:c_backend_scm",(void*)f_8337},
+{"f_8354:c_backend_scm",(void*)f_8354},
+{"f_8371:c_backend_scm",(void*)f_8371},
+{"f_8388:c_backend_scm",(void*)f_8388},
+{"f_8405:c_backend_scm",(void*)f_8405},
+{"f_8422:c_backend_scm",(void*)f_8422},
+{"f_8434:c_backend_scm",(void*)f_8434},
+{"f_8441:c_backend_scm",(void*)f_8441},
+{"f_8451:c_backend_scm",(void*)f_8451},
+{"f_8491:c_backend_scm",(void*)f_8491},
+{"f_8461:c_backend_scm",(void*)f_8461},
+{"f_8449:c_backend_scm",(void*)f_8449},
+{"f_8445:c_backend_scm",(void*)f_8445},
+{"f_8412:c_backend_scm",(void*)f_8412},
+{"f_8395:c_backend_scm",(void*)f_8395},
+{"f_8378:c_backend_scm",(void*)f_8378},
+{"f_8361:c_backend_scm",(void*)f_8361},
+{"f_8344:c_backend_scm",(void*)f_8344},
+{"f_8327:c_backend_scm",(void*)f_8327},
+{"f_8292:c_backend_scm",(void*)f_8292},
+{"f_8302:c_backend_scm",(void*)f_8302},
+{"f_8300:c_backend_scm",(void*)f_8300},
+{"f_8296:c_backend_scm",(void*)f_8296},
+{"f_8288:c_backend_scm",(void*)f_8288},
+{"f_8275:c_backend_scm",(void*)f_8275},
+{"f_8258:c_backend_scm",(void*)f_8258},
+{"f_8206:c_backend_scm",(void*)f_8206},
+{"f_7874:c_backend_scm",(void*)f_7874},
+{"f_7869:c_backend_scm",(void*)f_7869},
+{"f_7802:c_backend_scm",(void*)f_7802},
+{"f_7806:c_backend_scm",(void*)f_7806},
+{"f_7809:c_backend_scm",(void*)f_7809},
+{"f_7812:c_backend_scm",(void*)f_7812},
+{"f_7815:c_backend_scm",(void*)f_7815},
+{"f_7821:c_backend_scm",(void*)f_7821},
+{"f_7865:c_backend_scm",(void*)f_7865},
+{"f_7824:c_backend_scm",(void*)f_7824},
+{"f_7832:c_backend_scm",(void*)f_7832},
+{"f_7853:c_backend_scm",(void*)f_7853},
+{"f_7836:c_backend_scm",(void*)f_7836},
+{"f_7827:c_backend_scm",(void*)f_7827},
+{"f_7308:c_backend_scm",(void*)f_7308},
+{"f_7314:c_backend_scm",(void*)f_7314},
+{"f_7789:c_backend_scm",(void*)f_7789},
+{"f_7322:c_backend_scm",(void*)f_7322},
+{"f_7326:c_backend_scm",(void*)f_7326},
+{"f_7329:c_backend_scm",(void*)f_7329},
+{"f_7332:c_backend_scm",(void*)f_7332},
+{"f_7335:c_backend_scm",(void*)f_7335},
+{"f_7341:c_backend_scm",(void*)f_7341},
+{"f_7687:c_backend_scm",(void*)f_7687},
+{"f_7690:c_backend_scm",(void*)f_7690},
+{"f_7786:c_backend_scm",(void*)f_7786},
+{"f_7693:c_backend_scm",(void*)f_7693},
+{"f_7696:c_backend_scm",(void*)f_7696},
+{"f_7699:c_backend_scm",(void*)f_7699},
+{"f_7702:c_backend_scm",(void*)f_7702},
+{"f_7735:c_backend_scm",(void*)f_7735},
+{"f_7751:c_backend_scm",(void*)f_7751},
+{"f_7754:c_backend_scm",(void*)f_7754},
+{"f_7705:c_backend_scm",(void*)f_7705},
+{"f_7733:c_backend_scm",(void*)f_7733},
+{"f_7708:c_backend_scm",(void*)f_7708},
+{"f_7711:c_backend_scm",(void*)f_7711},
+{"f_7714:c_backend_scm",(void*)f_7714},
+{"f_7343:c_backend_scm",(void*)f_7343},
+{"f_7353:c_backend_scm",(void*)f_7353},
+{"f_7362:c_backend_scm",(void*)f_7362},
+{"f_7374:c_backend_scm",(void*)f_7374},
+{"f_7386:c_backend_scm",(void*)f_7386},
+{"f_7392:c_backend_scm",(void*)f_7392},
+{"f_7431:c_backend_scm",(void*)f_7431},
+{"f_7396:c_backend_scm",(void*)f_7396},
+{"f_6994:c_backend_scm",(void*)f_6994},
+{"f_7000:c_backend_scm",(void*)f_7000},
+{"f_7295:c_backend_scm",(void*)f_7295},
+{"f_7008:c_backend_scm",(void*)f_7008},
+{"f_7012:c_backend_scm",(void*)f_7012},
+{"f_7015:c_backend_scm",(void*)f_7015},
+{"f_7018:c_backend_scm",(void*)f_7018},
+{"f_7292:c_backend_scm",(void*)f_7292},
+{"f_7024:c_backend_scm",(void*)f_7024},
+{"f_7027:c_backend_scm",(void*)f_7027},
+{"f_7030:c_backend_scm",(void*)f_7030},
+{"f_7033:c_backend_scm",(void*)f_7033},
+{"f_7036:c_backend_scm",(void*)f_7036},
+{"f_7039:c_backend_scm",(void*)f_7039},
+{"f_7042:c_backend_scm",(void*)f_7042},
+{"f_7045:c_backend_scm",(void*)f_7045},
+{"f_7048:c_backend_scm",(void*)f_7048},
+{"f_7051:c_backend_scm",(void*)f_7051},
+{"f_7281:c_backend_scm",(void*)f_7281},
+{"f_7054:c_backend_scm",(void*)f_7054},
+{"f_7057:c_backend_scm",(void*)f_7057},
+{"f_7060:c_backend_scm",(void*)f_7060},
+{"f_7063:c_backend_scm",(void*)f_7063},
+{"f_7066:c_backend_scm",(void*)f_7066},
+{"f_7069:c_backend_scm",(void*)f_7069},
+{"f_7072:c_backend_scm",(void*)f_7072},
+{"f_7075:c_backend_scm",(void*)f_7075},
+{"f_7172:c_backend_scm",(void*)f_7172},
+{"f_7174:c_backend_scm",(void*)f_7174},
+{"f_7181:c_backend_scm",(void*)f_7181},
+{"f_7208:c_backend_scm",(void*)f_7208},
+{"f_7211:c_backend_scm",(void*)f_7211},
+{"f_7214:c_backend_scm",(void*)f_7214},
+{"f_7202:c_backend_scm",(void*)f_7202},
+{"f_7190:c_backend_scm",(void*)f_7190},
+{"f_7194:c_backend_scm",(void*)f_7194},
+{"f_7198:c_backend_scm",(void*)f_7198},
+{"f_7220:c_backend_scm",(void*)f_7220},
+{"f_7078:c_backend_scm",(void*)f_7078},
+{"f_7081:c_backend_scm",(void*)f_7081},
+{"f_7111:c_backend_scm",(void*)f_7111},
+{"f_7114:c_backend_scm",(void*)f_7114},
+{"f_7152:c_backend_scm",(void*)f_7152},
+{"f_7148:c_backend_scm",(void*)f_7148},
+{"f_7117:c_backend_scm",(void*)f_7117},
+{"f_7120:c_backend_scm",(void*)f_7120},
+{"f_7123:c_backend_scm",(void*)f_7123},
+{"f_7090:c_backend_scm",(void*)f_7090},
+{"f_7093:c_backend_scm",(void*)f_7093},
+{"f_7084:c_backend_scm",(void*)f_7084},
+{"f_6954:c_backend_scm",(void*)f_6954},
+{"f_6960:c_backend_scm",(void*)f_6960},
+{"f_6972:c_backend_scm",(void*)f_6972},
+{"f_6975:c_backend_scm",(void*)f_6975},
+{"f_6981:c_backend_scm",(void*)f_6981},
+{"f_6900:c_backend_scm",(void*)f_6900},
+{"f_6904:c_backend_scm",(void*)f_6904},
+{"f_6909:c_backend_scm",(void*)f_6909},
+{"f_6938:c_backend_scm",(void*)f_6938},
+{"f_6941:c_backend_scm",(void*)f_6941},
+{"f_6884:c_backend_scm",(void*)f_6884},
+{"f_6890:c_backend_scm",(void*)f_6890},
+{"f_6898:c_backend_scm",(void*)f_6898},
+{"f_6868:c_backend_scm",(void*)f_6868},
+{"f_6874:c_backend_scm",(void*)f_6874},
+{"f_6882:c_backend_scm",(void*)f_6882},
+{"f_6779:c_backend_scm",(void*)f_6779},
+{"f_6788:c_backend_scm",(void*)f_6788},
+{"f_6817:c_backend_scm",(void*)f_6817},
+{"f_6827:c_backend_scm",(void*)f_6827},
+{"f_6702:c_backend_scm",(void*)f_6702},
+{"f_6706:c_backend_scm",(void*)f_6706},
+{"f_6720:c_backend_scm",(void*)f_6720},
+{"f_6733:c_backend_scm",(void*)f_6733},
+{"f_6765:c_backend_scm",(void*)f_6765},
+{"f_6736:c_backend_scm",(void*)f_6736},
+{"f_6739:c_backend_scm",(void*)f_6739},
+{"f_6709:c_backend_scm",(void*)f_6709},
+{"f_6712:c_backend_scm",(void*)f_6712},
+{"f_6715:c_backend_scm",(void*)f_6715},
+{"f_2577:c_backend_scm",(void*)f_2577},
+{"f_6669:c_backend_scm",(void*)f_6669},
+{"f_6673:c_backend_scm",(void*)f_6673},
+{"f_6676:c_backend_scm",(void*)f_6676},
+{"f_6679:c_backend_scm",(void*)f_6679},
+{"f_6682:c_backend_scm",(void*)f_6682},
+{"f_6685:c_backend_scm",(void*)f_6685},
+{"f_6688:c_backend_scm",(void*)f_6688},
+{"f_6691:c_backend_scm",(void*)f_6691},
+{"f_6694:c_backend_scm",(void*)f_6694},
+{"f_6697:c_backend_scm",(void*)f_6697},
+{"f_5900:c_backend_scm",(void*)f_5900},
+{"f_5906:c_backend_scm",(void*)f_5906},
+{"f_6655:c_backend_scm",(void*)f_6655},
+{"f_5914:c_backend_scm",(void*)f_5914},
+{"f_5918:c_backend_scm",(void*)f_5918},
+{"f_5921:c_backend_scm",(void*)f_5921},
+{"f_5924:c_backend_scm",(void*)f_5924},
+{"f_5927:c_backend_scm",(void*)f_5927},
+{"f_5930:c_backend_scm",(void*)f_5930},
+{"f_5933:c_backend_scm",(void*)f_5933},
+{"f_6652:c_backend_scm",(void*)f_6652},
+{"f_5936:c_backend_scm",(void*)f_5936},
+{"f_5942:c_backend_scm",(void*)f_5942},
+{"f_5945:c_backend_scm",(void*)f_5945},
+{"f_5948:c_backend_scm",(void*)f_5948},
+{"f_5951:c_backend_scm",(void*)f_5951},
+{"f_5954:c_backend_scm",(void*)f_5954},
+{"f_5957:c_backend_scm",(void*)f_5957},
+{"f_5960:c_backend_scm",(void*)f_5960},
+{"f_5963:c_backend_scm",(void*)f_5963},
+{"f_5966:c_backend_scm",(void*)f_5966},
+{"f_5969:c_backend_scm",(void*)f_5969},
+{"f_5972:c_backend_scm",(void*)f_5972},
+{"f_5975:c_backend_scm",(void*)f_5975},
+{"f_6621:c_backend_scm",(void*)f_6621},
+{"f_5978:c_backend_scm",(void*)f_5978},
+{"f_6582:c_backend_scm",(void*)f_6582},
+{"f_6585:c_backend_scm",(void*)f_6585},
+{"f_6588:c_backend_scm",(void*)f_6588},
+{"f_6604:c_backend_scm",(void*)f_6604},
+{"f_6607:c_backend_scm",(void*)f_6607},
+{"f_5981:c_backend_scm",(void*)f_5981},
+{"f_5984:c_backend_scm",(void*)f_5984},
+{"f_5987:c_backend_scm",(void*)f_5987},
+{"f_6554:c_backend_scm",(void*)f_6554},
+{"f_6557:c_backend_scm",(void*)f_6557},
+{"f_5990:c_backend_scm",(void*)f_5990},
+{"f_5993:c_backend_scm",(void*)f_5993},
+{"f_5996:c_backend_scm",(void*)f_5996},
+{"f_5999:c_backend_scm",(void*)f_5999},
+{"f_6002:c_backend_scm",(void*)f_6002},
+{"f_6005:c_backend_scm",(void*)f_6005},
+{"f_6514:c_backend_scm",(void*)f_6514},
+{"f_6516:c_backend_scm",(void*)f_6516},
+{"f_6526:c_backend_scm",(void*)f_6526},
+{"f_6008:c_backend_scm",(void*)f_6008},
+{"f_6459:c_backend_scm",(void*)f_6459},
+{"f_6471:c_backend_scm",(void*)f_6471},
+{"f_6474:c_backend_scm",(void*)f_6474},
+{"f_6381:c_backend_scm",(void*)f_6381},
+{"f_6423:c_backend_scm",(void*)f_6423},
+{"f_6384:c_backend_scm",(void*)f_6384},
+{"f_6390:c_backend_scm",(void*)f_6390},
+{"f_6393:c_backend_scm",(void*)f_6393},
+{"f_6317:c_backend_scm",(void*)f_6317},
+{"f_6320:c_backend_scm",(void*)f_6320},
+{"f_6323:c_backend_scm",(void*)f_6323},
+{"f_6326:c_backend_scm",(void*)f_6326},
+{"f_6329:c_backend_scm",(void*)f_6329},
+{"f_6344:c_backend_scm",(void*)f_6344},
+{"f_6332:c_backend_scm",(void*)f_6332},
+{"f_6335:c_backend_scm",(void*)f_6335},
+{"f_6303:c_backend_scm",(void*)f_6303},
+{"f_6311:c_backend_scm",(void*)f_6311},
+{"f_6228:c_backend_scm",(void*)f_6228},
+{"f_6234:c_backend_scm",(void*)f_6234},
+{"f_6237:c_backend_scm",(void*)f_6237},
+{"f_6271:c_backend_scm",(void*)f_6271},
+{"f_6274:c_backend_scm",(void*)f_6274},
+{"f_6277:c_backend_scm",(void*)f_6277},
+{"f_6240:c_backend_scm",(void*)f_6240},
+{"f_6243:c_backend_scm",(void*)f_6243},
+{"f_6246:c_backend_scm",(void*)f_6246},
+{"f_6249:c_backend_scm",(void*)f_6249},
+{"f_6258:c_backend_scm",(void*)f_6258},
+{"f_6261:c_backend_scm",(void*)f_6261},
+{"f_6011:c_backend_scm",(void*)f_6011},
+{"f_6034:c_backend_scm",(void*)f_6034},
+{"f_6169:c_backend_scm",(void*)f_6169},
+{"f_6172:c_backend_scm",(void*)f_6172},
+{"f_6184:c_backend_scm",(void*)f_6184},
+{"f_6175:c_backend_scm",(void*)f_6175},
+{"f_6040:c_backend_scm",(void*)f_6040},
+{"f_6043:c_backend_scm",(void*)f_6043},
+{"f_6046:c_backend_scm",(void*)f_6046},
+{"f_6150:c_backend_scm",(void*)f_6150},
+{"f_6049:c_backend_scm",(void*)f_6049},
+{"f_6052:c_backend_scm",(void*)f_6052},
+{"f_6055:c_backend_scm",(void*)f_6055},
+{"f_6058:c_backend_scm",(void*)f_6058},
+{"f_6123:c_backend_scm",(void*)f_6123},
+{"f_6119:c_backend_scm",(void*)f_6119},
+{"f_6061:c_backend_scm",(void*)f_6061},
+{"f_6064:c_backend_scm",(void*)f_6064},
+{"f_6067:c_backend_scm",(void*)f_6067},
+{"f_6070:c_backend_scm",(void*)f_6070},
+{"f_6073:c_backend_scm",(void*)f_6073},
+{"f_6076:c_backend_scm",(void*)f_6076},
+{"f_6094:c_backend_scm",(void*)f_6094},
+{"f_6104:c_backend_scm",(void*)f_6104},
+{"f_6079:c_backend_scm",(void*)f_6079},
+{"f_6014:c_backend_scm",(void*)f_6014},
+{"f_6024:c_backend_scm",(void*)f_6024},
+{"f_6017:c_backend_scm",(void*)f_6017},
+{"f_5888:c_backend_scm",(void*)f_5888},
+{"f_5895:c_backend_scm",(void*)f_5895},
+{"f_5898:c_backend_scm",(void*)f_5898},
+{"f_5811:c_backend_scm",(void*)f_5811},
+{"f_5818:c_backend_scm",(void*)f_5818},
+{"f_5821:c_backend_scm",(void*)f_5821},
+{"f_5826:c_backend_scm",(void*)f_5826},
+{"f_5882:c_backend_scm",(void*)f_5882},
+{"f_5878:c_backend_scm",(void*)f_5878},
+{"f_5863:c_backend_scm",(void*)f_5863},
+{"f_5842:c_backend_scm",(void*)f_5842},
+{"f_5853:c_backend_scm",(void*)f_5853},
+{"f_5849:c_backend_scm",(void*)f_5849},
+{"f_5669:c_backend_scm",(void*)f_5669},
+{"f_5809:c_backend_scm",(void*)f_5809},
+{"f_5676:c_backend_scm",(void*)f_5676},
+{"f_5682:c_backend_scm",(void*)f_5682},
+{"f_5765:c_backend_scm",(void*)f_5765},
+{"f_5768:c_backend_scm",(void*)f_5768},
+{"f_5778:c_backend_scm",(void*)f_5778},
+{"f_5771:c_backend_scm",(void*)f_5771},
+{"f_5732:c_backend_scm",(void*)f_5732},
+{"f_5738:c_backend_scm",(void*)f_5738},
+{"f_5475:c_backend_scm",(void*)f_5475},
+{"f_5482:c_backend_scm",(void*)f_5482},
+{"f_5591:c_backend_scm",(void*)f_5591},
+{"f_5609:c_backend_scm",(void*)f_5609},
+{"f_5638:c_backend_scm",(void*)f_5638},
+{"f_5660:c_backend_scm",(void*)f_5660},
+{"f_5616:c_backend_scm",(void*)f_5616},
+{"f_5550:c_backend_scm",(void*)f_5550},
+{"f_5552:c_backend_scm",(void*)f_5552},
+{"f_5581:c_backend_scm",(void*)f_5581},
+{"f_5546:c_backend_scm",(void*)f_5546},
+{"f_5542:c_backend_scm",(void*)f_5542},
+{"f_5513:c_backend_scm",(void*)f_5513},
+{"f_5517:c_backend_scm",(void*)f_5517},
+{"f_5420:c_backend_scm",(void*)f_5420},
+{"f_5426:c_backend_scm",(void*)f_5426},
+{"f_5455:c_backend_scm",(void*)f_5455},
+{"f_5458:c_backend_scm",(void*)f_5458},
+{"f_5461:c_backend_scm",(void*)f_5461},
+{"f_5464:c_backend_scm",(void*)f_5464},
+{"f_5467:c_backend_scm",(void*)f_5467},
+{"f_5436:c_backend_scm",(void*)f_5436},
+{"f_5090:c_backend_scm",(void*)f_5090},
+{"f_5279:c_backend_scm",(void*)f_5279},
+{"f_5407:c_backend_scm",(void*)f_5407},
+{"f_5287:c_backend_scm",(void*)f_5287},
+{"f_5291:c_backend_scm",(void*)f_5291},
+{"f_5294:c_backend_scm",(void*)f_5294},
+{"f_5297:c_backend_scm",(void*)f_5297},
+{"f_5300:c_backend_scm",(void*)f_5300},
+{"f_5303:c_backend_scm",(void*)f_5303},
+{"f_5404:c_backend_scm",(void*)f_5404},
+{"f_5306:c_backend_scm",(void*)f_5306},
+{"f_5309:c_backend_scm",(void*)f_5309},
+{"f_5315:c_backend_scm",(void*)f_5315},
+{"f_5393:c_backend_scm",(void*)f_5393},
+{"f_5349:c_backend_scm",(void*)f_5349},
+{"f_5355:c_backend_scm",(void*)f_5355},
+{"f_5373:c_backend_scm",(void*)f_5373},
+{"f_5369:c_backend_scm",(void*)f_5369},
+{"f_5365:c_backend_scm",(void*)f_5365},
+{"f_5321:c_backend_scm",(void*)f_5321},
+{"f_5324:c_backend_scm",(void*)f_5324},
+{"f_5327:c_backend_scm",(void*)f_5327},
+{"f_5330:c_backend_scm",(void*)f_5330},
+{"f_5333:c_backend_scm",(void*)f_5333},
+{"f_5343:c_backend_scm",(void*)f_5343},
+{"f_5336:c_backend_scm",(void*)f_5336},
+{"f_5209:c_backend_scm",(void*)f_5209},
+{"f_5228:c_backend_scm",(void*)f_5228},
+{"f_5266:c_backend_scm",(void*)f_5266},
+{"f_5236:c_backend_scm",(void*)f_5236},
+{"f_5240:c_backend_scm",(void*)f_5240},
+{"f_5243:c_backend_scm",(void*)f_5243},
+{"f_5246:c_backend_scm",(void*)f_5246},
+{"f_5249:c_backend_scm",(void*)f_5249},
+{"f_5263:c_backend_scm",(void*)f_5263},
+{"f_5259:c_backend_scm",(void*)f_5259},
+{"f_5252:c_backend_scm",(void*)f_5252},
+{"f_5212:c_backend_scm",(void*)f_5212},
+{"f_5226:c_backend_scm",(void*)f_5226},
+{"f_5215:c_backend_scm",(void*)f_5215},
+{"f_5222:c_backend_scm",(void*)f_5222},
+{"f_5129:c_backend_scm",(void*)f_5129},
+{"f_5131:c_backend_scm",(void*)f_5131},
+{"f_5135:c_backend_scm",(void*)f_5135},
+{"f_5138:c_backend_scm",(void*)f_5138},
+{"f_5141:c_backend_scm",(void*)f_5141},
+{"f_5144:c_backend_scm",(void*)f_5144},
+{"f_5147:c_backend_scm",(void*)f_5147},
+{"f_5150:c_backend_scm",(void*)f_5150},
+{"f_5153:c_backend_scm",(void*)f_5153},
+{"f_5156:c_backend_scm",(void*)f_5156},
+{"f_5159:c_backend_scm",(void*)f_5159},
+{"f_5162:c_backend_scm",(void*)f_5162},
+{"f_5165:c_backend_scm",(void*)f_5165},
+{"f_5168:c_backend_scm",(void*)f_5168},
+{"f_5182:c_backend_scm",(void*)f_5182},
+{"f_5178:c_backend_scm",(void*)f_5178},
+{"f_5171:c_backend_scm",(void*)f_5171},
+{"f_5093:c_backend_scm",(void*)f_5093},
+{"f_5106:c_backend_scm",(void*)f_5106},
+{"f_5116:c_backend_scm",(void*)f_5116},
+{"f_5097:c_backend_scm",(void*)f_5097},
+{"f_4750:c_backend_scm",(void*)f_4750},
+{"f_4754:c_backend_scm",(void*)f_4754},
+{"f_4823:c_backend_scm",(void*)f_4823},
+{"f_5077:c_backend_scm",(void*)f_5077},
+{"f_4831:c_backend_scm",(void*)f_4831},
+{"f_4835:c_backend_scm",(void*)f_4835},
+{"f_4838:c_backend_scm",(void*)f_4838},
+{"f_5074:c_backend_scm",(void*)f_5074},
+{"f_4841:c_backend_scm",(void*)f_4841},
+{"f_5060:c_backend_scm",(void*)f_5060},
+{"f_4844:c_backend_scm",(void*)f_4844},
+{"f_4847:c_backend_scm",(void*)f_4847},
+{"f_4850:c_backend_scm",(void*)f_4850},
+{"f_4853:c_backend_scm",(void*)f_4853},
+{"f_4856:c_backend_scm",(void*)f_4856},
+{"f_4859:c_backend_scm",(void*)f_4859},
+{"f_5052:c_backend_scm",(void*)f_5052},
+{"f_4862:c_backend_scm",(void*)f_4862},
+{"f_4865:c_backend_scm",(void*)f_4865},
+{"f_5006:c_backend_scm",(void*)f_5006},
+{"f_5008:c_backend_scm",(void*)f_5008},
+{"f_5034:c_backend_scm",(void*)f_5034},
+{"f_5016:c_backend_scm",(void*)f_5016},
+{"f_5027:c_backend_scm",(void*)f_5027},
+{"f_4868:c_backend_scm",(void*)f_4868},
+{"f_4955:c_backend_scm",(void*)f_4955},
+{"f_4958:c_backend_scm",(void*)f_4958},
+{"f_4961:c_backend_scm",(void*)f_4961},
+{"f_4964:c_backend_scm",(void*)f_4964},
+{"f_4980:c_backend_scm",(void*)f_4980},
+{"f_4983:c_backend_scm",(void*)f_4983},
+{"f11016:c_backend_scm",(void*)f11016},
+{"f_4986:c_backend_scm",(void*)f_4986},
+{"f_4989:c_backend_scm",(void*)f_4989},
+{"f_4871:c_backend_scm",(void*)f_4871},
+{"f_4874:c_backend_scm",(void*)f_4874},
+{"f_4877:c_backend_scm",(void*)f_4877},
+{"f_4927:c_backend_scm",(void*)f_4927},
+{"f_4930:c_backend_scm",(void*)f_4930},
+{"f_4880:c_backend_scm",(void*)f_4880},
+{"f_4883:c_backend_scm",(void*)f_4883},
+{"f_4915:c_backend_scm",(void*)f_4915},
+{"f_4918:c_backend_scm",(void*)f_4918},
+{"f_4889:c_backend_scm",(void*)f_4889},
+{"f_4898:c_backend_scm",(void*)f_4898},
+{"f_4901:c_backend_scm",(void*)f_4901},
+{"f_4757:c_backend_scm",(void*)f_4757},
+{"f_4762:c_backend_scm",(void*)f_4762},
+{"f_4774:c_backend_scm",(void*)f_4774},
+{"f_4784:c_backend_scm",(void*)f_4784},
+{"f_4786:c_backend_scm",(void*)f_4786},
+{"f_4796:c_backend_scm",(void*)f_4796},
+{"f_4777:c_backend_scm",(void*)f_4777},
+{"f_4810:c_backend_scm",(void*)f_4810},
+{"f_4579:c_backend_scm",(void*)f_4579},
+{"f_4586:c_backend_scm",(void*)f_4586},
+{"f_4722:c_backend_scm",(void*)f_4722},
+{"f_4737:c_backend_scm",(void*)f_4737},
+{"f_4589:c_backend_scm",(void*)f_4589},
+{"f_4592:c_backend_scm",(void*)f_4592},
+{"f_4595:c_backend_scm",(void*)f_4595},
+{"f_4600:c_backend_scm",(void*)f_4600},
+{"f_4610:c_backend_scm",(void*)f_4610},
+{"f_4616:c_backend_scm",(void*)f_4616},
+{"f_4669:c_backend_scm",(void*)f_4669},
+{"f_4679:c_backend_scm",(void*)f_4679},
+{"f_4619:c_backend_scm",(void*)f_4619},
+{"f_4642:c_backend_scm",(void*)f_4642},
+{"f_4652:c_backend_scm",(void*)f_4652},
+{"f_4622:c_backend_scm",(void*)f_4622},
+{"f_4625:c_backend_scm",(void*)f_4625},
+{"f_4410:c_backend_scm",(void*)f_4410},
+{"f_4571:c_backend_scm",(void*)f_4571},
+{"f_4430:c_backend_scm",(void*)f_4430},
+{"f_4529:c_backend_scm",(void*)f_4529},
+{"f_4533:c_backend_scm",(void*)f_4533},
+{"f_4537:c_backend_scm",(void*)f_4537},
+{"f_4541:c_backend_scm",(void*)f_4541},
+{"f_4563:c_backend_scm",(void*)f_4563},
+{"f_4559:c_backend_scm",(void*)f_4559},
+{"f_4551:c_backend_scm",(void*)f_4551},
+{"f_4549:c_backend_scm",(void*)f_4549},
+{"f_4545:c_backend_scm",(void*)f_4545},
+{"f_4448:c_backend_scm",(void*)f_4448},
+{"f_4451:c_backend_scm",(void*)f_4451},
+{"f_4454:c_backend_scm",(void*)f_4454},
+{"f_4518:c_backend_scm",(void*)f_4518},
+{"f_4457:c_backend_scm",(void*)f_4457},
+{"f_4460:c_backend_scm",(void*)f_4460},
+{"f_4463:c_backend_scm",(void*)f_4463},
+{"f_4478:c_backend_scm",(void*)f_4478},
+{"f_4483:c_backend_scm",(void*)f_4483},
+{"f_4498:c_backend_scm",(void*)f_4498},
+{"f_4466:c_backend_scm",(void*)f_4466},
+{"f_4413:c_backend_scm",(void*)f_4413},
+{"f_4427:c_backend_scm",(void*)f_4427},
+{"f_2622:c_backend_scm",(void*)f_2622},
+{"f_4378:c_backend_scm",(void*)f_4378},
+{"f_4384:c_backend_scm",(void*)f_4384},
+{"f_4388:c_backend_scm",(void*)f_4388},
+{"f_2625:c_backend_scm",(void*)f_2625},
+{"f_4343:c_backend_scm",(void*)f_4343},
+{"f_4346:c_backend_scm",(void*)f_4346},
+{"f_4349:c_backend_scm",(void*)f_4349},
+{"f_4352:c_backend_scm",(void*)f_4352},
+{"f_4355:c_backend_scm",(void*)f_4355},
+{"f_4358:c_backend_scm",(void*)f_4358},
+{"f_4260:c_backend_scm",(void*)f_4260},
+{"f_4263:c_backend_scm",(void*)f_4263},
+{"f_4266:c_backend_scm",(void*)f_4266},
+{"f_4279:c_backend_scm",(void*)f_4279},
+{"f_4302:c_backend_scm",(void*)f_4302},
+{"f_4305:c_backend_scm",(void*)f_4305},
+{"f_4308:c_backend_scm",(void*)f_4308},
+{"f_4311:c_backend_scm",(void*)f_4311},
+{"f_4289:c_backend_scm",(void*)f_4289},
+{"f_4292:c_backend_scm",(void*)f_4292},
+{"f_4251:c_backend_scm",(void*)f_4251},
+{"f_4223:c_backend_scm",(void*)f_4223},
+{"f_4226:c_backend_scm",(void*)f_4226},
+{"f_4243:c_backend_scm",(void*)f_4243},
+{"f_4229:c_backend_scm",(void*)f_4229},
+{"f_4232:c_backend_scm",(void*)f_4232},
+{"f_4207:c_backend_scm",(void*)f_4207},
+{"f_4211:c_backend_scm",(void*)f_4211},
+{"f_4193:c_backend_scm",(void*)f_4193},
+{"f_4196:c_backend_scm",(void*)f_4196},
+{"f_4177:c_backend_scm",(void*)f_4177},
+{"f_4181:c_backend_scm",(void*)f_4181},
+{"f_4159:c_backend_scm",(void*)f_4159},
+{"f_4162:c_backend_scm",(void*)f_4162},
+{"f_4139:c_backend_scm",(void*)f_4139},
+{"f_4103:c_backend_scm",(void*)f_4103},
+{"f_4115:c_backend_scm",(void*)f_4115},
+{"f_4106:c_backend_scm",(void*)f_4106},
+{"f_4084:c_backend_scm",(void*)f_4084},
+{"f_4087:c_backend_scm",(void*)f_4087},
+{"f_4065:c_backend_scm",(void*)f_4065},
+{"f_4068:c_backend_scm",(void*)f_4068},
+{"f_4046:c_backend_scm",(void*)f_4046},
+{"f_4049:c_backend_scm",(void*)f_4049},
+{"f_4027:c_backend_scm",(void*)f_4027},
+{"f_4023:c_backend_scm",(void*)f_4023},
+{"f_3971:c_backend_scm",(void*)f_3971},
+{"f_4004:c_backend_scm",(void*)f_4004},
+{"f_3974:c_backend_scm",(void*)f_3974},
+{"f_3992:c_backend_scm",(void*)f_3992},
+{"f_3977:c_backend_scm",(void*)f_3977},
+{"f_3980:c_backend_scm",(void*)f_3980},
+{"f_3938:c_backend_scm",(void*)f_3938},
+{"f_3922:c_backend_scm",(void*)f_3922},
+{"f10988:c_backend_scm",(void*)f10988},
+{"f_3925:c_backend_scm",(void*)f_3925},
+{"f_3928:c_backend_scm",(void*)f_3928},
+{"f_3809:c_backend_scm",(void*)f_3809},
+{"f_3812:c_backend_scm",(void*)f_3812},
+{"f_3869:c_backend_scm",(void*)f_3869},
+{"f_3890:c_backend_scm",(void*)f_3890},
+{"f_3877:c_backend_scm",(void*)f_3877},
+{"f_3881:c_backend_scm",(void*)f_3881},
+{"f_3884:c_backend_scm",(void*)f_3884},
+{"f_3815:c_backend_scm",(void*)f_3815},
+{"f_3825:c_backend_scm",(void*)f_3825},
+{"f_3827:c_backend_scm",(void*)f_3827},
+{"f_3842:c_backend_scm",(void*)f_3842},
+{"f_3818:c_backend_scm",(void*)f_3818},
+{"f_3350:c_backend_scm",(void*)f_3350},
+{"f_3353:c_backend_scm",(void*)f_3353},
+{"f_3759:c_backend_scm",(void*)f_3759},
+{"f_3755:c_backend_scm",(void*)f_3755},
+{"f_3359:c_backend_scm",(void*)f_3359},
+{"f10980:c_backend_scm",(void*)f10980},
+{"f_3748:c_backend_scm",(void*)f_3748},
+{"f_2610:c_backend_scm",(void*)f_2610},
+{"f_3741:c_backend_scm",(void*)f_3741},
+{"f_3365:c_backend_scm",(void*)f_3365},
+{"f_3569:c_backend_scm",(void*)f_3569},
+{"f_3658:c_backend_scm",(void*)f_3658},
+{"f_3661:c_backend_scm",(void*)f_3661},
+{"f_3664:c_backend_scm",(void*)f_3664},
+{"f_3679:c_backend_scm",(void*)f_3679},
+{"f_3667:c_backend_scm",(void*)f_3667},
+{"f_3670:c_backend_scm",(void*)f_3670},
+{"f_3673:c_backend_scm",(void*)f_3673},
+{"f_3589:c_backend_scm",(void*)f_3589},
+{"f_3655:c_backend_scm",(void*)f_3655},
+{"f_3648:c_backend_scm",(void*)f_3648},
+{"f_3644:c_backend_scm",(void*)f_3644},
+{"f_3637:c_backend_scm",(void*)f_3637},
+{"f_3630:c_backend_scm",(void*)f_3630},
+{"f_3605:c_backend_scm",(void*)f_3605},
+{"f_3622:c_backend_scm",(void*)f_3622},
+{"f_3618:c_backend_scm",(void*)f_3618},
+{"f_3592:c_backend_scm",(void*)f_3592},
+{"f_3595:c_backend_scm",(void*)f_3595},
+{"f_3598:c_backend_scm",(void*)f_3598},
+{"f_3563:c_backend_scm",(void*)f_3563},
+{"f_3401:c_backend_scm",(void*)f_3401},
+{"f_3547:c_backend_scm",(void*)f_3547},
+{"f_3550:c_backend_scm",(void*)f_3550},
+{"f_3523:c_backend_scm",(void*)f_3523},
+{"f_3526:c_backend_scm",(void*)f_3526},
+{"f_3529:c_backend_scm",(void*)f_3529},
+{"f10975:c_backend_scm",(void*)f10975},
+{"f_3532:c_backend_scm",(void*)f_3532},
+{"f_3535:c_backend_scm",(void*)f_3535},
+{"f_3404:c_backend_scm",(void*)f_3404},
+{"f_3407:c_backend_scm",(void*)f_3407},
+{"f_3470:c_backend_scm",(void*)f_3470},
+{"f_3491:c_backend_scm",(void*)f_3491},
+{"f_3478:c_backend_scm",(void*)f_3478},
+{"f_3482:c_backend_scm",(void*)f_3482},
+{"f_3485:c_backend_scm",(void*)f_3485},
+{"f_3410:c_backend_scm",(void*)f_3410},
+{"f_3426:c_backend_scm",(void*)f_3426},
+{"f_3428:c_backend_scm",(void*)f_3428},
+{"f_3443:c_backend_scm",(void*)f_3443},
+{"f_3413:c_backend_scm",(void*)f_3413},
+{"f_3416:c_backend_scm",(void*)f_3416},
+{"f_3382:c_backend_scm",(void*)f_3382},
+{"f_3385:c_backend_scm",(void*)f_3385},
+{"f_3317:c_backend_scm",(void*)f_3317},
+{"f10967:c_backend_scm",(void*)f10967},
+{"f_3313:c_backend_scm",(void*)f_3313},
+{"f_3299:c_backend_scm",(void*)f_3299},
+{"f_3302:c_backend_scm",(void*)f_3302},
+{"f_3296:c_backend_scm",(void*)f_3296},
+{"f10962:c_backend_scm",(void*)f10962},
+{"f_3292:c_backend_scm",(void*)f_3292},
+{"f_3278:c_backend_scm",(void*)f_3278},
+{"f_3281:c_backend_scm",(void*)f_3281},
+{"f_3230:c_backend_scm",(void*)f_3230},
+{"f_3251:c_backend_scm",(void*)f_3251},
+{"f10957:c_backend_scm",(void*)f10957},
+{"f_3247:c_backend_scm",(void*)f_3247},
+{"f_3233:c_backend_scm",(void*)f_3233},
+{"f_3236:c_backend_scm",(void*)f_3236},
+{"f_3199:c_backend_scm",(void*)f_3199},
+{"f_3195:c_backend_scm",(void*)f_3195},
+{"f_3153:c_backend_scm",(void*)f_3153},
+{"f_3121:c_backend_scm",(void*)f_3121},
+{"f_3124:c_backend_scm",(void*)f_3124},
+{"f_3050:c_backend_scm",(void*)f_3050},
+{"f_3064:c_backend_scm",(void*)f_3064},
+{"f_3066:c_backend_scm",(void*)f_3066},
+{"f_3087:c_backend_scm",(void*)f_3087},
+{"f_3074:c_backend_scm",(void*)f_3074},
+{"f_3078:c_backend_scm",(void*)f_3078},
+{"f_3081:c_backend_scm",(void*)f_3081},
+{"f_3053:c_backend_scm",(void*)f_3053},
+{"f_3018:c_backend_scm",(void*)f_3018},
+{"f_3021:c_backend_scm",(void*)f_3021},
+{"f_3024:c_backend_scm",(void*)f_3024},
+{"f_3027:c_backend_scm",(void*)f_3027},
+{"f_2989:c_backend_scm",(void*)f_2989},
+{"f_2992:c_backend_scm",(void*)f_2992},
+{"f_2995:c_backend_scm",(void*)f_2995},
+{"f_2998:c_backend_scm",(void*)f_2998},
+{"f_2952:c_backend_scm",(void*)f_2952},
+{"f_2955:c_backend_scm",(void*)f_2955},
+{"f_2958:c_backend_scm",(void*)f_2958},
+{"f_2961:c_backend_scm",(void*)f_2961},
+{"f_2919:c_backend_scm",(void*)f_2919},
+{"f_2922:c_backend_scm",(void*)f_2922},
+{"f_2925:c_backend_scm",(void*)f_2925},
+{"f_2928:c_backend_scm",(void*)f_2928},
+{"f_2900:c_backend_scm",(void*)f_2900},
+{"f_2903:c_backend_scm",(void*)f_2903},
+{"f_2873:c_backend_scm",(void*)f_2873},
+{"f_2876:c_backend_scm",(void*)f_2876},
+{"f_2822:c_backend_scm",(void*)f_2822},
+{"f_2832:c_backend_scm",(void*)f_2832},
+{"f_2835:c_backend_scm",(void*)f_2835},
+{"f_2838:c_backend_scm",(void*)f_2838},
+{"f_2764:c_backend_scm",(void*)f_2764},
+{"f_2767:c_backend_scm",(void*)f_2767},
+{"f_2770:c_backend_scm",(void*)f_2770},
+{"f_2773:c_backend_scm",(void*)f_2773},
+{"f_2776:c_backend_scm",(void*)f_2776},
+{"f_2779:c_backend_scm",(void*)f_2779},
+{"f_2580:c_backend_scm",(void*)f_2580},
+{"f_2592:c_backend_scm",(void*)f_2592},
+{"f_2600:c_backend_scm",(void*)f_2600},
+{"f_2584:c_backend_scm",(void*)f_2584},
+{"f_2535:c_backend_scm",(void*)f_2535},
+{"f_2543:c_backend_scm",(void*)f_2543},
+{"f_2545:c_backend_scm",(void*)f_2545},
+{"f_2560:c_backend_scm",(void*)f_2560},
+{"f_2492:c_backend_scm",(void*)f_2492},
+{"f_2498:c_backend_scm",(void*)f_2498},
+{"f_2522:c_backend_scm",(void*)f_2522},
+{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
new file mode 100644
index 00000000..3d1dcb31
--- /dev/null
+++ b/bootstrap/c-platform.c
@@ -0,0 +1,10075 @@
+/* Generated from c-platform.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:30
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[908];
+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_1303)
+static void C_ccall f_1303(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1306)
+static void C_ccall f_1306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4930)
+static void C_ccall f_4930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1330)
+static void C_ccall f_1330(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1333)
+static void C_ccall f_1333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4753)
+static void C_ccall f_4753(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_4894)
+static void C_ccall f_4894(C_word c,C_word t0,C_word t1,C_word t2) 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_4825)
+static void C_ccall f_4825(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4832)
+static void C_fcall f_4832(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_4823)
+static void C_ccall f_4823(C_word c,C_word t0,C_word t1) 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_1336)
+static void C_ccall f_1336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4603)
+static void C_ccall f_4603(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_4705)
+static void C_ccall f_4705(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4703)
+static void C_ccall f_4703(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_4672)
+static void C_ccall f_4672(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1339)
+static void C_ccall f_1339(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4444)
+static void C_ccall f_4444(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_4561)
+static void C_ccall f_4561(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4559)
+static void C_ccall f_4559(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_4491)
+static void C_fcall f_4491(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4507)
+static void C_ccall f_4507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4482)
+static void C_ccall f_4482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1342)
+static void C_ccall f_1342(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4326)
+static void C_ccall f_4326(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_4429)
+static void C_ccall f_4429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4361)
+static void C_fcall f_4361(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_1345)
+static void C_ccall f_1345(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_1422)
+static void C_ccall f_1422(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_1425)
+static void C_ccall f_1425(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_1620)
+static void C_ccall f_1620(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4103)
+static void C_ccall f_4103(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_4276)
+static void C_ccall f_4276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4119)
+static void C_fcall f_4119(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4221)
+static void C_ccall f_4221(C_word c,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_noret;
+C_noret_decl(f_4188)
+static void C_ccall f_4188(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4155)
+static void C_fcall f_4155(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4125)
+static void C_fcall f_4125(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1623)
+static void C_ccall f_1623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1839)
+static void C_ccall f_1839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1842)
+static void C_ccall f_1842(C_word c,C_word t0,C_word t1) 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_1983)
+static void C_ccall f_1983(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1986)
+static void C_ccall f_1986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1989)
+static void C_ccall f_1989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1992)
+static void C_ccall f_1992(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1995)
+static void C_ccall f_1995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1998)
+static void C_ccall f_1998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2001)
+static void C_ccall f_2001(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2004)
+static void C_ccall f_2004(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_noret;
+C_noret_decl(f_2034)
+static void C_ccall f_2034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2037)
+static void C_ccall f_2037(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_2262)
+static void C_ccall f_2262(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_2268)
+static void C_ccall f_2268(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_2274)
+static void C_ccall f_2274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2277)
+static void C_ccall f_2277(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_2286)
+static void C_ccall f_2286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2289)
+static void C_ccall f_2289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2292)
+static void C_ccall f_2292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2295)
+static void C_ccall f_2295(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2298)
+static void C_ccall f_2298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2301)
+static void C_ccall f_2301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2304)
+static void C_ccall f_2304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2307)
+static void C_ccall f_2307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2310)
+static void C_ccall f_2310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2313)
+static void C_ccall f_2313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2316)
+static void C_ccall f_2316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2319)
+static void C_ccall f_2319(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_2325)
+static void C_ccall f_2325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2328)
+static void C_ccall f_2328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2331)
+static void C_ccall f_2331(C_word c,C_word t0,C_word t1) 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_2337)
+static void C_ccall f_2337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2340)
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2343)
+static void C_ccall f_2343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2346)
+static void C_ccall f_2346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2349)
+static void C_ccall f_2349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2352)
+static void C_ccall f_2352(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_2367)
+static void C_ccall f_2367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2370)
+static void C_ccall f_2370(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2373)
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2376)
+static void C_ccall f_2376(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_2382)
+static void C_ccall f_2382(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2385)
+static void C_ccall f_2385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2388)
+static void C_ccall f_2388(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2391)
+static void C_ccall f_2391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2394)
+static void C_ccall f_2394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2397)
+static void C_ccall f_2397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2400)
+static void C_ccall f_2400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2403)
+static void C_ccall f_2403(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_2409)
+static void C_ccall f_2409(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_2418)
+static void C_ccall f_2418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2421)
+static void C_ccall f_2421(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2424)
+static void C_ccall f_2424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2427)
+static void C_ccall f_2427(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_2433)
+static void C_ccall f_2433(C_word c,C_word t0,C_word t1) 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_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_2463)
+static void C_ccall f_2463(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_2469)
+static void C_ccall f_2469(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_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_2481)
+static void C_ccall f_2481(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_2487)
+static void C_ccall f_2487(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2490)
+static void C_ccall f_2490(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_2502)
+static void C_ccall f_2502(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2505)
+static void C_ccall f_2505(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_2514)
+static void C_ccall f_2514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2517)
+static void C_ccall f_2517(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_2523)
+static void C_ccall f_2523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2526)
+static void C_ccall f_2526(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_2532)
+static void C_ccall f_2532(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_2538)
+static void C_ccall f_2538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2541)
+static void C_ccall f_2541(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_2547)
+static void C_ccall f_2547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2550)
+static void C_ccall f_2550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2553)
+static void C_ccall f_2553(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2556)
+static void C_ccall f_2556(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2559)
+static void C_ccall f_2559(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_2565)
+static void C_ccall f_2565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2568)
+static void C_ccall f_2568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2571)
+static void C_ccall f_2571(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_2577)
+static void C_ccall f_2577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2580)
+static void C_ccall f_2580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2583)
+static void C_ccall f_2583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2586)
+static void C_ccall f_2586(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_2592)
+static void C_ccall f_2592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2595)
+static void C_ccall f_2595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2598)
+static void C_ccall f_2598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2601)
+static void C_ccall f_2601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2604)
+static void C_ccall f_2604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2607)
+static void C_ccall f_2607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2610)
+static void C_ccall f_2610(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_ccall f_2616(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_2622)
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2625)
+static void C_ccall f_2625(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_2631)
+static void C_ccall f_2631(C_word c,C_word t0,C_word t1) 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_2637)
+static void C_ccall f_2637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2640)
+static void C_ccall f_2640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2643)
+static void C_ccall f_2643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2646)
+static void C_ccall f_2646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2649)
+static void C_ccall f_2649(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_2655)
+static void C_ccall f_2655(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_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_2664)
+static void C_ccall f_2664(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_2670)
+static void C_ccall f_2670(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2673)
+static void C_ccall f_2673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2676)
+static void C_ccall f_2676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2679)
+static void C_ccall f_2679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2682)
+static void C_ccall f_2682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2685)
+static void C_ccall f_2685(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_2691)
+static void C_ccall f_2691(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2694)
+static void C_ccall f_2694(C_word c,C_word t0,C_word t1) 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_ccall f_2700(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_2709)
+static void C_ccall f_2709(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_2715)
+static void C_ccall f_2715(C_word c,C_word t0,C_word t1) 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_2721)
+static void C_ccall f_2721(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_2727)
+static void C_ccall f_2727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2730)
+static void C_ccall f_2730(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2733)
+static void C_ccall f_2733(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_ccall f_2739(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_2748)
+static void C_ccall f_2748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2751)
+static void C_ccall f_2751(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2754)
+static void C_ccall f_2754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2757)
+static void C_ccall f_2757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2760)
+static void C_ccall f_2760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2763)
+static void C_ccall f_2763(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_2769)
+static void C_ccall f_2769(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2772)
+static void C_ccall f_2772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2775)
+static void C_ccall f_2775(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_2781)
+static void C_ccall f_2781(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2784)
+static void C_ccall f_2784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2787)
+static void C_ccall f_2787(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2790)
+static void C_ccall f_2790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2793)
+static void C_ccall f_2793(C_word c,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_2799)
+static void C_ccall f_2799(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_2805)
+static void C_ccall f_2805(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_2811)
+static void C_ccall f_2811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2814)
+static void C_ccall f_2814(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_2820)
+static void C_ccall f_2820(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_2826)
+static void C_ccall f_2826(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2829)
+static void C_ccall f_2829(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2832)
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2835)
+static void C_ccall f_2835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2838)
+static void C_ccall f_2838(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2841)
+static void C_ccall f_2841(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_2847)
+static void C_ccall f_2847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2850)
+static void C_ccall f_2850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2853)
+static void C_ccall f_2853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2856)
+static void C_ccall f_2856(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2859)
+static void C_ccall f_2859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2862)
+static void C_ccall f_2862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2865)
+static void C_ccall f_2865(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2868)
+static void C_ccall f_2868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2871)
+static void C_ccall f_2871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2874)
+static void C_ccall f_2874(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_2880)
+static void C_ccall f_2880(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2883)
+static void C_ccall f_2883(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2886)
+static void C_ccall f_2886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2889)
+static void C_ccall f_2889(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2892)
+static void C_ccall f_2892(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_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_2907)
+static void C_ccall f_2907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2910)
+static void C_ccall f_2910(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_2916)
+static void C_ccall f_2916(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_2922)
+static void C_ccall f_2922(C_word c,C_word t0,C_word t1) 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_2928)
+static void C_ccall f_2928(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_2934)
+static void C_ccall f_2934(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_2940)
+static void C_ccall f_2940(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2943)
+static void C_ccall f_2943(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2946)
+static void C_ccall f_2946(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_noret;
+C_noret_decl(f_2952)
+static void C_ccall f_2952(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_2958)
+static void C_ccall f_2958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2961)
+static void C_ccall f_2961(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2964)
+static void C_ccall f_2964(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2967)
+static void C_ccall f_2967(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_2982)
+static void C_ccall f_2982(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2985)
+static void C_ccall f_2985(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_2997)
+static void C_ccall f_2997(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_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_3015)
+static void C_ccall f_3015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3018)
+static void C_ccall f_3018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3021)
+static void C_ccall f_3021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3024)
+static void C_ccall f_3024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3027)
+static void C_ccall f_3027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3030)
+static void C_ccall f_3030(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_noret;
+C_noret_decl(f_3036)
+static void C_ccall f_3036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3039)
+static void C_ccall f_3039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3042)
+static void C_ccall f_3042(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_3048)
+static void C_ccall f_3048(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3051)
+static void C_ccall f_3051(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_3057)
+static void C_ccall f_3057(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3060)
+static void C_ccall f_3060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3063)
+static void C_ccall f_3063(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3066)
+static void C_ccall f_3066(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_3081)
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3084)
+static void C_ccall f_3084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3087)
+static void C_ccall f_3087(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_3096)
+static void C_ccall f_3096(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_noret;
+C_noret_decl(f_3102)
+static void C_ccall f_3102(C_word c,C_word t0,C_word t1) 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_4031)
+static void C_ccall f_4031(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_4069)
+static void C_ccall f_4069(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3108)
+static void C_ccall f_3108(C_word c,C_word t0,C_word t1) 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_3114)
+static void C_ccall f_3114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3117)
+static void C_ccall f_3117(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3120)
+static void C_ccall f_3120(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3123)
+static void C_ccall f_3123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3126)
+static void C_ccall f_3126(C_word c,C_word t0,C_word t1) 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_3875)
+static void C_ccall f_3875(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_4007)
+static void C_ccall f_4007(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_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_3901)
+static void C_fcall f_3901(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3135)
+static void C_ccall f_3135(C_word c,C_word t0,C_word t1) 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_3141)
+static void C_ccall f_3141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3144)
+static void C_ccall f_3144(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3147)
+static void C_ccall f_3147(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3150)
+static void C_ccall f_3150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3153)
+static void C_ccall f_3153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3156)
+static void C_ccall f_3156(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_3162)
+static void C_ccall f_3162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3165)
+static void C_ccall f_3165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3168)
+static void C_ccall f_3168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3171)
+static void C_ccall f_3171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3174)
+static void C_ccall f_3174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3177)
+static void C_ccall f_3177(C_word c,C_word t0,C_word t1) 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_3183)
+static void C_ccall f_3183(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_3189)
+static void C_ccall f_3189(C_word c,C_word t0,C_word t1) 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_3195)
+static void C_ccall f_3195(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_3201)
+static void C_ccall f_3201(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_3207)
+static void C_ccall f_3207(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3210)
+static void C_ccall f_3210(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3213)
+static void C_ccall f_3213(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3216)
+static void C_ccall f_3216(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3219)
+static void C_ccall f_3219(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3222)
+static void C_ccall f_3222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3225)
+static void C_ccall f_3225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3228)
+static void C_ccall f_3228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3231)
+static void C_ccall f_3231(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3234)
+static void C_ccall f_3234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3237)
+static void C_ccall f_3237(C_word c,C_word t0,C_word t1) 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_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_3249)
+static void C_ccall f_3249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3252)
+static void C_ccall f_3252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3255)
+static void C_ccall f_3255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3258)
+static void C_ccall f_3258(C_word c,C_word t0,C_word t1) 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_3267)
+static void C_ccall f_3267(C_word c,C_word t0,C_word t1) 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_3273)
+static void C_ccall f_3273(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_3279)
+static void C_ccall f_3279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3282)
+static void C_ccall f_3282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3285)
+static void C_ccall f_3285(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3288)
+static void C_ccall f_3288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3291)
+static void C_ccall f_3291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3294)
+static void C_ccall f_3294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3297)
+static void C_ccall f_3297(C_word c,C_word t0,C_word t1) 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_3303)
+static void C_ccall f_3303(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3306)
+static void C_ccall f_3306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3309)
+static void C_ccall f_3309(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3312)
+static void C_ccall f_3312(C_word c,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_noret;
+C_noret_decl(f_3318)
+static void C_ccall f_3318(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_noret;
+C_noret_decl(f_3324)
+static void C_ccall f_3324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3327)
+static void C_ccall f_3327(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_noret;
+C_noret_decl(f_3333)
+static void C_ccall f_3333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3336)
+static void C_ccall f_3336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3473)
+static void C_ccall f_3473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3476)
+static void C_ccall f_3476(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3479)
+static void C_ccall f_3479(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_3626)
+static void C_ccall f_3626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3629)
+static void C_ccall f_3629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3795)
+static void C_ccall f_3795(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_3825)
+static void C_ccall f_3825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3847)
+static void C_ccall f_3847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3633)
+static void C_ccall f_3633(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3636)
+static void C_ccall f_3636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3639)
+static void C_ccall f_3639(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3713)
+static void C_ccall f_3713(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_3767)
+static void C_ccall f_3767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3742)
+static void C_fcall f_3742(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3739)
+static void C_ccall f_3739(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3642)
+static void C_ccall f_3642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3668)
+static void C_ccall f_3668(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_3645)
+static void C_ccall f_3645(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3648)
+static void C_ccall f_3648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3651)
+static void C_ccall f_3651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3654)
+static void C_ccall f_3654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3657)
+static void C_ccall f_3657(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_3666)
+static void C_ccall f_3666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3484)
+static void C_ccall f_3484(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_3503)
+static void C_ccall f_3503(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3576)
+static void C_ccall f_3576(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3572)
+static void C_ccall f_3572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3568)
+static void C_ccall f_3568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3564)
+static void C_ccall f_3564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3338)
+static void C_ccall f_3338(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_3360)
+static void C_ccall f_3360(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_noret;
+C_noret_decl(f_3424)
+static void C_ccall f_3424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2039)
+static void C_ccall f_2039(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_2073)
+static void C_ccall f_2073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2100)
+static void C_ccall f_2100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2103)
+static void C_ccall f_2103(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_2177)
+static void C_ccall f_2177(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_2148)
+static void C_ccall f_2148(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_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1844)
+static void C_fcall f_1844(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1850)
+static void C_ccall f_1850(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_1862)
+static void C_ccall f_1862(C_word c,C_word t0,C_word t1,C_word t2) 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_1885)
+static void C_fcall f_1885(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1905)
+static void C_ccall f_1905(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1882)
+static void C_ccall f_1882(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_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_1635)
+static void C_ccall f_1635(C_word c,C_word t0,C_word t1) 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_1727)
+static void C_fcall f_1727(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_1724)
+static void C_ccall f_1724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1678)
+static void C_fcall f_1678(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1707)
+static void C_ccall f_1707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1672)
+static void C_ccall f_1672(C_word c,C_word t0,C_word t1) 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_1656)
+static void C_ccall f_1656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1427)
+static void C_ccall f_1427(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_1574)
+static void C_ccall f_1574(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1443)
+static void C_fcall f_1443(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1452)
+static void C_fcall f_1452(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1455)
+static void C_fcall f_1455(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1347)
+static void C_fcall f_1347(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1349)
+static void C_ccall f_1349(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_1415)
+static void C_ccall f_1415(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_4832)
+static void C_fcall trf_4832(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4832(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4832(t0,t1);}
+
+C_noret_decl(trf_4491)
+static void C_fcall trf_4491(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4491(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4491(t0,t1);}
+
+C_noret_decl(trf_4361)
+static void C_fcall trf_4361(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4361(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4361(t0,t1);}
+
+C_noret_decl(trf_4119)
+static void C_fcall trf_4119(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4119(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4119(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4152(t0,t1);}
+
+C_noret_decl(trf_4155)
+static void C_fcall trf_4155(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4155(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4155(t0,t1);}
+
+C_noret_decl(trf_4125)
+static void C_fcall trf_4125(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4125(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4125(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3951(t0,t1);}
+
+C_noret_decl(trf_3901)
+static void C_fcall trf_3901(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3901(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3901(t0,t1);}
+
+C_noret_decl(trf_3742)
+static void C_fcall trf_3742(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3742(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3742(t0,t1);}
+
+C_noret_decl(trf_1844)
+static void C_fcall trf_1844(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1844(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_1844(t0,t1,t2,t3,t4);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1885(t0,t1);}
+
+C_noret_decl(trf_1727)
+static void C_fcall trf_1727(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1727(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1727(t0,t1);}
+
+C_noret_decl(trf_1678)
+static void C_fcall trf_1678(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1678(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1678(t0,t1,t2);}
+
+C_noret_decl(trf_1443)
+static void C_fcall trf_1443(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1443(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1443(t0,t1);}
+
+C_noret_decl(trf_1452)
+static void C_fcall trf_1452(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1452(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1452(t0,t1);}
+
+C_noret_decl(trf_1455)
+static void C_fcall trf_1455(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1455(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1455(t0,t1);}
+
+C_noret_decl(trf_1347)
+static void C_fcall trf_1347(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1347(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_1347(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(13251)){
+C_save(t1);
+C_rereclaim2(13251*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,908);
+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],44,"\010compileroptimizable-rest-argument-operators");
+lf[17]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003car\376\003\000\000\002\376\001\000\000\004cadr\376\003\000\000\002\376\001\000\000\005caddr\376\003\000\000\002\376\001\000\000\006cadddr\376\003\000\000\002\376\001\000\000\006length\376\003\000\000\002\376"
+"\001\000\000\005pair\077\376\003\000\000\002\376\001\000\000\005null\077\376\003\000\000\002\376\001\000\000\010list-ref\376\377\016");
+lf[18]=C_h_intern(&lf[18],34,"\010compilermembership-test-operators");
+lf[19]=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[20]=C_h_intern(&lf[20],32,"\010compilermembership-unfold-limit");
+lf[21]=C_h_intern(&lf[21],28,"\010compilertarget-include-file");
+lf[22]=C_decode_literal(C_heaptop,"\376B\000\000\011chicken.h");
+lf[23]=C_h_intern(&lf[23],31,"\010compilervalid-compiler-options");
+lf[24]=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\005quiet\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\006"
+"unsafe\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\006inline\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-arithmetic\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\013lambda-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\022acc"
+"umulate-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\005"
+"local\376\003\000\000\002\376\001\000\000\015inline-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\012scr"
+"utinize\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-c"
+"hecks\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-synta"
+"x\376\003\000\000\002\376\001\000\000\027no-parentheses-synonyms\376\003\000\000\002\376\001\000\000\020no-symbol-escape\376\003\000\000\002\376\001\000\000\013r5rs-synta"
+"x\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\377\016");
+lf[25]=C_h_intern(&lf[25],45,"\010compilervalid-compiler-options-with-argument");
+lf[26]=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[27]=C_h_intern(&lf[27],34,"\010compilerdefault-standard-bindings");
+lf[28]=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[29]=C_h_intern(&lf[29],34,"\010compilerdefault-extended-bindings");
+lf[30]=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\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-sp"
+"ecific-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->bl"
+"ob/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->bl"
+"ob/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->u16vector/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->f64vector/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\022substr"
+"ing-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\005thi"
+"rd\376\003\000\000\002\376\001\000\000\006fourth\376\003\000\000\002\376\001\000\000\024make-record-instance\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\020"
+"u32vector-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\020f6"
+"4vector-length\376\003\000\000\002\376\001\000\000\006setter\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\015s16vector-ref\376\003\000\000\002\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vect"
+"or-ref\376\003\000\000\002\376\001\000\000\015f32vector-ref\376\003\000\000\002\376\001\000\000\015f64vector-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\016u16v"
+"ector-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-se"
+"t!\376\003\000\000\002\376\001\000\000\014locative-ref\376\003\000\000\002\376\001\000\000\015locative-set!\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\015null-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\006printf\376\003\000\000\002\376\001\000\000\007sprintf\376\003\000\000\002\376\001\000\000\006for"
+"mat\376\377\016");
+lf[31]=C_h_intern(&lf[31],26,"\010compilerinternal-bindings");
+lf[32]=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[33]=C_h_intern(&lf[33],30,"\010compilernon-foldable-bindings");
+lf[34]=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\022\003sysmake-structure\376\003\000\000\002\376\001\000\000\006print*\376\003\000\000\002\376\001\000\000\017\003sy"
+"smake-vector\376\003\000\000\002\376\001\000\000\011\003sysapply\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\003syssetbyte\376\003\000\000\002\376\001\000\000\017u8vector-length\376\003\000\000\002\376\001\000\000\017s8vector-l"
+"ength\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-len"
+"gth\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-lengt"
+"h\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\016f32vect"
+"or-set!\376\003\000\000\002\376\001\000\000\016f64vector-set!\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\015s16vector-ref\376\003\000\000\002\376\001\000\000\015u32vector-ref\376\003\000\000\002\376\001\000\000\015s32vec"
+"tor-ref\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\016u32vector-set!\376\003\000\000\002\376\001\000\000\016s32vector-set!\376\003\000\000\002\376\001\000\000\021\003"
+"sysintern-symbol\376\003\000\000\002\376\001\000\000\017\003sysmake-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[35]=C_h_intern(&lf[35],26,"\010compilerfoldable-bindings");
+lf[36]=C_h_intern(&lf[36],6,"fixnum");
+lf[37]=C_h_intern(&lf[37],11,"number-type");
+lf[38]=C_h_intern(&lf[38],6,"unsafe");
+lf[39]=C_h_intern(&lf[39],4,"node");
+lf[40]=C_h_intern(&lf[40],11,"\004coreinline");
+lf[41]=C_h_intern(&lf[41],9,"\004corecall");
+lf[42]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+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],20,"\004coreinline_allocate");
+lf[45]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[46]=C_h_intern(&lf[46],14,"\010compilerqnode");
+lf[47]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
+lf[48]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[49]=C_h_intern(&lf[49],5,"quote");
+lf[50]=C_h_intern(&lf[50],13,"\004corevariable");
+lf[51]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[52]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\000\376\377\016");
+lf[53]=C_h_intern(&lf[53],5,"cons*");
+lf[54]=C_h_intern(&lf[54],6,"append");
+lf[55]=C_h_intern(&lf[55],7,"butlast");
+lf[56]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[57]=C_h_intern(&lf[57],9,"\004coreproc");
+lf[58]=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[59]=C_h_intern(&lf[59],6,"values");
+lf[60]=C_h_intern(&lf[60],10,"\003sysvalues");
+lf[61]=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[62]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[63]=C_h_intern(&lf[63],7,"\003sysget");
+lf[64]=C_h_intern(&lf[64],18,"\010compilerintrinsic");
+lf[65]=C_h_intern(&lf[65],4,"last");
+lf[66]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[67]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_slot\376\377\016");
+lf[68]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_vector_ref\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_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[71]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[72]=C_h_intern(&lf[72],6,"vector");
+lf[73]=C_h_intern(&lf[73],12,"\010compilerget");
+lf[74]=C_h_intern(&lf[74],14,"rest-parameter");
+lf[75]=C_h_intern(&lf[75],30,"call-with-current-continuation");
+lf[76]=C_h_intern(&lf[76],16,"\010compilerrewrite");
+lf[77]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[78]=C_h_intern(&lf[78],11,"\004corelambda");
+lf[79]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[80]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[81]=C_h_intern(&lf[81],3,"let");
+lf[82]=C_h_intern(&lf[82],16,"\010compilervarnode");
+lf[83]=C_h_intern(&lf[83],6,"gensym");
+lf[84]=C_h_intern(&lf[84],2,"f_");
+lf[85]=C_h_intern(&lf[85],18,"\010compilerdebugging");
+lf[86]=C_h_intern(&lf[86],1,"o");
+lf[87]=C_decode_literal(C_heaptop,"\376B\000\000)removing single-valued `call-with-values\047");
+lf[88]=C_h_intern(&lf[88],1,"r");
+lf[89]=C_h_intern(&lf[89],5,"value");
+lf[90]=C_h_intern(&lf[90],14,"\004coreundefined");
+lf[91]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+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],13,"list-tabulate");
+lf[94]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[95]=C_h_intern(&lf[95],16,"inline-transient");
+lf[96]=C_h_intern(&lf[96],8,"assigned");
+lf[97]=C_h_intern(&lf[97],10,"references");
+lf[98]=C_h_intern(&lf[98],30,"\010compilerdecompose-lambda-list");
+lf[99]=C_h_intern(&lf[99],18,"substring-index-ci");
+lf[100]=C_h_intern(&lf[100],22,"\003syssubstring-index-ci");
+lf[101]=C_h_intern(&lf[101],15,"substring-index");
+lf[102]=C_h_intern(&lf[102],19,"\003syssubstring-index");
+lf[103]=C_h_intern(&lf[103],14,"substring-ci=\077");
+lf[104]=C_h_intern(&lf[104],18,"\003syssubstring-ci=\077");
+lf[105]=C_h_intern(&lf[105],11,"substring=\077");
+lf[106]=C_h_intern(&lf[106],15,"\003syssubstring=\077");
+lf[107]=C_h_intern(&lf[107],11,"read-string");
+lf[108]=C_h_intern(&lf[108],20,"\003sysread-string/port");
+lf[109]=C_h_intern(&lf[109],18,"\003sysstandard-input");
+lf[110]=C_h_intern(&lf[110],10,"write-char");
+lf[111]=C_h_intern(&lf[111],19,"\003syswrite-char/port");
+lf[112]=C_h_intern(&lf[112],19,"\003sysstandard-output");
+lf[113]=C_h_intern(&lf[113],9,"read-char");
+lf[114]=C_h_intern(&lf[114],18,"\003sysread-char/port");
+lf[115]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_bit_setp");
+lf[116]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_bit_setp");
+lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[118]=C_h_intern(&lf[118],8,"bit-set\077");
+lf[119]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[120]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\006C_anyp\376\377\016");
+lf[121]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[122]=C_h_intern(&lf[122],6,"global");
+lf[123]=C_h_intern(&lf[123],4,"any\077");
+lf[124]=C_h_intern(&lf[124],8,"\003sysvoid");
+lf[125]=C_h_intern(&lf[125],19,"\003sysundefined-value");
+lf[126]=C_h_intern(&lf[126],4,"void");
+lf[127]=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[128]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[129]=C_h_intern(&lf[129],10,"\003syssetter");
+lf[130]=C_h_intern(&lf[130],7,"call/cc");
+lf[131]=C_h_intern(&lf[131],20,"thread-specific-set!");
+lf[132]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_setslot");
+lf[133]=C_h_intern(&lf[133],15,"thread-specific");
+lf[134]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[135]=C_h_intern(&lf[135],15,"\003sysmake-vector");
+lf[136]=C_h_intern(&lf[136],11,"make-vector");
+lf[137]=C_h_intern(&lf[137],22,"f64vector->blob/shared");
+lf[138]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[139]=C_h_intern(&lf[139],22,"f32vector->blob/shared");
+lf[140]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[141]=C_h_intern(&lf[141],22,"s32vector->blob/shared");
+lf[142]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[143]=C_h_intern(&lf[143],22,"u32vector->blob/shared");
+lf[144]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[145]=C_h_intern(&lf[145],22,"s16vector->blob/shared");
+lf[146]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[147]=C_h_intern(&lf[147],22,"u16vector->blob/shared");
+lf[148]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[149]=C_h_intern(&lf[149],21,"s8vector->blob/shared");
+lf[150]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[151]=C_h_intern(&lf[151],21,"u8vector->blob/shared");
+lf[152]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[153]=C_h_intern(&lf[153],10,"null-list\077");
+lf[154]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_null_list_p");
+lf[155]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[156]=C_h_intern(&lf[156],5,"atom\077");
+lf[157]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
+lf[158]=C_h_intern(&lf[158],9,"not-pair\077");
+lf[159]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_not_pair_p");
+lf[160]=C_h_intern(&lf[160],16,"f64vector-length");
+lf[161]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_64vector_length");
+lf[162]=C_h_intern(&lf[162],16,"f32vector-length");
+lf[163]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
+lf[164]=C_h_intern(&lf[164],16,"s32vector-length");
+lf[165]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
+lf[166]=C_h_intern(&lf[166],16,"u32vector-length");
+lf[167]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_32vector_length");
+lf[168]=C_h_intern(&lf[168],16,"s16vector-length");
+lf[169]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
+lf[170]=C_h_intern(&lf[170],16,"u16vector-length");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_i_16vector_length");
+lf[172]=C_h_intern(&lf[172],15,"s8vector-length");
+lf[173]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
+lf[174]=C_h_intern(&lf[174],15,"u8vector-length");
+lf[175]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_8vector_length");
+lf[176]=C_h_intern(&lf[176],14,"f64vector-set!");
+lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f64vector_set");
+lf[178]=C_h_intern(&lf[178],14,"f32vector-set!");
+lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_f32vector_set");
+lf[180]=C_h_intern(&lf[180],14,"s32vector-set!");
+lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_set");
+lf[182]=C_h_intern(&lf[182],14,"u32vector-set!");
+lf[183]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_set");
+lf[184]=C_h_intern(&lf[184],14,"s16vector-set!");
+lf[185]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_set");
+lf[186]=C_h_intern(&lf[186],14,"u16vector-set!");
+lf[187]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_set");
+lf[188]=C_h_intern(&lf[188],13,"s8vector-set!");
+lf[189]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_set");
+lf[190]=C_h_intern(&lf[190],13,"u8vector-set!");
+lf[191]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_set");
+lf[192]=C_h_intern(&lf[192],13,"s32vector-ref");
+lf[193]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_s32vector_ref");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s32vector_ref");
+lf[195]=C_h_intern(&lf[195],13,"u32vector-ref");
+lf[196]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_u32vector_ref");
+lf[197]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u32vector_ref");
+lf[198]=C_h_intern(&lf[198],13,"f64vector-ref");
+lf[199]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f64vector_ref");
+lf[200]=C_h_intern(&lf[200],13,"f32vector-ref");
+lf[201]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_f32vector_ref");
+lf[202]=C_h_intern(&lf[202],13,"s16vector-ref");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_s16vector_ref");
+lf[204]=C_h_intern(&lf[204],13,"u16vector-ref");
+lf[205]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_u16vector_ref");
+lf[206]=C_h_intern(&lf[206],12,"s8vector-ref");
+lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_s8vector_ref");
+lf[208]=C_h_intern(&lf[208],12,"u8vector-ref");
+lf[209]=C_decode_literal(C_heaptop,"\376B\000\000\022C_u_i_u8vector_ref");
+lf[210]=C_h_intern(&lf[210],9,"blob-size");
+lf[211]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[212]=C_h_intern(&lf[212],17,"\003sysdirect-return");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\017C_direct_return");
+lf[214]=C_h_intern(&lf[214],37,"\003sysforeign-unsigned-integer-argument");
+lf[215]=C_decode_literal(C_heaptop,"\376B\000\000&C_i_foreign_unsigned_integer_argumentp");
+lf[216]=C_h_intern(&lf[216],28,"\003sysforeign-integer-argument");
+lf[217]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_integer_argumentp");
+lf[218]=C_h_intern(&lf[218],28,"\003sysforeign-pointer-argument");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\035C_i_foreign_pointer_argumentp");
+lf[220]=C_h_intern(&lf[220],27,"\003sysforeign-string-argument");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_string_argumentp");
+lf[222]=C_h_intern(&lf[222],34,"\003sysforeign-number-vector-argument");
+lf[223]=C_decode_literal(C_heaptop,"\376B\000\000#C_i_foreign_number_vector_argumentp");
+lf[224]=C_h_intern(&lf[224],26,"\003sysforeign-block-argument");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\033C_i_foreign_block_argumentp");
+lf[226]=C_h_intern(&lf[226],27,"\003sysforeign-flonum-argument");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_flonum_argumentp");
+lf[228]=C_h_intern(&lf[228],25,"\003sysforeign-char-argument");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\032C_i_foreign_char_argumentp");
+lf[230]=C_h_intern(&lf[230],27,"\003sysforeign-fixnum-argument");
+lf[231]=C_decode_literal(C_heaptop,"\376B\000\000\034C_i_foreign_fixnum_argumentp");
+lf[232]=C_h_intern(&lf[232],13,"locative-set!");
+lf[233]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_locative_set");
+lf[234]=C_h_intern(&lf[234],16,"locative->object");
+lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_locative_to_object");
+lf[236]=C_h_intern(&lf[236],14,"\003sysimmediate\077");
+lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\006C_immp");
+lf[238]=C_h_intern(&lf[238],13,"null-pointer\077");
+lf[239]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_null_pointerp");
+lf[240]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
+lf[241]=C_h_intern(&lf[241],17,"\003sysnull-pointer\077");
+lf[242]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000\017C_null_pointerp");
+lf[244]=C_h_intern(&lf[244],14,"\003syspermanent\077");
+lf[245]=C_decode_literal(C_heaptop,"\376B\000\000\014C_permanentp");
+lf[246]=C_h_intern(&lf[246],27,"\003sysflonum-in-fixnum-range\077");
+lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\032C_flonum_in_fixnum_range_p");
+lf[248]=C_h_intern(&lf[248],25,"\003sysfits-in-unsigned-int\077");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fits_in_unsigned_int_p");
+lf[250]=C_h_intern(&lf[250],16,"\003sysfits-in-int\077");
+lf[251]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fits_in_int_p");
+lf[252]=C_h_intern(&lf[252],9,"\003sysfudge");
+lf[253]=C_decode_literal(C_heaptop,"\376B\000\000\007C_fudge");
+lf[254]=C_h_intern(&lf[254],11,"string-ci=\077");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_string_ci_equal_p");
+lf[256]=C_h_intern(&lf[256],8,"string=\077");
+lf[257]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_string_equal_p");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_i_string_equal_p");
+lf[259]=C_h_intern(&lf[259],18,"\003sysdouble->number");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\000\022C_double_to_number");
+lf[261]=C_h_intern(&lf[261],15,"\003syspoke-double");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\015C_poke_double");
+lf[263]=C_h_intern(&lf[263],16,"\003syspoke-integer");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\016C_poke_integer");
+lf[265]=C_h_intern(&lf[265],12,"\003syssetislot");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_set_i_slot");
+lf[267]=C_h_intern(&lf[267],15,"pointer->object");
+lf[268]=C_decode_literal(C_heaptop,"\376B\000\000\023C_pointer_to_object");
+lf[269]=C_h_intern(&lf[269],13,"\003syspeek-byte");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\013C_peek_byte");
+lf[271]=C_h_intern(&lf[271],15,"\003syspeek-fixnum");
+lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\015C_peek_fixnum");
+lf[273]=C_h_intern(&lf[273],11,"\003syssetbyte");
+lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\011C_setbyte");
+lf[275]=C_h_intern(&lf[275],8,"\003sysbyte");
+lf[276]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subbyte");
+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,"\376\003\000\000\002\376B\000\000\033C_i_fixnum_arithmetic_shift\376\377\016");
+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,"\376B\000\000\026C_a_i_arithmetic_shift");
+lf[281]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[282]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[283]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_shift_left\376\377\016");
+lf[284]=C_h_intern(&lf[284],20,"\010compilerbig-fixnum\077");
+lf[285]=C_h_intern(&lf[285],16,"arithmetic-shift");
+lf[286]=C_h_intern(&lf[286],5,"fxior");
+lf[287]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
+lf[288]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
+lf[289]=C_h_intern(&lf[289],5,"fxand");
+lf[290]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
+lf[292]=C_h_intern(&lf[292],5,"fxxor");
+lf[293]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[294]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[295]=C_h_intern(&lf[295],5,"fxneg");
+lf[296]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_negate");
+lf[297]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_fixnum_negate");
+lf[298]=C_h_intern(&lf[298],5,"fxshr");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000\024C_fixnum_shift_right");
+lf[300]=C_h_intern(&lf[300],5,"fxshl");
+lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_shift_left");
+lf[302]=C_h_intern(&lf[302],3,"fx-");
+lf[303]=C_decode_literal(C_heaptop,"\376B\000\000\023C_fixnum_difference");
+lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\025C_u_fixnum_difference");
+lf[305]=C_h_intern(&lf[305],3,"fx+");
+lf[306]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
+lf[307]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
+lf[308]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_i_set_i_slot\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_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
+lf[311]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[312]=C_h_intern(&lf[312],19,"\010compilerimmediate\077");
+lf[313]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\013C_i_setslot\376\377\016");
+lf[314]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[315]=C_h_intern(&lf[315],11,"\003syssetslot");
+lf[316]=C_h_intern(&lf[316],6,"string");
+lf[317]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_string");
+lf[318]=C_h_intern(&lf[318],18,"\003sysmake-structure");
+lf[319]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_record");
+lf[320]=C_h_intern(&lf[320],10,"\003sysvector");
+lf[321]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+lf[322]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_vector");
+lf[323]=C_h_intern(&lf[323],8,"\003syslist");
+lf[324]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
+lf[325]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
+lf[326]=C_h_intern(&lf[326],4,"list");
+lf[327]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
+lf[328]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\003\376\377\016");
+lf[329]=C_h_intern(&lf[329],8,"\003syscons");
+lf[330]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
+lf[331]=C_h_intern(&lf[331],4,"cons");
+lf[332]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_cons");
+lf[333]=C_h_intern(&lf[333],6,"fpsqrt");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_sqrt");
+lf[335]=C_h_intern(&lf[335],5,"fplog");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_log");
+lf[337]=C_h_intern(&lf[337],6,"fpexpt");
+lf[338]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_expt");
+lf[339]=C_h_intern(&lf[339],5,"fpexp");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_exp");
+lf[341]=C_h_intern(&lf[341],7,"fpatan2");
+lf[342]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_atan2");
+lf[343]=C_h_intern(&lf[343],6,"fpatan");
+lf[344]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_atan");
+lf[345]=C_h_intern(&lf[345],6,"fpacos");
+lf[346]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_acos");
+lf[347]=C_h_intern(&lf[347],6,"fpasin");
+lf[348]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_asin");
+lf[349]=C_h_intern(&lf[349],5,"fptan");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_tan");
+lf[351]=C_h_intern(&lf[351],5,"fpcos");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_cos");
+lf[353]=C_h_intern(&lf[353],5,"fpsin");
+lf[354]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_flonum_sin");
+lf[355]=C_h_intern(&lf[355],5,"round");
+lf[356]=C_h_intern(&lf[356],6,"flonum");
+lf[357]=C_h_intern(&lf[357],7,"fpround");
+lf[358]=C_h_intern(&lf[358],8,"truncate");
+lf[359]=C_h_intern(&lf[359],10,"fptruncate");
+lf[360]=C_h_intern(&lf[360],7,"ceiling");
+lf[361]=C_h_intern(&lf[361],9,"fpceiling");
+lf[362]=C_h_intern(&lf[362],5,"floor");
+lf[363]=C_h_intern(&lf[363],7,"fpfloor");
+lf[364]=C_h_intern(&lf[364],4,"odd\077");
+lf[365]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_oddp");
+lf[366]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_oddp");
+lf[367]=C_h_intern(&lf[367],5,"even\077");
+lf[368]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_evenp");
+lf[369]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_evenp");
+lf[370]=C_h_intern(&lf[370],9,"remainder");
+lf[371]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[372]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
+lf[374]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnumoddp");
+lf[375]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
+lf[376]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_fixnumevenp");
+lf[377]=C_h_intern(&lf[377],15,"\003sysmake-symbol");
+lf[378]=C_decode_literal(C_heaptop,"\376B\000\000\015C_make_symbol");
+lf[379]=C_h_intern(&lf[379],17,"\003sysintern-symbol");
+lf[380]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_symbol");
+lf[381]=C_h_intern(&lf[381],18,"\003syscontext-switch");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\020C_context_switch");
+lf[383]=C_h_intern(&lf[383],14,"return-to-host");
+lf[384]=C_decode_literal(C_heaptop,"\376B\000\000\020C_return_to_host");
+lf[385]=C_h_intern(&lf[385],23,"\003sysensure-heap-reserve");
+lf[386]=C_decode_literal(C_heaptop,"\376B\000\000\025C_ensure_heap_reserve");
+lf[387]=C_h_intern(&lf[387],19,"\003sysallocate-vector");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\021C_allocate_vector");
+lf[389]=C_h_intern(&lf[389],34,"\003syscall-with-current-continuation");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\011C_call_cc");
+lf[391]=C_h_intern(&lf[391],14,"number->string");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\022C_number_to_string");
+lf[393]=C_h_intern(&lf[393],14,"string->number");
+lf[394]=C_decode_literal(C_heaptop,"\376B\000\000\022C_string_to_number");
+lf[395]=C_h_intern(&lf[395],14,"exact->inexact");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\022C_exact_to_inexact");
+lf[397]=C_h_intern(&lf[397],2,"<=");
+lf[398]=C_decode_literal(C_heaptop,"\376B\000\000\021C_less_or_equal_p");
+lf[399]=C_h_intern(&lf[399],2,">=");
+lf[400]=C_decode_literal(C_heaptop,"\376B\000\000\024C_greater_or_equal_p");
+lf[401]=C_h_intern(&lf[401],1,"<");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\007C_lessp");
+lf[403]=C_h_intern(&lf[403],1,">");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\012C_greaterp");
+lf[405]=C_h_intern(&lf[405],1,"=");
+lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\011C_nequalp");
+lf[407]=C_h_intern(&lf[407],1,"/");
+lf[408]=C_decode_literal(C_heaptop,"\376B\000\000\010C_divide");
+lf[409]=C_h_intern(&lf[409],1,"+");
+lf[410]=C_decode_literal(C_heaptop,"\376B\000\000\006C_plus");
+lf[411]=C_h_intern(&lf[411],1,"-");
+lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\007C_minus");
+lf[413]=C_h_intern(&lf[413],1,"*");
+lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\007C_times");
+lf[415]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_less_or_equalp");
+lf[416]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_greater_or_equalp");
+lf[417]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_lessp");
+lf[418]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_greaterp");
+lf[419]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_nequalp");
+lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\014C_a_i_divide");
+lf[421]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
+lf[422]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
+lf[423]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_times");
+lf[424]=C_h_intern(&lf[424],4,"argv");
+lf[425]=C_decode_literal(C_heaptop,"\376B\000\000\012C_get_argv");
+lf[426]=C_h_intern(&lf[426],3,"lcm");
+lf[427]=C_h_intern(&lf[427],3,"gcd");
+lf[428]=C_h_intern(&lf[428],8,"identity");
+lf[429]=C_h_intern(&lf[429],7,"\003syslcm");
+lf[430]=C_h_intern(&lf[430],7,"\003sysgcd");
+lf[431]=C_h_intern(&lf[431],5,"\003sys=");
+lf[432]=C_h_intern(&lf[432],6,"\003sys>=");
+lf[433]=C_h_intern(&lf[433],16,"\003syslist->vector");
+lf[434]=C_h_intern(&lf[434],12,"list->vector");
+lf[435]=C_h_intern(&lf[435],16,"\003sysvector->list");
+lf[436]=C_h_intern(&lf[436],12,"vector->list");
+lf[437]=C_h_intern(&lf[437],11,"vector-set!");
+lf[438]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_set");
+lf[439]=C_h_intern(&lf[439],12,"list->string");
+lf[440]=C_h_intern(&lf[440],16,"\003syslist->string");
+lf[441]=C_h_intern(&lf[441],12,"string->list");
+lf[442]=C_h_intern(&lf[442],16,"\003sysstring->list");
+lf[443]=C_h_intern(&lf[443],13,"string-append");
+lf[444]=C_h_intern(&lf[444],17,"\003sysstring-append");
+lf[445]=C_h_intern(&lf[445],9,"substring");
+lf[446]=C_h_intern(&lf[446],13,"\003syssubstring");
+lf[447]=C_h_intern(&lf[447],20,"make-record-instance");
+lf[448]=C_h_intern(&lf[448],14,"\003sysblock-set!");
+lf[449]=C_h_intern(&lf[449],10,"block-set!");
+lf[450]=C_h_intern(&lf[450],3,"map");
+lf[451]=C_h_intern(&lf[451],7,"\003sysmap");
+lf[452]=C_h_intern(&lf[452],8,"for-each");
+lf[453]=C_h_intern(&lf[453],12,"\003sysfor-each");
+lf[454]=C_h_intern(&lf[454],6,"setter");
+lf[455]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[456]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
+lf[457]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[458]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
+lf[459]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[461]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[463]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[464]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_equalp");
+lf[465]=C_h_intern(&lf[465],14,"\003syscheck-char");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_char_2");
+lf[467]=C_h_intern(&lf[467],19,"\003syscheck-structure");
+lf[468]=C_decode_literal(C_heaptop,"\376B\000\000\025C_i_check_structure_2");
+lf[469]=C_h_intern(&lf[469],16,"\003syscheck-vector");
+lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_vector_2");
+lf[471]=C_h_intern(&lf[471],21,"\003syscheck-byte-vector");
+lf[472]=C_decode_literal(C_heaptop,"\376B\000\000\026C_i_check_bytevector_2");
+lf[473]=C_h_intern(&lf[473],16,"\003syscheck-string");
+lf[474]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_string_2");
+lf[475]=C_h_intern(&lf[475],16,"\003syscheck-symbol");
+lf[476]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_symbol_2");
+lf[477]=C_h_intern(&lf[477],14,"\003syscheck-pair");
+lf[478]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_pair_2");
+lf[479]=C_h_intern(&lf[479],14,"\003syscheck-list");
+lf[480]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_list_2");
+lf[481]=C_h_intern(&lf[481],16,"\003syscheck-number");
+lf[482]=C_decode_literal(C_heaptop,"\376B\000\000\022C_i_check_number_2");
+lf[483]=C_h_intern(&lf[483],15,"\003syscheck-exact");
+lf[484]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_check_exact_2");
+lf[485]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_char");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\023C_i_check_structure");
+lf[487]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_vector");
+lf[488]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_check_bytevector");
+lf[489]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_string");
+lf[490]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_symbol");
+lf[491]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_pair");
+lf[492]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_check_list");
+lf[493]=C_decode_literal(C_heaptop,"\376B\000\000\020C_i_check_number");
+lf[494]=C_decode_literal(C_heaptop,"\376B\000\000\017C_i_check_exact");
+lf[495]=C_h_intern(&lf[495],14,"inexact->exact");
+lf[496]=C_decode_literal(C_heaptop,"\376B\000\000\024C_i_inexact_to_exact");
+lf[497]=C_h_intern(&lf[497],13,"string-length");
+lf[498]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_string_length");
+lf[499]=C_h_intern(&lf[499],17,"\003sysvector-length");
+lf[500]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
+lf[501]=C_h_intern(&lf[501],13,"vector-length");
+lf[502]=C_decode_literal(C_heaptop,"\376B\000\000\021C_i_vector_length");
+lf[503]=C_h_intern(&lf[503],13,"integer->char");
+lf[504]=C_decode_literal(C_heaptop,"\376B\000\000\020C_make_character");
+lf[505]=C_decode_literal(C_heaptop,"\376B\000\000\007C_unfix");
+lf[506]=C_h_intern(&lf[506],13,"char->integer");
+lf[507]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[508]=C_decode_literal(C_heaptop,"\376B\000\000\020C_character_code");
+lf[509]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[510]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
+lf[511]=C_decode_literal(C_heaptop,"\376B\000\000\005C_fix");
+lf[512]=C_decode_literal(C_heaptop,"\376B\000\000\015C_header_size");
+lf[513]=C_h_intern(&lf[513],9,"negative\077");
+lf[514]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_negativep");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_negativep");
+lf[516]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[517]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[518]=C_h_intern(&lf[518],9,"positive\077");
+lf[519]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_i_positivep");
+lf[520]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_positivep");
+lf[521]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[522]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[523]=C_h_intern(&lf[523],5,"zero\077");
+lf[524]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_zerop");
+lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_zerop");
+lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[527]=C_h_intern(&lf[527],4,"atan");
+lf[528]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_atan2");
+lf[529]=C_h_intern(&lf[529],4,"sqrt");
+lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_sqrt");
+lf[531]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_atan");
+lf[532]=C_h_intern(&lf[532],4,"acos");
+lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_acos");
+lf[534]=C_h_intern(&lf[534],4,"asin");
+lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_asin");
+lf[536]=C_h_intern(&lf[536],3,"log");
+lf[537]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_log");
+lf[538]=C_h_intern(&lf[538],3,"tan");
+lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_tan");
+lf[540]=C_h_intern(&lf[540],3,"cos");
+lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_cos");
+lf[542]=C_h_intern(&lf[542],3,"sin");
+lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_sin");
+lf[544]=C_h_intern(&lf[544],3,"exp");
+lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_exp");
+lf[546]=C_h_intern(&lf[546],5,"fpneg");
+lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\023C_a_i_flonum_negate");
+lf[548]=C_h_intern(&lf[548],3,"fp/");
+lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\025C_a_i_flonum_quotient");
+lf[550]=C_h_intern(&lf[550],3,"fp*");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\000\022C_a_i_flonum_times");
+lf[552]=C_h_intern(&lf[552],3,"fp-");
+lf[553]=C_decode_literal(C_heaptop,"\376B\000\000\027C_a_i_flonum_difference");
+lf[554]=C_h_intern(&lf[554],3,"fp+");
+lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_flonum_plus");
+lf[556]=C_h_intern(&lf[556],11,"bitwise-not");
+lf[557]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_not");
+lf[558]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
+lf[559]=C_h_intern(&lf[559],11,"bitwise-ior");
+lf[560]=C_decode_literal(C_heaptop,"\376B\000\000\013C_fixnum_or");
+lf[561]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_fixnum_or");
+lf[562]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_ior");
+lf[563]=C_h_intern(&lf[563],11,"bitwise-and");
+lf[564]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_and");
+lf[565]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_fixnum_and");
+lf[566]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_and");
+lf[567]=C_h_intern(&lf[567],11,"bitwise-xor");
+lf[568]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[569]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_xor");
+lf[570]=C_decode_literal(C_heaptop,"\376B\000\000\021C_a_i_bitwise_xor");
+lf[571]=C_h_intern(&lf[571],3,"abs");
+lf[572]=C_decode_literal(C_heaptop,"\376B\000\000\011C_a_i_abs");
+lf[573]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
+lf[574]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_abs");
+lf[575]=C_h_intern(&lf[575],8,"set-cdr!");
+lf[576]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_cdr");
+lf[577]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_cdr");
+lf[578]=C_h_intern(&lf[578],8,"set-car!");
+lf[579]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_set_car");
+lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\015C_u_i_set_car");
+lf[581]=C_h_intern(&lf[581],6,"member");
+lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_member");
+lf[583]=C_h_intern(&lf[583],5,"assoc");
+lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_assoc");
+lf[585]=C_h_intern(&lf[585],4,"memq");
+lf[586]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
+lf[587]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
+lf[588]=C_h_intern(&lf[588],4,"assq");
+lf[589]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assq");
+lf[590]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_assq");
+lf[591]=C_h_intern(&lf[591],4,"memv");
+lf[592]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memv");
+lf[593]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_memq");
+lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_memq");
+lf[595]=C_h_intern(&lf[595],4,"assv");
+lf[596]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_assv");
+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],15,"number-of-slots");
+lf[600]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[601]=C_h_intern(&lf[601],9,"block-ref");
+lf[602]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[603]=C_h_intern(&lf[603],15,"\003sysbytevector\077");
+lf[604]=C_decode_literal(C_heaptop,"\376B\000\000\015C_bytevectorp");
+lf[605]=C_h_intern(&lf[605],14,"\003sysstructure\077");
+lf[606]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_structurep");
+lf[607]=C_h_intern(&lf[607],9,"list-tail");
+lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_list_tail");
+lf[609]=C_h_intern(&lf[609],13,"char-downcase");
+lf[610]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_downcase");
+lf[611]=C_h_intern(&lf[611],11,"char-upcase");
+lf[612]=C_decode_literal(C_heaptop,"\376B\000\000\021C_u_i_char_upcase");
+lf[613]=C_h_intern(&lf[613],16,"char-lower-case\077");
+lf[614]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_lower_casep");
+lf[615]=C_h_intern(&lf[615],16,"char-upper-case\077");
+lf[616]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_upper_casep");
+lf[617]=C_h_intern(&lf[617],16,"char-whitespace\077");
+lf[618]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_whitespacep");
+lf[619]=C_h_intern(&lf[619],16,"char-alphabetic\077");
+lf[620]=C_decode_literal(C_heaptop,"\376B\000\000\026C_u_i_char_alphabeticp");
+lf[621]=C_h_intern(&lf[621],13,"char-numeric\077");
+lf[622]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_i_char_numericp");
+lf[623]=C_h_intern(&lf[623],5,"fpmin");
+lf[624]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_min");
+lf[625]=C_h_intern(&lf[625],5,"fpmax");
+lf[626]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_flonum_max");
+lf[627]=C_h_intern(&lf[627],5,"fxmin");
+lf[628]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_min");
+lf[629]=C_h_intern(&lf[629],5,"fxmax");
+lf[630]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_fixnum_max");
+lf[631]=C_h_intern(&lf[631],4,"fp<=");
+lf[632]=C_decode_literal(C_heaptop,"\376B\000\000\030C_flonum_less_or_equal_p");
+lf[633]=C_h_intern(&lf[633],4,"fp>=");
+lf[634]=C_decode_literal(C_heaptop,"\376B\000\000\033C_flonum_greater_or_equal_p");
+lf[635]=C_h_intern(&lf[635],3,"fp<");
+lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\016C_flonum_lessp");
+lf[637]=C_h_intern(&lf[637],3,"fp>");
+lf[638]=C_decode_literal(C_heaptop,"\376B\000\000\021C_flonum_greaterp");
+lf[639]=C_h_intern(&lf[639],3,"fp=");
+lf[640]=C_decode_literal(C_heaptop,"\376B\000\000\017C_flonum_equalp");
+lf[641]=C_h_intern(&lf[641],4,"fx<=");
+lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[643]=C_h_intern(&lf[643],4,"fx>=");
+lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[645]=C_h_intern(&lf[645],3,"fx<");
+lf[646]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[647]=C_h_intern(&lf[647],3,"fx>");
+lf[648]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[649]=C_h_intern(&lf[649],3,"fx=");
+lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[651]=C_h_intern(&lf[651],5,"fxmod");
+lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_modulo");
+lf[653]=C_h_intern(&lf[653],3,"fx/");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\000\017C_fixnum_divide");
+lf[655]=C_h_intern(&lf[655],3,"fx*");
+lf[656]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_times");
+lf[657]=C_h_intern(&lf[657],5,"fxnot");
+lf[658]=C_decode_literal(C_heaptop,"\376B\000\000\014C_fixnum_not");
+lf[659]=C_h_intern(&lf[659],8,"\003syssize");
+lf[660]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[661]=C_h_intern(&lf[661],13,"\003sysblock-ref");
+lf[662]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_block_ref");
+lf[663]=C_h_intern(&lf[663],8,"\003sysslot");
+lf[664]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[665]=C_h_intern(&lf[665],7,"char<=\077");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\030C_fixnum_less_or_equal_p");
+lf[667]=C_h_intern(&lf[667],7,"char>=\077");
+lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\033C_fixnum_greater_or_equal_p");
+lf[669]=C_h_intern(&lf[669],6,"char<\077");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000\016C_fixnum_lessp");
+lf[671]=C_h_intern(&lf[671],6,"char>\077");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_greaterp");
+lf[673]=C_h_intern(&lf[673],6,"char=\077");
+lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[675]=C_h_intern(&lf[675],10,"vector-ref");
+lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_ref");
+lf[677]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[678]=C_h_intern(&lf[678],11,"string-set!");
+lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_set");
+lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\014C_setsubchar");
+lf[681]=C_h_intern(&lf[681],10,"string-ref");
+lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_string_ref");
+lf[683]=C_decode_literal(C_heaptop,"\376B\000\000\011C_subchar");
+lf[684]=C_h_intern(&lf[684],11,"eof-object\077");
+lf[685]=C_decode_literal(C_heaptop,"\376B\000\000\006C_eofp");
+lf[686]=C_h_intern(&lf[686],12,"proper-list\077");
+lf[687]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
+lf[688]=C_h_intern(&lf[688],5,"list\077");
+lf[689]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_listp");
+lf[690]=C_h_intern(&lf[690],8,"inexact\077");
+lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_inexactp");
+lf[692]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_inexactp");
+lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\012C_nfixnump");
+lf[694]=C_h_intern(&lf[694],6,"exact\077");
+lf[695]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_exactp");
+lf[696]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_exactp");
+lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
+lf[698]=C_h_intern(&lf[698],22,"\003sysgeneric-structure\077");
+lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\014C_structurep");
+lf[700]=C_h_intern(&lf[700],12,"\003syspointer\077");
+lf[701]=C_decode_literal(C_heaptop,"\376B\000\000\015C_anypointerp");
+lf[702]=C_h_intern(&lf[702],7,"finite\077");
+lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_finitep");
+lf[704]=C_h_intern(&lf[704],7,"fixnum\077");
+lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\011C_fixnump");
+lf[706]=C_h_intern(&lf[706],7,"flonum\077");
+lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_flonump");
+lf[708]=C_h_intern(&lf[708],8,"integer\077");
+lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_integerp");
+lf[710]=C_h_intern(&lf[710],5,"real\077");
+lf[711]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[712]=C_h_intern(&lf[712],9,"rational\077");
+lf[713]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_rationalp");
+lf[714]=C_h_intern(&lf[714],8,"complex\077");
+lf[715]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[716]=C_h_intern(&lf[716],7,"number\077");
+lf[717]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_numberp");
+lf[718]=C_h_intern(&lf[718],8,"boolean\077");
+lf[719]=C_decode_literal(C_heaptop,"\376B\000\000\012C_booleanp");
+lf[720]=C_h_intern(&lf[720],5,"port\077");
+lf[721]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_portp");
+lf[722]=C_h_intern(&lf[722],10,"procedure\077");
+lf[723]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_closurep");
+lf[724]=C_h_intern(&lf[724],9,"\003syspair\077");
+lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
+lf[726]=C_decode_literal(C_heaptop,"\376B\000\000\014C_notvemptyp");
+lf[727]=C_h_intern(&lf[727],5,"pair\077");
+lf[728]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_pairp");
+lf[729]=C_decode_literal(C_heaptop,"\376B\000\000\014C_notvemptyp");
+lf[730]=C_h_intern(&lf[730],11,"\003sysvector\077");
+lf[731]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
+lf[732]=C_h_intern(&lf[732],7,"vector\077");
+lf[733]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_vectorp");
+lf[734]=C_h_intern(&lf[734],7,"symbol\077");
+lf[735]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_symbolp");
+lf[736]=C_h_intern(&lf[736],9,"locative\077");
+lf[737]=C_decode_literal(C_heaptop,"\376B\000\000\015C_i_locativep");
+lf[738]=C_h_intern(&lf[738],7,"string\077");
+lf[739]=C_decode_literal(C_heaptop,"\376B\000\000\013C_i_stringp");
+lf[740]=C_h_intern(&lf[740],5,"char\077");
+lf[741]=C_decode_literal(C_heaptop,"\376B\000\000\007C_charp");
+lf[742]=C_h_intern(&lf[742],3,"not");
+lf[743]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_not");
+lf[744]=C_h_intern(&lf[744],6,"length");
+lf[745]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_length");
+lf[746]=C_decode_literal(C_heaptop,"\376B\000\000\014C_block_size");
+lf[747]=C_h_intern(&lf[747],9,"\003sysnull\077");
+lf[748]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[749]=C_decode_literal(C_heaptop,"\376B\000\000\011C_vemptyp");
+lf[750]=C_h_intern(&lf[750],5,"null\077");
+lf[751]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_nullp");
+lf[752]=C_decode_literal(C_heaptop,"\376B\000\000\011C_vemptyp");
+lf[753]=C_h_intern(&lf[753],8,"list-ref");
+lf[754]=C_decode_literal(C_heaptop,"\376B\000\000\014C_i_list_ref");
+lf[755]=C_decode_literal(C_heaptop,"\376B\000\000\016C_i_vector_ref");
+lf[756]=C_decode_literal(C_heaptop,"\376B\000\000\016C_u_i_list_ref");
+lf[757]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[758]=C_h_intern(&lf[758],8,"\003syseqv\077");
+lf[759]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
+lf[760]=C_h_intern(&lf[760],4,"eqv\077");
+lf[761]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_eqvp");
+lf[762]=C_h_intern(&lf[762],7,"\003syseq\077");
+lf[763]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[764]=C_h_intern(&lf[764],3,"eq\077");
+lf[765]=C_decode_literal(C_heaptop,"\376B\000\000\005C_eqp");
+lf[766]=C_h_intern(&lf[766],3,"cdr");
+lf[767]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
+lf[768]=C_decode_literal(C_heaptop,"\376B\000\000\006C_slot");
+lf[769]=C_h_intern(&lf[769],6,"cddddr");
+lf[770]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cddddr");
+lf[771]=C_h_intern(&lf[771],5,"cdddr");
+lf[772]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_cdddr");
+lf[773]=C_h_intern(&lf[773],4,"cddr");
+lf[774]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cddr");
+lf[775]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddddr");
+lf[776]=C_h_intern(&lf[776],6,"cdddar");
+lf[777]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdddar");
+lf[778]=C_h_intern(&lf[778],6,"cddadr");
+lf[779]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddadr");
+lf[780]=C_h_intern(&lf[780],6,"cddaar");
+lf[781]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cddaar");
+lf[782]=C_h_intern(&lf[782],6,"cdaddr");
+lf[783]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaddr");
+lf[784]=C_h_intern(&lf[784],6,"cdadar");
+lf[785]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdadar");
+lf[786]=C_h_intern(&lf[786],6,"cdaadr");
+lf[787]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaadr");
+lf[788]=C_h_intern(&lf[788],6,"cdaaar");
+lf[789]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cdaaar");
+lf[790]=C_h_intern(&lf[790],6,"cadddr");
+lf[791]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[792]=C_h_intern(&lf[792],6,"caddar");
+lf[793]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caddar");
+lf[794]=C_h_intern(&lf[794],6,"cadadr");
+lf[795]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadadr");
+lf[796]=C_h_intern(&lf[796],6,"cadaar");
+lf[797]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadaar");
+lf[798]=C_h_intern(&lf[798],6,"caaddr");
+lf[799]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaddr");
+lf[800]=C_h_intern(&lf[800],6,"caadar");
+lf[801]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caadar");
+lf[802]=C_h_intern(&lf[802],6,"caaaar");
+lf[803]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_caaaar");
+lf[804]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdddr");
+lf[805]=C_h_intern(&lf[805],5,"cddar");
+lf[806]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cddar");
+lf[807]=C_h_intern(&lf[807],5,"cdadr");
+lf[808]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdadr");
+lf[809]=C_h_intern(&lf[809],5,"cdaar");
+lf[810]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cdaar");
+lf[811]=C_h_intern(&lf[811],5,"caddr");
+lf[812]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[813]=C_h_intern(&lf[813],5,"cadar");
+lf[814]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_cadar");
+lf[815]=C_h_intern(&lf[815],5,"caaar");
+lf[816]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caaar");
+lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cddr");
+lf[818]=C_h_intern(&lf[818],4,"cdar");
+lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cdar");
+lf[820]=C_h_intern(&lf[820],4,"caar");
+lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_caar");
+lf[822]=C_h_intern(&lf[822],22,"\003syscontinuation-graft");
+lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\024C_continuation_graft");
+lf[824]=C_h_intern(&lf[824],12,"locative-ref");
+lf[825]=C_decode_literal(C_heaptop,"\376B\000\000\016C_locative_ref");
+lf[826]=C_h_intern(&lf[826],8,"cpu-time");
+lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\012C_cpu_time");
+lf[828]=C_h_intern(&lf[828],20,"\003syscall-with-values");
+lf[829]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
+lf[830]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
+lf[831]=C_h_intern(&lf[831],16,"call-with-values");
+lf[832]=C_decode_literal(C_heaptop,"\376B\000\000\022C_call_with_values");
+lf[833]=C_decode_literal(C_heaptop,"\376B\000\000\024C_u_call_with_values");
+lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
+lf[835]=C_decode_literal(C_heaptop,"\376B\000\000\010C_values");
+lf[836]=C_h_intern(&lf[836],6,"fourth");
+lf[837]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
+lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[839]=C_h_intern(&lf[839],5,"third");
+lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
+lf[841]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[842]=C_h_intern(&lf[842],6,"second");
+lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
+lf[844]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
+lf[845]=C_h_intern(&lf[845],5,"first");
+lf[846]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[847]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[848]=C_decode_literal(C_heaptop,"\376B\000\000\012C_i_cadddr");
+lf[849]=C_decode_literal(C_heaptop,"\376B\000\000\014C_u_i_cadddr");
+lf[850]=C_decode_literal(C_heaptop,"\376B\000\000\011C_i_caddr");
+lf[851]=C_decode_literal(C_heaptop,"\376B\000\000\013C_u_i_caddr");
+lf[852]=C_h_intern(&lf[852],4,"cadr");
+lf[853]=C_decode_literal(C_heaptop,"\376B\000\000\010C_i_cadr");
+lf[854]=C_decode_literal(C_heaptop,"\376B\000\000\012C_u_i_cadr");
+lf[855]=C_h_intern(&lf[855],7,"\003syscdr");
+lf[856]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_cdr");
+lf[857]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_cdr");
+lf[858]=C_h_intern(&lf[858],7,"\003syscar");
+lf[859]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[860]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[861]=C_h_intern(&lf[861],3,"car");
+lf[862]=C_decode_literal(C_heaptop,"\376B\000\000\007C_i_car");
+lf[863]=C_decode_literal(C_heaptop,"\376B\000\000\011C_u_i_car");
+lf[864]=C_h_intern(&lf[864],9,"\003sysapply");
+lf[865]=C_h_intern(&lf[865],5,"apply");
+lf[866]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012C_i_equalp\376\377\016");
+lf[867]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[868]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\005C_eqp\376\377\016");
+lf[869]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[870]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[871]=C_h_intern(&lf[871],6,"equal\077");
+lf[872]=C_h_intern(&lf[872],4,"sub1");
+lf[873]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_decrease");
+lf[874]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_decrease");
+lf[875]=C_decode_literal(C_heaptop,"\376B\000\000\013C_a_i_minus");
+lf[876]=C_h_intern(&lf[876],4,"add1");
+lf[877]=C_decode_literal(C_heaptop,"\376B\000\000\021C_fixnum_increase");
+lf[878]=C_decode_literal(C_heaptop,"\376B\000\000\023C_u_fixnum_increase");
+lf[879]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_plus");
+lf[880]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[881]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[882]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
+lf[883]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[884]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[885]=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[886]=C_h_intern(&lf[886],8,"quotient");
+lf[887]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[888]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\024C_fixnum_shift_right\376\377\016");
+lf[889]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_divide\376\377\016");
+lf[890]=C_h_intern(&lf[890],19,"\010compilerfold-inner");
+lf[891]=C_h_intern(&lf[891],6,"remove");
+lf[892]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\021C_u_fixnum_negate\376\377\016");
+lf[893]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[894]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\017C_fixnum_negate\376\377\016");
+lf[895]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[896]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[897]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\025C_u_fixnum_difference\376\377\016");
+lf[898]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\023C_fixnum_difference\376\377\016");
+lf[899]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\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\023C_fixnum_shift_left\376\377\016");
+lf[903]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\016C_fixnum_times\376\377\016");
+lf[904]=C_decode_literal(C_heaptop,"\376B\000\000\015C_fixnum_plus");
+lf[905]=C_decode_literal(C_heaptop,"\376B\000\000\017C_u_fixnum_plus");
+lf[906]=C_h_intern(&lf[906],15,"lset-difference");
+lf[907]=C_h_intern(&lf[907],10,"lset-union");
+C_register_lf2(lf,908,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1303,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k1301 */
+static void C_ccall f_1303(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1306,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k1304 in k1301 */
+static void C_ccall f_1306(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1306,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! optimizable-rest-argument-operators ...) */,lf[17]);
+t13=C_mutate((C_word*)lf[18]+1 /* (set! membership-test-operators ...) */,lf[19]);
+t14=C_set_block_item(lf[20] /* membership-unfold-limit */,0,C_fix(20));
+t15=C_mutate((C_word*)lf[21]+1 /* (set! target-include-file ...) */,lf[22]);
+t16=C_mutate((C_word*)lf[23]+1 /* (set! valid-compiler-options ...) */,lf[24]);
+t17=C_mutate((C_word*)lf[25]+1 /* (set! valid-compiler-options-with-argument ...) */,lf[26]);
+t18=C_mutate((C_word*)lf[27]+1 /* (set! default-standard-bindings ...) */,lf[28]);
+t19=C_mutate((C_word*)lf[29]+1 /* (set! default-extended-bindings ...) */,lf[30]);
+t20=C_mutate((C_word*)lf[31]+1 /* (set! internal-bindings ...) */,lf[32]);
+t21=C_mutate((C_word*)lf[33]+1 /* (set! non-foldable-bindings ...) */,lf[34]);
+t22=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1330,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t23=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4930,a[2]=t22,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 197 lset-union");
+((C_proc5)C_retrieve_symbol_proc(lf[907]))(5,*((C_word*)lf[907]+1),t23,*((C_word*)lf[764]+1),*((C_word*)lf[27]+1),*((C_word*)lf[29]+1));}
+
+/* k4928 in k1304 in k1301 */
+static void C_ccall f_4930(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-platform.scm: 195 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[906]))(5,*((C_word*)lf[906]+1),((C_word*)t0)[2],*((C_word*)lf[764]+1),t1,*((C_word*)lf[33]+1));}
+
+/* k1328 in k1304 in k1301 */
+static void C_ccall f_1330(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_1330,2,t0,t1);}
+t2=C_mutate((C_word*)lf[35]+1 /* (set! foldable-bindings ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1333,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 203 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t3,lf[409],C_fix(19),C_fix(0),lf[904],lf[905],C_SCHEME_FALSE);}
+
+/* k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1333(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_1333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1336,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4753,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 205 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[413],C_fix(8),t3);}
+
+/* a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4753(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_4753,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4757,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4894,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 214 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[891]))(4,*((C_word*)lf[891]+1),t6,t7,t5);}
+
+/* a4893 in a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4894(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_4894,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_eqp(lf[49],t4);
+if(C_truep(t5)){
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=(C_word)C_i_car(t7);
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(C_fix(1),t8));}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+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 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_4757,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(t1))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4779,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 219 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t2,C_fix(0));}
+else{
+t2=(C_word)C_i_cdr(t1);
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=(C_word)C_i_car(t1);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[900],t4));}
+else{
+t3=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4823,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_4825,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 227 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[890]))(4,*((C_word*)lf[890]+1),t4,t5,t1);}
+else{
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}}}
+
+/* a4824 in k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4825(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_4825,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4832,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=t3;
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(C_word)C_eqp(lf[49],t6);
+if(C_truep(t7)){
+t8=t3;
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=(C_word)C_i_car(t9);
+t11=t4;
+f_4832(t11,(C_word)C_eqp(C_fix(2),t10));}
+else{
+t8=t4;
+f_4832(t8,C_SCHEME_FALSE);}}
+
+/* k4830 in a4824 in k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4832(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_4832,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4848,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 230 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t2,C_fix(1));}
+else{
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[40],lf[903],t2));}}
+
+/* k4846 in k4830 in a4824 in k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+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[11],*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_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_word)C_a_i_record(&a,4,lf[39],lf[40],lf[902],t2));}
+
+/* k4821 in k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4823(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_4823,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[901],t2));}
+
+/* k4777 in k4755 in a4752 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4779(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_4779,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[899],t2));}
+
+/* k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1336(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_1336,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1339,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4603,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 235 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[411],C_fix(8),t3);}
+
+/* a4602 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4603(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_4603,6,t0,t1,t2,t3,t4,t5);}
+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_nullp(t6);
+t8=(C_truep(t7)?(C_word)C_eqp(C_retrieve(lf[37]),lf[36]):C_SCHEME_FALSE);
+if(C_truep(t8)){
+if(C_truep(C_retrieve(lf[38]))){
+t9=t5;
+t10=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[892],t9);
+t11=(C_word)C_a_i_list(&a,2,t4,t10);
+t12=t1;
+t13=t12;
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[893],t11));}
+else{
+t9=t5;
+t10=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[894],t9);
+t11=(C_word)C_a_i_list(&a,2,t4,t10);
+t12=t1;
+t13=t12;
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[895],t11));}}
+else{
+t9=(C_word)C_i_car(t5);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4703,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_4705,tmp=(C_word)a,a+=2,tmp);
+t12=(C_word)C_i_cdr(t5);
+C_trace("c-platform.scm: 255 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[891]))(4,*((C_word*)lf[891]+1),t10,t11,t12);}}}
+
+/* a4704 in a4602 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4705(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_4705,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_eqp(lf[49],t4);
+if(C_truep(t5)){
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=(C_word)C_i_car(t7);
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(t8,C_fix(0)));}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k4701 in a4602 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4703(C_word c,C_word t0,C_word 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_4703,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+if(C_truep(t3)){
+t4=(C_word)C_i_length(t2);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4672,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_4674,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 266 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[890]))(4,*((C_word*)lf[890]+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);}}
+
+/* a4673 in k4701 in a4602 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4674(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_4674,4,t0,t1,t2,t3);}
+t4=(C_truep(C_retrieve(lf[38]))?lf[897]:lf[898]);
+t5=(C_word)C_a_i_list(&a,2,t2,t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[39],lf[40],t4,t5));}
+
+/* k4670 in k4701 in a4602 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4672(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_4672,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[896],t2));}
+
+/* k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1339(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_1339,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1342,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4444,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 273 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[407],C_fix(8),t3);}
+
+/* a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4444(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_4444,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t6,C_fix(2)))){
+t7=(C_word)C_i_car(t5);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4559,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_4561,tmp=(C_word)a,a+=2,tmp);
+t10=(C_word)C_i_cdr(t5);
+C_trace("c-platform.scm: 282 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[891]))(4,*((C_word*)lf[891]+1),t8,t9,t10);}
+else{
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,C_SCHEME_FALSE);}}
+
+/* a4560 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4561(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_4561,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_eqp(lf[49],t4);
+if(C_truep(t5)){
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=(C_word)C_i_car(t7);
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_eqp(C_fix(1),t8));}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k4557 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4559(C_word c,C_word t0,C_word 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_4559,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+if(C_truep(t3)){
+t4=(C_word)C_i_length(t2);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,C_fix(2)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4482,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_4484,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 293 fold-inner");
+((C_proc4)C_retrieve_symbol_proc(lf[890]))(4,*((C_word*)lf[890]+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);}}
+
+/* a4483 in k4557 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4484(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_4484,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4491,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=t3;
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(C_word)C_eqp(lf[49],t6);
+if(C_truep(t7)){
+t8=t3;
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=(C_word)C_i_car(t9);
+t11=t4;
+f_4491(t11,(C_word)C_eqp(C_fix(2),t10));}
+else{
+t8=t4;
+f_4491(t8,C_SCHEME_FALSE);}}
+
+/* k4489 in a4483 in k4557 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4491(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_4491,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4507,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 296 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t2,C_fix(1));}
+else{
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[40],lf[889],t2));}}
+
+/* k4505 in k4489 in a4483 in k4557 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4507(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_4507,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[40],lf[888],t2));}
+
+/* k4480 in k4557 in a4443 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4482(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_4482,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[887],t2));}
+
+/* k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1342(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_1342,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1345,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4326,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 300 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[886],C_fix(8),t3);}
+
+/* a4325 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4326(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_4326,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(2));
+if(C_truep(t7)){
+t8=(C_word)C_eqp(lf[36],C_retrieve(lf[37]));
+if(C_truep(t8)){
+t9=(C_word)C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4361,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t11=(C_word)C_slot(t9,C_fix(1));
+t12=(C_word)C_eqp(lf[49],t11);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t9,C_fix(2));
+t14=(C_word)C_i_car(t13);
+t15=t10;
+f_4361(t15,(C_word)C_eqp(C_fix(2),t14));}
+else{
+t13=t10;
+f_4361(t13,C_SCHEME_FALSE);}}
+else{
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4429,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t10=(C_word)C_a_i_record(&a,4,lf[39],lf[57],lf[885],C_SCHEME_END_OF_LIST);
+C_trace("c-platform.scm: 320 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[53]))(5,*((C_word*)lf[53]+1),t9,t10,t4,t5);}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k4427 in a4325 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4429(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_4429,2,t0,t1);}
+t2=((C_word*)t0)[2];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[884],t1));}
+
+/* k4359 in a4325 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4361(C_word t0,C_word t1){
+C_word 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_4361,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4381,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: 316 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,C_fix(1));}
+else{
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[882],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[883],t4));}}
+
+/* k4379 in k4359 in a4325 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 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_4381,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[4],t1);
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[880],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[881],t4));}
+
+/* k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1345(C_word c,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_1345,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1347,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1422,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_4324,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 340 op1");
+f_1347(t4,lf[877],lf[878],lf[879]);}
+
+/* k4322 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-platform.scm: 340 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),((C_word*)t0)[2],lf[876],C_fix(8),t1);}
+
+/* k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1422,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1425,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4320,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 341 op1");
+f_1347(t3,lf[873],lf[874],lf[875]);}
+
+/* k4318 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4320(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-platform.scm: 341 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),((C_word*)t0)[2],lf[872],C_fix(8),t1);}
+
+/* k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1425,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1427,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1617,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 361 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[760],C_fix(8),t2);}
+
+/* k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1617,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1620,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 362 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[758],C_fix(8),((C_word*)t0)[2]);}
+
+/* k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1620(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_1620,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1623,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4103,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 364 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[871],C_fix(8),t3);}
+
+/* a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4103(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_4103,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(2));
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(C_word)C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4119,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t11=(C_word)C_slot(t8,C_fix(1));
+t12=(C_word)C_eqp(lf[50],t11);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t9,C_fix(1));
+t14=(C_word)C_eqp(lf[50],t13);
+if(C_truep(t14)){
+t15=(C_word)C_slot(t8,C_fix(2));
+t16=(C_word)C_slot(t9,C_fix(2));
+if(C_truep((C_word)C_i_equalp(t15,t16))){
+t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4276,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 376 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t17,C_SCHEME_TRUE);}
+else{
+t17=t10;
+f_4119(t17,C_SCHEME_FALSE);}}
+else{
+t15=t10;
+f_4119(t15,C_SCHEME_FALSE);}}
+else{
+t13=t10;
+f_4119(t13,C_SCHEME_FALSE);}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k4274 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4276(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_4276,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+t3=((C_word*)t0)[2];
+f_4119(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[870],t2));}
+
+/* k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4119(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4119,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_4125,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_4152,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_word)C_slot(((C_word*)t0)[2],C_fix(1));
+t5=(C_word)C_eqp(lf[49],t4);
+if(C_truep(t5)){
+t6=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t7=(C_word)C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4221,a[2]=t7,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 379 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t8,t7);}
+else{
+t6=t3;
+f_4152(t6,C_SCHEME_FALSE);}}}
+
+/* k4219 in k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4221(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_4152(t3,t2);}
+else{
+t2=((C_word*)t0)[3];
+f_4152(t2,(C_word)C_i_symbolp(((C_word*)t0)[2]));}}
+
+/* k4150 in k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4152(C_word t0,C_word t1){
+C_word 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_4152,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4155,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_4155(t3,t1);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
+t4=(C_word)C_eqp(lf[49],t3);
+if(C_truep(t4)){
+t5=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t6=(C_word)C_i_car(t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4188,a[2]=t6,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 382 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t7,t6);}
+else{
+t5=t2;
+f_4155(t5,C_SCHEME_FALSE);}}}
+
+/* k4186 in k4150 in k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4188(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[3];
+f_4155(t2,(C_truep(t1)?t1:(C_word)C_i_symbolp(((C_word*)t0)[2])));}
+
+/* k4153 in k4150 in k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4155(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_4155,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[868],t2);
+t4=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t3);
+t5=((C_word*)t0)[2];
+f_4125(t5,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[869],t4));}
+else{
+t2=((C_word*)t0)[2];
+f_4125(t2,C_SCHEME_FALSE);}}
+
+/* k4123 in k4117 in a4102 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_4125(C_word t0,C_word 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_4125,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_word)C_a_i_record(&a,4,lf[39],lf[40],lf[866],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[867],t4));}}
+
+/* k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1623(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_1623,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1625,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1839,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 419 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[865],C_fix(8),t2);}
+
+/* k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1839(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1839,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1842,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 420 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[864],C_fix(8),((C_word*)t0)[2]);}
+
+/* k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1842(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_1842,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1844,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1980,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 450 rewrite-c..r");
+f_1844(t3,lf[861],lf[862],lf[863],C_fix(0));}
+
+/* k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1980,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1983,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_1844(t2,lf[858],lf[859],lf[860],C_fix(0));}
+
+/* k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1983(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_1983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1986,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_1844(t2,lf[855],lf[856],lf[857],C_fix(0));}
+
+/* k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1986(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_1986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1989,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_1844(t2,lf[852],lf[853],lf[854],C_fix(1));}
+
+/* k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1989(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_1989,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1992,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_1844(t2,lf[811],lf[850],lf[851],C_fix(2));}
+
+/* k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1992(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_1992,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1995,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_1844(t2,lf[790],lf[848],lf[849],C_fix(3));}
+
+/* k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1995(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_1995,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1998,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_1844(t2,lf[845],lf[846],lf[847],C_fix(0));}
+
+/* k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1998(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_1998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2001,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 457 rewrite-c..r");
+f_1844(t2,lf[842],lf[843],lf[844],C_fix(1));}
+
+/* k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2001(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_2001,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2004,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 458 rewrite-c..r");
+f_1844(t2,lf[839],lf[840],lf[841],C_fix(2));}
+
+/* k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2004(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2004,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2007,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 459 rewrite-c..r");
+f_1844(t2,lf[836],lf[837],lf[838],C_fix(3));}
+
+/* k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2007(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_2007,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2008,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2034,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 466 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[59],C_fix(8),t2);}
+
+/* k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2034(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2037,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 467 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[60],C_fix(8),((C_word*)t0)[2]);}
+
+/* k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2037(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_2037,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_2039,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2259,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 498 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[831],C_fix(8),t2);}
+
+/* k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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_2262,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 499 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[828],C_fix(8),((C_word*)t0)[2]);}
+
+/* k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2262,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2265,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[59],C_fix(13),lf[835],C_SCHEME_TRUE);}
+
+/* k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2265,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2268,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[60],C_fix(13),lf[834],C_SCHEME_TRUE);}
+
+/* k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2268(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2271,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[831],C_fix(13),lf[833],C_SCHEME_FALSE);}
+
+/* k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2271(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2271,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2274,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[831],C_fix(13),lf[832],C_SCHEME_TRUE);}
+
+/* k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2274(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2277,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[828],C_fix(13),lf[830],C_SCHEME_FALSE);}
+
+/* k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2277(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2280,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[828],C_fix(13),lf[829],C_SCHEME_TRUE);}
+
+/* k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2280,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2283,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[826],C_fix(13),lf[827],C_SCHEME_TRUE);}
+
+/* k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2286,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 508 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[824],C_fix(13),lf[825],C_SCHEME_TRUE);}
+
+/* k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2286,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2289,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 509 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[822],C_fix(13),lf[823],C_SCHEME_TRUE);}
+
+/* k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2289(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2292,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 511 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[820],C_fix(2),C_fix(1),lf[821],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2292(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2295,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 512 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[818],C_fix(2),C_fix(1),lf[819],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2295(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2295,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2298,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 513 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[773],C_fix(2),C_fix(1),lf[817],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2298(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2298,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2301,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 514 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[815],C_fix(2),C_fix(1),lf[816],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2301(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2301,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2304,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 515 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[813],C_fix(2),C_fix(1),lf[814],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2304(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2304,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2307,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 516 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[811],C_fix(2),C_fix(1),lf[812],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2307(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2307,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2310,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 517 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[809],C_fix(2),C_fix(1),lf[810],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2310(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2310,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2313,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 518 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[807],C_fix(2),C_fix(1),lf[808],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2313(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2316,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 519 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[805],C_fix(2),C_fix(1),lf[806],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2316(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2319,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 520 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[771],C_fix(2),C_fix(1),lf[804],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2319(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2322,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 521 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[802],C_fix(2),C_fix(1),lf[803],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2322,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2325,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 522 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[800],C_fix(2),C_fix(1),lf[801],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2325(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2325,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2328,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 523 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[798],C_fix(2),C_fix(1),lf[799],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2328(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2331,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 524 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[796],C_fix(2),C_fix(1),lf[797],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2331(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2331,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2334,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 525 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[794],C_fix(2),C_fix(1),lf[795],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2334(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2337,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 526 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[792],C_fix(2),C_fix(1),lf[793],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2337(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2340,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 527 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[790],C_fix(2),C_fix(1),lf[791],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 528 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[788],C_fix(2),C_fix(1),lf[789],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2343(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 529 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[786],C_fix(2),C_fix(1),lf[787],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2346(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 530 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[784],C_fix(2),C_fix(1),lf[785],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2349(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 531 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[782],C_fix(2),C_fix(1),lf[783],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2352(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2355,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 532 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[780],C_fix(2),C_fix(1),lf[781],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2358,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 533 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[778],C_fix(2),C_fix(1),lf[779],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2361,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 534 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[776],C_fix(2),C_fix(1),lf[777],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2364,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 535 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[769],C_fix(2),C_fix(1),lf[775],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2364,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2367,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 537 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[773],C_fix(2),C_fix(1),lf[774],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2367(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2367,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2370,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 538 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[771],C_fix(2),C_fix(1),lf[772],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2370(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2370,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2373,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[769],C_fix(2),C_fix(1),lf[770],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2373,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2376,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 541 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[766],C_fix(7),C_fix(1),lf[768],C_fix(1),C_SCHEME_FALSE);}
+
+/* k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2376(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2376,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2379,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 542 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[766],C_fix(2),C_fix(1),lf[767],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2379,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2382,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[764],C_fix(1),C_fix(2),lf[765]);}
+
+/* k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2382(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2385,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[762],C_fix(1),C_fix(2),lf[763]);}
+
+/* k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2385(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2385,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2388,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 546 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[760],C_fix(1),C_fix(2),lf[761]);}
+
+/* k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2388(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2388,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2391,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 547 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[758],C_fix(1),C_fix(2),lf[759]);}
+
+/* k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2391(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2391,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2394,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 549 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[753],C_fix(2),C_fix(2),lf[756],C_SCHEME_FALSE,lf[757]);}
+
+/* k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2394(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2394,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2397,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 550 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[753],C_fix(2),C_fix(2),lf[754],C_SCHEME_TRUE,lf[755]);}
+
+/* k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2397(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2397,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2400,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 551 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[750],C_fix(2),C_fix(1),lf[751],C_SCHEME_TRUE,lf[752]);}
+
+/* k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2400(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2400,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2403,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 552 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[747],C_fix(2),C_fix(1),lf[748],C_SCHEME_TRUE,lf[749]);}
+
+/* k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2403(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2403,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2406,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 553 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[744],C_fix(2),C_fix(1),lf[745],C_SCHEME_TRUE,lf[746]);}
+
+/* k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2406(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2406,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2409,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 554 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[742],C_fix(2),C_fix(1),lf[743],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2409,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2412,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 555 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[740],C_fix(2),C_fix(1),lf[741],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2412,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2415,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 556 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[738],C_fix(2),C_fix(1),lf[739],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2415,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2418,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 557 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[736],C_fix(2),C_fix(1),lf[737],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2418,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2421,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 558 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[734],C_fix(2),C_fix(1),lf[735],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2421(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2421,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2424,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 559 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[732],C_fix(2),C_fix(1),lf[733],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2424(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2424,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2427,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 560 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[730],C_fix(2),C_fix(1),lf[731],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2427(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2427,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2430,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 561 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[727],C_fix(2),C_fix(1),lf[728],C_SCHEME_TRUE,lf[729]);}
+
+/* k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2430,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2433,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 562 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[724],C_fix(2),C_fix(1),lf[725],C_SCHEME_TRUE,lf[726]);}
+
+/* k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2433(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2436,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 563 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[722],C_fix(2),C_fix(1),lf[723],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2439,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 564 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[720],C_fix(2),C_fix(1),lf[721],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2442,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 565 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[718],C_fix(2),C_fix(1),lf[719],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2445,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 566 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[716],C_fix(2),C_fix(1),lf[717],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2448,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 567 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[714],C_fix(2),C_fix(1),lf[715],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2451,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 568 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[712],C_fix(2),C_fix(1),lf[713],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2454,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 569 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[710],C_fix(2),C_fix(1),lf[711],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2454,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2457,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 570 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[708],C_fix(2),C_fix(1),lf[709],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2457,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2460,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 571 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[706],C_fix(2),C_fix(1),lf[707],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2460,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2463,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 572 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[704],C_fix(2),C_fix(1),lf[705],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2463(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2463,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2466,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 573 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[702],C_fix(2),C_fix(1),lf[703],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2466,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2469,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 574 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[700],C_fix(2),C_fix(1),lf[701],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2469,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2472,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 575 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[698],C_fix(2),C_fix(1),lf[699],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2472,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2475,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 576 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[694],C_fix(2),C_fix(1),lf[697],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2475,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2478,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 577 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[694],C_fix(2),C_fix(1),lf[696],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2478,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2481,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 578 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[694],C_fix(2),C_fix(1),lf[695],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2481,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2484,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 579 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[690],C_fix(2),C_fix(1),lf[693],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2484,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2487,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 580 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[690],C_fix(2),C_fix(1),lf[692],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2487,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2490,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 581 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[690],C_fix(2),C_fix(1),lf[691],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2490(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2490,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2493,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 582 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[688],C_fix(2),C_fix(1),lf[689],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2493,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2496,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 583 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[686],C_fix(2),C_fix(1),lf[687],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2496,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2499,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 584 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[684],C_fix(2),C_fix(1),lf[685],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2499,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2502,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 585 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[681],C_fix(2),C_fix(2),lf[683],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2502(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2502,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2505,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 586 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[681],C_fix(2),C_fix(2),lf[682],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2505(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2505,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2508,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 587 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[678],C_fix(2),C_fix(3),lf[680],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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_trace("c-platform.scm: 588 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[678],C_fix(2),C_fix(3),lf[679],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2511,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2514,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 589 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[675],C_fix(2),C_fix(2),lf[677],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2514,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2517,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 590 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[675],C_fix(2),C_fix(2),lf[676],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2517(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2517,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2520,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 591 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[673],C_fix(2),C_fix(2),lf[674],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2520(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2520,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2523,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 592 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[671],C_fix(2),C_fix(2),lf[672],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2523(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2523,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2526,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 593 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[669],C_fix(2),C_fix(2),lf[670],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2526(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2526,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2529,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 594 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[667],C_fix(2),C_fix(2),lf[668],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2529,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 595 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[665],C_fix(2),C_fix(2),lf[666],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2532,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2535,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 596 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[663],C_fix(2),C_fix(2),lf[664],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2535,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2538,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 597 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[661],C_fix(2),C_fix(2),lf[662],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2538,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2541,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 598 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[659],C_fix(2),C_fix(1),lf[660],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2541(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2541,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2544,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 599 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[657],C_fix(2),C_fix(1),lf[658],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2544,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2547,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 600 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[655],C_fix(2),C_fix(2),lf[656],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2547(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2547,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2550,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 601 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[653],C_fix(2),C_fix(2),lf[654],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2550(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2550,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2553,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 602 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[651],C_fix(2),C_fix(2),lf[652],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2553(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2553,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2556,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 603 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[649],C_fix(2),C_fix(2),lf[650],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2556(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2556,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2559,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 604 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[647],C_fix(2),C_fix(2),lf[648],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2559(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2559,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2562,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 605 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[645],C_fix(2),C_fix(2),lf[646],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2562(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2562,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2565,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 606 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[643],C_fix(2),C_fix(2),lf[644],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2565,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2568,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 607 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[641],C_fix(2),C_fix(2),lf[642],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2568(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2568,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2571,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 608 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[639],C_fix(2),C_fix(2),lf[640],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2571(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2571,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2574,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 609 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[637],C_fix(2),C_fix(2),lf[638],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2574,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2577,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 610 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[635],C_fix(2),C_fix(2),lf[636],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2577(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2577,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2580,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 611 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[633],C_fix(2),C_fix(2),lf[634],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2580(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2580,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2583,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 612 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[631],C_fix(2),C_fix(2),lf[632],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2583(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2583,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2586,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 613 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[629],C_fix(2),C_fix(2),lf[630],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2586(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2586,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2589,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 614 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[627],C_fix(2),C_fix(2),lf[628],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2589,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2592,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 615 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[625],C_fix(2),C_fix(2),lf[626],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2592(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2595,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 616 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[623],C_fix(2),C_fix(2),lf[624],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2595(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2595,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2598,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 617 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[621],C_fix(2),C_fix(1),lf[622],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2598(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2598,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2601,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 618 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[619],C_fix(2),C_fix(1),lf[620],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2601(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2601,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2604,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 619 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[617],C_fix(2),C_fix(1),lf[618],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2604(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2604,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2607,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 620 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[615],C_fix(2),C_fix(1),lf[616],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2607(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2607,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2610,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 621 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[613],C_fix(2),C_fix(1),lf[614],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2610(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2610,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2613,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 622 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[611],C_fix(2),C_fix(1),lf[612],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2613,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2616,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 623 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[609],C_fix(2),C_fix(1),lf[610],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2616,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2619,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 624 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[607],C_fix(2),C_fix(2),lf[608],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2622,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 625 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[605],C_fix(2),C_fix(2),lf[606],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2622(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2622,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2625,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 626 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[603],C_fix(2),C_fix(2),lf[604],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2625(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2625,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2628,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 627 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[601],C_fix(2),C_fix(2),lf[602],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2628,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2631,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 628 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[599],C_fix(2),C_fix(1),lf[600],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2631(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2631,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2634,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[595],C_fix(14),lf[36],C_fix(2),lf[597],lf[598]);}
+
+/* k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2637,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 631 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[595],C_fix(2),C_fix(2),lf[596],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2637(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2637,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2640,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[591],C_fix(14),lf[36],C_fix(2),lf[593],lf[594]);}
+
+/* k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2640(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2640,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2643,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 633 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[591],C_fix(2),C_fix(2),lf[592],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2643(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2643,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2646,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[588],C_fix(17),C_fix(2),lf[589],lf[590]);}
+
+/* k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2646(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2646,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2649,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[585],C_fix(17),C_fix(2),lf[586],lf[587]);}
+
+/* k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2649(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2649,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2652,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 636 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[583],C_fix(2),C_fix(2),lf[584],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2652,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2655,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 637 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[581],C_fix(2),C_fix(2),lf[582],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2655(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2655,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2658,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[578],C_fix(4),lf[315],C_fix(0));}
+
+/* k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2658(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2658,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2661,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[575],C_fix(4),lf[315],C_fix(1));}
+
+/* k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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_2664,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[578],C_fix(17),C_fix(2),lf[579],lf[580]);}
+
+/* k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2664(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2664,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2667,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[575],C_fix(17),C_fix(2),lf[576],lf[577]);}
+
+/* k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2667(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2667,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2670,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[571],C_fix(14),lf[36],C_fix(1),lf[573],lf[574]);}
+
+/* k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2670(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2670,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2673,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[571],C_fix(16),C_fix(1),lf[572],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2673(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2673,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2676,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[76]))(9,*((C_word*)lf[76]+1),t2,lf[567],C_fix(21),C_fix(0),lf[568],lf[569],lf[570],*((C_word*)lf[9]+1));}
+
+/* k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2676(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2679,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[76]))(9,*((C_word*)lf[76]+1),t2,lf[563],C_fix(21),C_fix(-1),lf[564],lf[565],lf[566],*((C_word*)lf[9]+1));}
+
+/* k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2679(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2679,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2682,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[76]))(9,*((C_word*)lf[76]+1),t2,lf[559],C_fix(21),C_fix(0),lf[560],lf[561],lf[562],*((C_word*)lf[9]+1));}
+
+/* k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2682(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2682,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2685,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[76]))(9,*((C_word*)lf[76]+1),t2,lf[556],C_fix(22),C_fix(1),lf[557],C_SCHEME_TRUE,*((C_word*)lf[9]+1),lf[558]);}
+
+/* k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2685(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2688,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[554],C_fix(16),C_fix(2),lf[555],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2688,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2691,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[552],C_fix(16),C_fix(2),lf[553],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2691(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2691,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2694,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[550],C_fix(16),C_fix(2),lf[551],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2694(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2694,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2697,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[548],C_fix(16),C_fix(2),lf[549],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2700,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[546],C_fix(16),C_fix(1),lf[547],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2700,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2703,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[544],C_fix(16),C_fix(1),lf[545],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2706,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[542],C_fix(16),C_fix(1),lf[543],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2706,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2709,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[540],C_fix(16),C_fix(1),lf[541],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2709(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2709,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2712,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[538],C_fix(16),C_fix(1),lf[539],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2712(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2712,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2715,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[536],C_fix(16),C_fix(1),lf[537],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2715(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2715,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2718,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[534],C_fix(16),C_fix(1),lf[535],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2718,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2721,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[532],C_fix(16),C_fix(1),lf[533],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2721(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2721,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2724,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[527],C_fix(16),C_fix(1),lf[531],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2724,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2727,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[529],C_fix(16),C_fix(1),lf[530],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2727(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2727,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2730,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[527],C_fix(16),C_fix(2),lf[528],C_SCHEME_TRUE,*((C_word*)lf[9]+1));}
+
+/* k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2730(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2730,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2733,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[523],C_fix(5),lf[526],C_fix(0),lf[36]);}
+
+/* k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2733(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2733,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2736,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 671 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[523],C_fix(2),C_fix(1),lf[525],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2739,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 672 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[523],C_fix(2),C_fix(1),lf[524],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2739(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2739,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2742,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[518],C_fix(5),lf[522],C_fix(0),lf[36]);}
+
+/* k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2742,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2745,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[518],C_fix(5),lf[521],C_fix(0),lf[356]);}
+
+/* k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2745,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2748,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 675 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[518],C_fix(2),C_fix(1),lf[520],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2748(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2748,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2751,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 676 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[518],C_fix(2),C_fix(1),lf[519],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2751(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2751,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2754,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[513],C_fix(5),lf[517],C_fix(0),lf[36]);}
+
+/* k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2754(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2754,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2757,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[513],C_fix(5),lf[516],C_fix(0),lf[356]);}
+
+/* k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2757(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2757,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2760,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 679 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[513],C_fix(2),C_fix(1),lf[515],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2760(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2760,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2763,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 680 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[513],C_fix(2),C_fix(1),lf[514],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2763(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2763,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2766,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[501],C_fix(6),lf[511],lf[512],C_SCHEME_FALSE);}
+
+/* k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2766(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2766,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2769,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[497],C_fix(6),lf[509],lf[510],C_SCHEME_FALSE);}
+
+/* k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2769,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2772,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[506],C_fix(6),lf[507],lf[508],C_SCHEME_TRUE);}
+
+/* k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2772(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2772,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2775,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[503],C_fix(6),lf[504],lf[505],C_SCHEME_TRUE);}
+
+/* k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2775(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2775,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2778,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 687 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[501],C_fix(2),C_fix(1),lf[502],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2778,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2781,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 688 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[499],C_fix(2),C_fix(1),lf[500],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2781,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2784,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 689 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[497],C_fix(2),C_fix(1),lf[498],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2784(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2784,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2787,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 690 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[495],C_fix(2),C_fix(1),lf[496],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2787(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2787,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2790,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 692 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[483],C_fix(2),C_fix(1),lf[494],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2790(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2793,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 693 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[481],C_fix(2),C_fix(1),lf[493],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2793(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2793,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2796,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 694 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[479],C_fix(2),C_fix(1),lf[492],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2796,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2799,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 695 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[477],C_fix(2),C_fix(1),lf[491],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2799(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2799,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2802,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 696 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[475],C_fix(2),C_fix(1),lf[490],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2802,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2805,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 697 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[473],C_fix(2),C_fix(1),lf[489],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2805(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2805,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2808,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 698 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[471],C_fix(2),C_fix(1),lf[488],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2808,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2811,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 699 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[469],C_fix(2),C_fix(1),lf[487],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2811(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2811,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2814,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 700 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[467],C_fix(2),C_fix(2),lf[486],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2814(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2814,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2817,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 701 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[465],C_fix(2),C_fix(1),lf[485],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2817,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2820,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 702 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[483],C_fix(2),C_fix(2),lf[484],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2820(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2820,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2823,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 703 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[481],C_fix(2),C_fix(2),lf[482],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2823(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2823,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2826,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 704 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[479],C_fix(2),C_fix(2),lf[480],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2826,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2829,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 705 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[477],C_fix(2),C_fix(2),lf[478],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2829(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2829,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2832,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 706 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[475],C_fix(2),C_fix(2),lf[476],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2832,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2835,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 707 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[473],C_fix(2),C_fix(2),lf[474],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2835(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2838,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 708 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[471],C_fix(2),C_fix(2),lf[472],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2838(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2838,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2841,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 709 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[469],C_fix(2),C_fix(2),lf[470],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2841(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2841,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2844,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 710 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[467],C_fix(2),C_fix(3),lf[468],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2844,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2847,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 711 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[465],C_fix(2),C_fix(2),lf[466],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2847(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2850,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[405],C_fix(9),lf[463],lf[464],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2850(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2853,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[403],C_fix(9),lf[461],lf[462],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2853,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2856,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[401],C_fix(9),lf[459],lf[460],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2856(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2856,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2859,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[399],C_fix(9),lf[457],lf[458],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2859(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2859,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2862,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[397],C_fix(9),lf[455],lf[456],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2862(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2862,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2865,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[454],C_fix(11),C_fix(1),lf[129],C_SCHEME_TRUE);}
+
+/* k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2865(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2865,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2868,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[452],C_fix(11),C_fix(2),lf[453],C_SCHEME_TRUE);}
+
+/* k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2868(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2871,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[450],C_fix(11),C_fix(2),lf[451],C_SCHEME_TRUE);}
+
+/* k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2871(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2871,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2874,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[449],C_fix(11),C_fix(3),lf[315],C_SCHEME_TRUE);}
+
+/* k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2874(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2874,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2877,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[448],C_fix(11),C_fix(3),lf[315],C_SCHEME_FALSE);}
+
+/* k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2877(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2877,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2880,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[447],C_fix(11),C_SCHEME_FALSE,lf[318],C_SCHEME_FALSE);}
+
+/* k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2880(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2880,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2883,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[445],C_fix(11),C_fix(3),lf[446],C_SCHEME_FALSE);}
+
+/* k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2883(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2883,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2886,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[443],C_fix(11),C_fix(2),lf[444],C_SCHEME_FALSE);}
+
+/* k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2886(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2886,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2889,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[441],C_fix(11),C_fix(1),lf[442],C_SCHEME_TRUE);}
+
+/* k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2889(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2889,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2892,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[439],C_fix(11),C_fix(1),lf[440],C_SCHEME_TRUE);}
+
+/* k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2892(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2892,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2895,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[437],C_fix(11),C_fix(3),lf[315],C_SCHEME_FALSE);}
+
+/* k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2895,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2898,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 731 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[437],C_fix(2),C_fix(3),lf[438],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2898,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2901,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[435],C_fix(11),C_fix(1),lf[436],C_SCHEME_TRUE);}
+
+/* k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2904,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[433],C_fix(11),C_fix(1),lf[434],C_SCHEME_TRUE);}
+
+/* k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2904,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2907,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[432],C_fix(11),C_fix(2),lf[399],C_SCHEME_TRUE);}
+
+/* k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2907(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2907,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2910,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[431],C_fix(11),C_fix(2),lf[405],C_SCHEME_TRUE);}
+
+/* k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2910(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2913,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[427],C_fix(12),lf[430],C_SCHEME_TRUE,C_fix(2));}
+
+/* k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2913,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2916,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[426],C_fix(12),lf[429],C_SCHEME_TRUE,C_fix(2));}
+
+/* k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2916(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2919,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[428],C_fix(12),C_SCHEME_FALSE,C_SCHEME_TRUE,C_fix(1));}
+
+/* k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2922,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[76]))(5,*((C_word*)lf[76]+1),t2,lf[427],C_fix(18),C_fix(0));}
+
+/* k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2922(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2925,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[76]))(5,*((C_word*)lf[76]+1),t2,lf[426],C_fix(18),C_fix(1));}
+
+/* k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2925(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2928,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[76]))(5,*((C_word*)lf[76]+1),t2,lf[326],C_fix(18),C_SCHEME_END_OF_LIST);}
+
+/* k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2928(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2928,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2931,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[424],C_fix(13),lf[425],C_SCHEME_TRUE);}
+
+/* k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2931,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2934,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[413],C_fix(16),C_fix(2),lf[423],C_SCHEME_TRUE,C_fix(4));}
+
+/* k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2934(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2934,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2937,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[409],C_fix(16),C_fix(2),lf[422],C_SCHEME_TRUE,C_fix(4));}
+
+/* k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2937(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2937,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2940,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[411],C_fix(16),C_fix(2),lf[421],C_SCHEME_TRUE,C_fix(4));}
+
+/* k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2940(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2940,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2943,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[407],C_fix(16),C_fix(2),lf[420],C_SCHEME_TRUE,C_fix(4));}
+
+/* k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2943(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2943,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2946,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[405],C_fix(17),C_fix(2),lf[419]);}
+
+/* k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2946(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2946,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2949,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[403],C_fix(17),C_fix(2),lf[418]);}
+
+/* k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2949(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2949,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2952,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[401],C_fix(17),C_fix(2),lf[417]);}
+
+/* k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2952(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2952,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2955,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[399],C_fix(17),C_fix(2),lf[416]);}
+
+/* k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2955,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2958,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[397],C_fix(17),C_fix(2),lf[415]);}
+
+/* k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2958(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2958,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2961,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[413],C_fix(13),lf[414],C_SCHEME_TRUE);}
+
+/* k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2961(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2961,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2964,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[411],C_fix(13),lf[412],C_SCHEME_TRUE);}
+
+/* k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2964(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2964,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2967,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[409],C_fix(13),lf[410],C_SCHEME_TRUE);}
+
+/* k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2967(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2967,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2970,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[407],C_fix(13),lf[408],C_SCHEME_TRUE);}
+
+/* k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2970,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2973,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[405],C_fix(13),lf[406],C_SCHEME_TRUE);}
+
+/* k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2973,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2976,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[403],C_fix(13),lf[404],C_SCHEME_TRUE);}
+
+/* k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 764 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[401],C_fix(13),lf[402],C_SCHEME_TRUE);}
+
+/* k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2979(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2979,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2982,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[399],C_fix(13),lf[400],C_SCHEME_TRUE);}
+
+/* k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2982(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2982,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2985,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[397],C_fix(13),lf[398],C_SCHEME_TRUE);}
+
+/* k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2985(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2985,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2988,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[395],C_fix(13),lf[396],C_SCHEME_TRUE);}
+
+/* k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2988,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2991,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[393],C_fix(13),lf[394],C_SCHEME_TRUE);}
+
+/* k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2991,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2994,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[391],C_fix(13),lf[392],C_SCHEME_TRUE);}
+
+/* k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2994,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2997,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[389],C_fix(13),lf[390],C_SCHEME_TRUE);}
+
+/* k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2997(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2997,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3000,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[387],C_fix(13),lf[388],C_SCHEME_TRUE);}
+
+/* k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3000,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3003,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[385],C_fix(13),lf[386],C_SCHEME_TRUE);}
+
+/* k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 774 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[383],C_fix(13),lf[384],C_SCHEME_TRUE);}
+
+/* k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3006,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3009,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[381],C_fix(13),lf[382],C_SCHEME_TRUE);}
+
+/* k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 776 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[379],C_fix(13),lf[380],C_SCHEME_TRUE);}
+
+/* k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3012(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3015,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[377],C_fix(13),lf[378],C_SCHEME_TRUE);}
+
+/* k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3015(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3015,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3018,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[367],C_fix(14),lf[36],C_fix(1),lf[375],lf[376]);}
+
+/* k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3018(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3018,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3021,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[364],C_fix(14),lf[36],C_fix(1),lf[373],lf[374]);}
+
+/* k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3021(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3021,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3024,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[370],C_fix(14),lf[36],C_fix(2),lf[371],lf[372]);}
+
+/* k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3024(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3024,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3027,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 783 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[367],C_fix(2),C_fix(1),lf[369],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3027(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3027,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3030,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 784 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[367],C_fix(2),C_fix(1),lf[368],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3030(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3030,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3033,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 785 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[364],C_fix(2),C_fix(1),lf[366],C_SCHEME_TRUE,C_SCHEME_FALSE);}
+
+/* k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3033(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3036,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 786 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[364],C_fix(2),C_fix(1),lf[365],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3036(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3039,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[362],C_fix(15),lf[356],lf[36],lf[363],C_SCHEME_FALSE);}
+
+/* k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3039(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3042,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[360],C_fix(15),lf[356],lf[36],lf[361],C_SCHEME_FALSE);}
+
+/* k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3042(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3042,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3045,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[358],C_fix(15),lf[356],lf[36],lf[359],C_SCHEME_FALSE);}
+
+/* k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3045,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3048,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[355],C_fix(15),lf[356],lf[36],lf[357],C_SCHEME_FALSE);}
+
+/* k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3048(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3048,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3051,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[353],C_fix(16),C_fix(1),lf[354],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3051(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3051,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3054,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[351],C_fix(16),C_fix(1),lf[352],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3054,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3057,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[349],C_fix(16),C_fix(1),lf[350],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3057(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3057,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3060,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[347],C_fix(16),C_fix(1),lf[348],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3060(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3060,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3063,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[345],C_fix(16),C_fix(1),lf[346],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3063(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3063,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3066,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[343],C_fix(16),C_fix(1),lf[344],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3066(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3066,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3069,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[341],C_fix(16),C_fix(2),lf[342],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3069,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3072,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[339],C_fix(16),C_fix(1),lf[340],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3072,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3075,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[337],C_fix(16),C_fix(2),lf[338],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 802 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[335],C_fix(16),C_fix(1),lf[336],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3078(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3078,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3081,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[333],C_fix(16),C_fix(1),lf[334],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3081(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3081,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3084,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[331],C_fix(16),C_fix(2),lf[332],C_SCHEME_TRUE,C_fix(3));}
+
+/* k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3084(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3084,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3087,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[329],C_fix(16),C_fix(2),lf[330],C_SCHEME_TRUE,C_fix(3));}
+
+/* k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3087(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3087,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3090,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[326],C_fix(16),C_SCHEME_FALSE,lf[327],C_SCHEME_TRUE,lf[328]);}
+
+/* k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3090,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3093,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[323],C_fix(16),C_SCHEME_FALSE,lf[324],C_SCHEME_TRUE,lf[325]);}
+
+/* k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3093,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3096,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 809 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[72],C_fix(16),C_SCHEME_FALSE,lf[322],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3096(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3096,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3099,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[320],C_fix(16),C_SCHEME_FALSE,lf[321],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3099(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3099,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3102,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[318],C_fix(16),C_SCHEME_FALSE,lf[319],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3102(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3102,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3105,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[316],C_fix(16),C_SCHEME_FALSE,lf[317],C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3105,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3108,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_4031,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 814 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[315],C_fix(8),t3);}
+
+/* a4030 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4031(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_4031,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(3));
+if(C_truep(t7)){
+t8=(C_word)C_i_caddr(t5);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4069,a[2]=t1,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t10=(C_word)C_slot(t8,C_fix(1));
+t11=(C_word)C_eqp(lf[49],t10);
+if(C_truep(t11)){
+t12=(C_word)C_slot(t8,C_fix(2));
+t13=(C_word)C_i_car(t12);
+C_trace("c-platform.scm: 827 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[312]))(3,*((C_word*)lf[312]+1),t9,t13);}
+else{
+t12=t5;
+t13=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[313],t12);
+t14=(C_word)C_a_i_list(&a,2,t4,t13);
+t15=t1;
+t16=t15;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[314],t14));}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k4067 in a4030 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4069(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_4069,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[308],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[309],t4));}
+else{
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[310],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[311],t4));}}
+
+/* k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3108(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3108,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3111,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 832 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[305],C_fix(17),C_fix(2),lf[306],lf[307]);}
+
+/* k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3111,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3114,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 833 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[302],C_fix(17),C_fix(2),lf[303],lf[304]);}
+
+/* k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3114(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3114,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3117,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 834 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[300],C_fix(17),C_fix(2),lf[301]);}
+
+/* k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3117(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3117,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3120,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 835 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[298],C_fix(17),C_fix(2),lf[299]);}
+
+/* k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3120(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3120,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3123,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 836 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[295],C_fix(17),C_fix(1),lf[296],lf[297]);}
+
+/* k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3123(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3123,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3126,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 837 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[292],C_fix(17),C_fix(2),lf[293],lf[294]);}
+
+/* k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3126(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3126,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3129,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 838 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[289],C_fix(17),C_fix(2),lf[290],lf[291]);}
+
+/* k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 839 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[286],C_fix(17),C_fix(2),lf[287],lf[288]);}
+
+/* k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3132(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_3132,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3135,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3875,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 841 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[285],C_fix(8),t3);}
+
+/* a3874 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3875(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_3875,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(2),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_cadr(t5);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3901,a[2]=t5,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t10=(C_word)C_slot(t8,C_fix(1));
+t11=(C_word)C_eqp(lf[49],t10);
+if(C_truep(t11)){
+t12=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t8,C_fix(2));
+t14=(C_word)C_i_car(t13);
+if(C_truep(t14)){
+t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3951,a[2]=t8,a[3]=t9,a[4]=t5,a[5]=t14,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_fixnump(t14))){
+t16=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4007,a[2]=t15,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 856 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[284]))(3,*((C_word*)lf[284]+1),t16,t14);}
+else{
+t16=t15;
+f_3951(t16,C_SCHEME_FALSE);}}
+else{
+t15=t9;
+f_3901(t15,C_SCHEME_FALSE);}}
+else{
+t13=t9;
+f_3901(t13,C_SCHEME_FALSE);}}
+else{
+t12=t9;
+f_3901(t12,C_SCHEME_FALSE);}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k4005 in a3874 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_4007(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_3951(t2,(C_word)C_i_not(t1));}
+
+/* k3949 in a3874 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_3951(C_word t0,C_word 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_3951,NULL,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep((C_word)C_fixnum_lessp(((C_word*)t0)[5],C_fix(0)))){
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3977,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_fixnum_negate(((C_word*)t0)[5]);
+C_trace("c-platform.scm: 860 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,t4);}
+else{
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=(C_word)C_a_i_list(&a,2,t2,((C_word*)t0)[2]);
+t4=((C_word*)t0)[3];
+f_3901(t4,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[283],t3));}}
+else{
+t2=((C_word*)t0)[3];
+f_3901(t2,C_SCHEME_FALSE);}}
+
+/* k3975 in k3949 in a3874 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3977,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+t3=((C_word*)t0)[2];
+f_3901(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[282],t2));}
+
+/* k3899 in a3874 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_3901(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_3901,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[277],t3));}
+else{
+t2=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[2];
+t4=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[278],t3);
+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[39],lf[41],lf[279],t5));}
+else{
+t3=(C_word)C_a_i_list(&a,2,lf[280],*((C_word*)lf[9]+1));
+t4=((C_word*)t0)[2];
+t5=(C_word)C_a_i_record(&a,4,lf[39],lf[44],t3,t4);
+t6=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[281],t6));}}}
+
+/* k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3135(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3135,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3138,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 869 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[275],C_fix(17),C_fix(2),lf[276]);}
+
+/* k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3138,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3141,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 870 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[273],C_fix(17),C_fix(3),lf[274]);}
+
+/* k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3141(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3141,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3144,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 871 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[271],C_fix(17),C_fix(2),lf[272]);}
+
+/* k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3144(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3144,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3147,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 872 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[269],C_fix(17),C_fix(2),lf[270]);}
+
+/* k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3147(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3147,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3150,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 873 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[267],C_fix(17),C_fix(2),lf[268]);}
+
+/* k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3150(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3150,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3153,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 874 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[265],C_fix(17),C_fix(3),lf[266]);}
+
+/* k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3153(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3153,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3156,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 875 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[263],C_fix(17),C_fix(3),lf[264]);}
+
+/* k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3156(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3156,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3159,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[261],C_fix(17),C_fix(3),lf[262]);}
+
+/* k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3159,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3162,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[259],C_fix(17),C_fix(1),lf[260]);}
+
+/* k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3162(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3162,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3165,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 878 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[256],C_fix(17),C_fix(2),lf[257],lf[258]);}
+
+/* k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3165(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3165,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3168,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[254],C_fix(17),C_fix(2),lf[255]);}
+
+/* k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3168(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3168,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3171,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[252],C_fix(17),C_fix(1),lf[253]);}
+
+/* k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3171(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3171,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3174,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[250],C_fix(17),C_fix(1),lf[251]);}
+
+/* k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3174(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3174,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3177,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[248],C_fix(17),C_fix(1),lf[249]);}
+
+/* k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3177(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3177,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3180,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[246],C_fix(17),C_fix(1),lf[247]);}
+
+/* k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3180,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3183,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[244],C_fix(17),C_fix(1),lf[245]);}
+
+/* k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3183(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3183,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3186,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[241],C_fix(17),C_fix(1),lf[242],lf[243]);}
+
+/* k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3186,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3189,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 886 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[238],C_fix(17),C_fix(1),lf[239],lf[240]);}
+
+/* k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3189(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3189,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3192,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[236],C_fix(17),C_fix(1),lf[237]);}
+
+/* k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3192,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3195,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[234],C_fix(17),C_fix(1),lf[235]);}
+
+/* k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3195(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3195,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3198,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[232],C_fix(17),C_fix(2),lf[233]);}
+
+/* k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3198(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3198,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3201,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[230],C_fix(17),C_fix(1),lf[231]);}
+
+/* k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3201(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3201,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3204,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[228],C_fix(17),C_fix(1),lf[229]);}
+
+/* k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3207,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 892 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[226],C_fix(17),C_fix(1),lf[227]);}
+
+/* k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3207(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3207,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3210,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 893 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[224],C_fix(17),C_fix(1),lf[225]);}
+
+/* k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3210(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3210,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3213,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[222],C_fix(17),C_fix(2),lf[223]);}
+
+/* k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3213(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3213,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3216,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[220],C_fix(17),C_fix(1),lf[221]);}
+
+/* k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3216(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3216,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3219,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[218],C_fix(17),C_fix(1),lf[219]);}
+
+/* k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3219(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3219,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3222,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[216],C_fix(17),C_fix(1),lf[217]);}
+
+/* k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3222(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3222,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3225,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[214],C_fix(17),C_fix(1),lf[215]);}
+
+/* k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3225(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3225,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3228,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[76]))(6,*((C_word*)lf[76]+1),t2,lf[212],C_fix(17),C_fix(2),lf[213]);}
+
+/* k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3228(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3228,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3231,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 901 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[210],C_fix(2),C_fix(1),lf[211],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3231(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3231,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3234,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 903 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[208],C_fix(2),C_fix(2),lf[209],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3234(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3234,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3237,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 904 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[206],C_fix(2),C_fix(2),lf[207],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3237(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3240,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 905 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[204],C_fix(2),C_fix(2),lf[205],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3243,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 906 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[202],C_fix(2),C_fix(2),lf[203],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3243,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3246,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 908 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[200],C_fix(16),C_fix(2),lf[201],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3246,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3249,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 909 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[198],C_fix(16),C_fix(2),lf[199],C_SCHEME_FALSE,*((C_word*)lf[9]+1));}
+
+/* k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3249(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3249,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3252,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 911 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[76]))(9,*((C_word*)lf[76]+1),t2,lf[195],C_fix(22),C_fix(2),lf[196],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[197]);}
+
+/* k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3252(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3252,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3255,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 912 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[76]))(9,*((C_word*)lf[76]+1),t2,lf[192],C_fix(22),C_fix(2),lf[193],C_SCHEME_FALSE,*((C_word*)lf[9]+1),lf[194]);}
+
+/* k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3255(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3255,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3258,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 914 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[190],C_fix(2),C_fix(3),lf[191],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3258(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3258,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3261,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[188],C_fix(2),C_fix(3),lf[189],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3261,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3264,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[186],C_fix(2),C_fix(3),lf[187],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3264,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3267,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 917 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[184],C_fix(2),C_fix(3),lf[185],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3267(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3267,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3270,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 918 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[182],C_fix(2),C_fix(3),lf[183],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3270(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3270,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3273,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 919 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[180],C_fix(2),C_fix(3),lf[181],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3273(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3273,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3276,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 920 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[178],C_fix(2),C_fix(3),lf[179],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3276,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3279,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 921 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[176],C_fix(2),C_fix(3),lf[177],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3279(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3279,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3282,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 923 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[174],C_fix(2),C_fix(1),lf[175],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3282(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3282,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3285,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 924 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[172],C_fix(2),C_fix(1),lf[173],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3285(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3285,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3288,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 925 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[170],C_fix(2),C_fix(1),lf[171],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3288(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3288,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3291,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 926 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[168],C_fix(2),C_fix(1),lf[169],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3291(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3291,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3294,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 927 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[166],C_fix(2),C_fix(1),lf[167],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3294(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3294,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3297,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 928 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[164],C_fix(2),C_fix(1),lf[165],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3297(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3297,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3300,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 929 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[162],C_fix(2),C_fix(1),lf[163],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3300,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3303,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 930 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[160],C_fix(2),C_fix(1),lf[161],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3303(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3306,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 932 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[158],C_fix(17),C_fix(1),lf[159]);}
+
+/* k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3306(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3306,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3309,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 933 rewrite");
+((C_proc6)C_retrieve_symbol_proc(lf[76]))(6,*((C_word*)lf[76]+1),t2,lf[156],C_fix(17),C_fix(1),lf[157]);}
+
+/* k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3309(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3309,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3312,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[76]))(7,*((C_word*)lf[76]+1),t2,lf[153],C_fix(17),C_fix(1),lf[154],lf[155]);}
+
+/* k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3312(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3312,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3315,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 936 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[151],C_fix(7),C_fix(1),lf[152],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3315(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3315,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3318,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 937 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[149],C_fix(7),C_fix(1),lf[150],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3318(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3318,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3321,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 938 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[147],C_fix(7),C_fix(1),lf[148],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3321(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3321,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3324,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 939 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[145],C_fix(7),C_fix(1),lf[146],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3324,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3327,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 940 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[143],C_fix(7),C_fix(1),lf[144],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3327(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3327,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3330,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 941 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[141],C_fix(7),C_fix(1),lf[142],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3330(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3330,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3333,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 942 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[139],C_fix(7),C_fix(1),lf[140],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3333(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3336,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[76]))(8,*((C_word*)lf[76]+1),t2,lf[137],C_fix(7),C_fix(1),lf[138],C_fix(1),C_SCHEME_FALSE);}
+
+/* k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3336(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_3336,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3338,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3473,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 971 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[136],C_fix(8),t2);}
+
+/* k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3473(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3473,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3476,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 972 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[135],C_fix(8),((C_word*)t0)[2]);}
+
+/* k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3476(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3476,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3479,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 974 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[133],C_fix(7),C_fix(1),lf[134],C_fix(10),C_SCHEME_FALSE);}
+
+/* k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3479(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3479,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3482,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 975 rewrite");
+((C_proc8)C_retrieve_symbol_proc(lf[76]))(8,*((C_word*)lf[76]+1),t2,lf[131],C_fix(20),C_fix(2),lf[132],C_fix(10),C_SCHEME_FALSE);}
+
+/* k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3484,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3626,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 997 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t3,lf[75],C_fix(8),t2);}
+
+/* k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3626(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3626,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3629,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 998 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[130],C_fix(8),((C_word*)t0)[2]);}
+
+/* k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3629(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_3629,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3633,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3795,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1028 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[129],C_fix(8),t3);}
+
+/* a3794 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3795(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_3795,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(1),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(C_word)C_slot(t8,C_fix(1));
+t10=(C_word)C_eqp(lf[50],t9);
+if(C_truep(t10)){
+t11=(C_word)C_slot(t8,C_fix(2));
+t12=(C_word)C_i_car(t11);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3825,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[63]))(4,*((C_word*)lf[63]+1),t13,t12,lf[64]);}
+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);}}
+
+/* k3823 in a3794 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3825(C_word c,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_3825,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_assq(((C_word*)t0)[4],lf[127]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3847,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cdr(t2);
+C_trace("c-platform.scm: 1040 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+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);}}
+
+/* k3845 in k3823 in a3794 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3847(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_3847,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[128],t2));}
+
+/* k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3633(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3633,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3636,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1042 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[126],C_fix(3),lf[125]);}
+
+/* k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3636(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3636,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3639,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1043 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[124],C_fix(3),lf[125]);}
+
+/* k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3639(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_3639,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3642,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3713,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1045 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[123],C_fix(8),t3);}
+
+/* a3712 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3713(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_3713,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(1),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3739,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3742,a[2]=t1,a[3]=t4,a[4]=t8,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
+t11=(C_word)C_slot(t8,C_fix(1));
+t12=(C_word)C_eqp(lf[50],t11);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3767,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
+t14=(C_word)C_slot(t8,C_fix(2));
+t15=(C_word)C_i_car(t14);
+C_trace("c-platform.scm: 1054 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t13,t2,t15,lf[122]);}
+else{
+t13=t10;
+f_3742(t13,C_SCHEME_FALSE);}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k3765 in a3712 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3767(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_3742(t2,(C_word)C_i_not(t1));}
+
+/* k3740 in a3712 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_3742(C_word t0,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_3742,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("c-platform.scm: 1055 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),((C_word*)t0)[5],C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[120],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[121],t4));}}
+
+/* k3737 in a3712 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3739(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_3739,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[119],t2));}
+
+/* k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3642(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_3642,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3645,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3668,tmp=(C_word)a,a+=2,tmp);
+C_trace("c-platform.scm: 1060 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t2,lf[118],C_fix(8),t3);}
+
+/* a3667 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3668(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_3668,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(2),t6);
+if(C_truep(t7)){
+t8=(C_word)C_eqp(C_retrieve(lf[37]),lf[36]);
+t9=(C_truep(t8)?(C_word)C_a_i_list(&a,1,lf[115]):(C_word)C_a_i_list(&a,1,lf[116]));
+t10=t5;
+t11=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t9,t10);
+t12=(C_word)C_a_i_list(&a,2,t4,t11);
+t13=t1;
+t14=t13;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[117],t12));}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3645,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3648,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1072 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[113],C_fix(23),C_fix(0),lf[114],lf[109]);}
+
+/* k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3648(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3648,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3651,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1073 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[110],C_fix(23),C_fix(1),lf[111],lf[112]);}
+
+/* k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3651(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3651,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3654,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1074 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[107],C_fix(23),C_fix(1),lf[108],lf[109]);}
+
+/* k3652 in k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3654(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3654,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3657,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1075 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[76]))(9,*((C_word*)lf[76]+1),t2,lf[105],C_fix(23),C_fix(2),lf[106],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
+
+/* k3655 in k3652 in k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3657(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3657,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3660,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1076 rewrite");
+((C_proc9)C_retrieve_symbol_proc(lf[76]))(9,*((C_word*)lf[76]+1),t2,lf[103],C_fix(23),C_fix(2),lf[104],C_fix(0),C_fix(0),C_SCHEME_FALSE);}
+
+/* k3658 in k3655 in k3652 in k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1077 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[101],C_fix(23),C_fix(2),lf[102],C_fix(0));}
+
+/* k3661 in k3658 in k3655 in k3652 in k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[3],*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_3666,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 1078 rewrite");
+((C_proc7)C_retrieve_symbol_proc(lf[76]))(7,*((C_word*)lf[76]+1),t2,lf[99],C_fix(23),C_fix(2),lf[100],C_fix(0));}
+
+/* k3664 in k3661 in k3658 in k3655 in k3652 in k3649 in k3646 in k3643 in k3640 in k3637 in k3634 in k3631 in k3627 in k3624 in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3666(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 k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3484(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_3484,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(1),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(C_word)C_slot(t8,C_fix(1));
+t10=(C_word)C_eqp(lf[50],t9);
+if(C_truep(t10)){
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3503,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=t8,tmp=(C_word)a,a+=6,tmp);
+t12=(C_word)C_slot(t8,C_fix(2));
+t13=(C_word)C_i_car(t12);
+C_trace("c-platform.scm: 983 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t11,t2,t13,lf[89]);}
+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);}}
+
+/* k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3503(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3503,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_eqp(lf[78],t3);
+if(C_truep(t4)){
+t5=t1;
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=(C_word)C_i_caddr(t6);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3520,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: 986 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+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);}}
+
+/* a3519 in k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3520(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_3520,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t3,C_fix(2));
+if(C_truep(t5)){
+t6=(C_truep(t4)?t4:(C_word)C_i_cadr(((C_word*)t0)[5]));
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3576,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: 991 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t7,((C_word*)t0)[2],t6,lf[97]);}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k3574 in a3519 in k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3576(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_3576,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_3572,a[2]=((C_word*)t0)[2],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: 992 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[96]);}}
+
+/* k3570 in k3574 in a3519 in k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3572(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_3572,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_3568,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: 993 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[95]);}}
+
+/* k3566 in k3570 in k3574 in a3519 in k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3568(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_3568,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_3564,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: 996 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t2,C_SCHEME_FALSE);}}
+
+/* k3562 in k3566 in k3570 in k3574 in a3519 in k3501 in rewrite-call/cc in k3480 in k3477 in k3474 in k3471 in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3564(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_3564,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];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[94],t2));}
+
+/* rewrite-make-vector in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3338(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_3338,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+if(C_truep((C_word)C_i_pairp(t5))){
+t7=(C_word)C_i_car(t5);
+t8=(C_word)C_slot(t7,C_fix(1));
+t9=(C_word)C_eqp(lf[49],t8);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3360,a[2]=t1,a[3]=t4,a[4]=t5,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 953 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[83]))(2,*((C_word*)lf[83]+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);}}
+
+/* k3358 in rewrite-make-vector in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3360(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_3360,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(2));
+t3=(C_word)C_i_car(t2);
+if(C_truep((C_word)C_fixnump(t3))){
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(32)))){
+t4=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t5=(C_word)C_i_pairp(t4);
+t6=(C_truep(t5)?(C_word)C_i_cadr(((C_word*)t0)[4]):(C_word)C_a_i_record(&a,4,lf[39],lf[90],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));
+t7=(C_word)C_a_i_list(&a,1,t1);
+t8=(C_word)C_fixnum_increase(t3);
+t9=(C_word)C_a_i_list(&a,2,lf[91],t8);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3424,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_3426,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("c-platform.scm: 970 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[93]))(4,*((C_word*)lf[93]+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);}}
+
+/* a3425 in k3358 in rewrite-make-vector in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3426(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_3426,3,t0,t1,t2);}
+C_trace("c-platform.scm: 970 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t1,((C_word*)t0)[2]);}
+
+/* k3422 in k3358 in rewrite-make-vector in k3334 in k3331 in k3328 in k3325 in k3322 in k3319 in k3316 in k3313 in k3310 in k3307 in k3304 in k3301 in k3298 in k3295 in k3292 in k3289 in k3286 in k3283 in k3280 in k3277 in k3274 in k3271 in k3268 in k3265 in k3262 in k3259 in k3256 in k3253 in k3250 in k3247 in k3244 in k3241 in k3238 in k3235 in k3232 in k3229 in k3226 in k3223 in k3220 in k3217 in k3214 in k3211 in k3208 in k3205 in k3202 in k3199 in k3196 in k3193 in k3190 in k3187 in k3184 in k3181 in k3178 in k3175 in k3172 in k3169 in k3166 in k3163 in k3160 in k3157 in k3154 in k3151 in k3148 in k3145 in k3142 in k3139 in k3136 in k3133 in k3130 in k3127 in k3124 in k3121 in k3118 in k3115 in k3112 in k3109 in k3106 in k3103 in k3100 in k3097 in k3094 in k3091 in k3088 in k3085 in k3082 in k3079 in k3076 in k3073 in k3070 in k3067 in k3064 in k3061 in k3058 in k3055 in k3052 in k3049 in k3046 in k3043 in k3040 in k3037 in k3034 in k3031 in k3028 in k3025 in k3022 in k3019 in k3016 in k3013 in k3010 in k3007 in k3004 in k3001 in k2998 in k2995 in k2992 in k2989 in k2986 in k2983 in k2980 in k2977 in k2974 in k2971 in k2968 in k2965 in k2962 in k2959 in k2956 in k2953 in k2950 in k2947 in k2944 in k2941 in k2938 in k2935 in k2932 in k2929 in k2926 in k2923 in k2920 in k2917 in k2914 in k2911 in k2908 in k2905 in k2902 in k2899 in k2896 in k2893 in k2890 in k2887 in k2884 in k2881 in k2878 in k2875 in k2872 in k2869 in k2866 in k2863 in k2860 in k2857 in k2854 in k2851 in k2848 in k2845 in k2842 in k2839 in k2836 in k2833 in k2830 in k2827 in k2824 in k2821 in k2818 in k2815 in k2812 in k2809 in k2806 in k2803 in k2800 in k2797 in k2794 in k2791 in k2788 in k2785 in k2782 in k2779 in k2776 in k2773 in k2770 in k2767 in k2764 in k2761 in k2758 in k2755 in k2752 in k2749 in k2746 in k2743 in k2740 in k2737 in k2734 in k2731 in k2728 in k2725 in k2722 in k2719 in k2716 in k2713 in k2710 in k2707 in k2704 in k2701 in k2698 in k2695 in k2692 in k2689 in k2686 in k2683 in k2680 in k2677 in k2674 in k2671 in k2668 in k2665 in k2662 in k2659 in k2656 in k2653 in k2650 in k2647 in k2644 in k2641 in k2638 in k2635 in k2632 in k2629 in k2626 in k2623 in k2620 in k2617 in k2614 in k2611 in k2608 in k2605 in k2602 in k2599 in k2596 in k2593 in k2590 in k2587 in k2584 in k2581 in k2578 in k2575 in k2572 in k2569 in k2566 in k2563 in k2560 in k2557 in k2554 in k2551 in k2548 in k2545 in k2542 in k2539 in k2536 in k2533 in k2530 in k2527 in k2524 in k2521 in k2518 in k2515 in k2512 in k2509 in k2506 in k2503 in k2500 in k2497 in k2494 in k2491 in k2488 in k2485 in k2482 in k2479 in k2476 in k2473 in k2470 in k2467 in k2464 in k2461 in k2458 in k2455 in k2452 in k2449 in k2446 in k2443 in k2440 in k2437 in k2434 in k2431 in k2428 in k2425 in k2422 in k2419 in k2416 in k2413 in k2410 in k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2284 in k2281 in k2278 in k2275 in k2272 in k2269 in k2266 in k2263 in k2260 in k2257 in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_3424(C_word c,C_word t0,C_word 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_3424,2,t0,t1);}
+t2=(C_word)C_a_i_record(&a,4,lf[39],lf[44],((C_word*)t0)[6],t1);
+t3=(C_word)C_a_i_list(&a,2,((C_word*)t0)[5],t2);
+t4=(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[92],t3);
+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[39],lf[81],((C_word*)t0)[2],t5));}
+
+/* rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2039(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_2039,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(C_fix(2),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(C_word)C_i_cadr(t5);
+t10=(C_word)C_slot(t8,C_fix(1));
+t11=(C_word)C_eqp(lf[50],t10);
+if(C_truep(t11)){
+t12=(C_word)C_slot(t9,C_fix(1));
+t13=(C_word)C_eqp(lf[50],t12);
+if(C_truep(t13)){
+t14=(C_word)C_slot(t9,C_fix(2));
+t15=(C_word)C_i_car(t14);
+if(C_truep(t15)){
+t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2073,a[2]=t1,a[3]=t8,a[4]=t4,a[5]=t9,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 479 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t16,t2,t15,lf[89]);}
+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);}}
+
+/* k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2073(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_2073,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_eqp(lf[78],t3);
+if(C_truep(t4)){
+t5=t1;
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=(C_word)C_i_caddr(t6);
+if(C_truep((C_word)C_i_listp(t7))){
+t8=t1;
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=(C_word)C_i_caddr(t9);
+t11=(C_word)C_i_length(t10);
+t12=(C_word)C_eqp(C_fix(2),t11);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2100,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: 484 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[83]))(2,*((C_word*)lf[83]+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);}}
+
+/* k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2100(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_2100,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,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]=t1,tmp=(C_word)a,a+=8,tmp);
+C_trace("c-platform.scm: 485 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t2,lf[88]);}
+
+/* k2101 in k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2103(C_word c,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_2103,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2106,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_word)C_slot(t3,C_fix(2));
+C_trace("c-platform.scm: 486 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[85]))(5,*((C_word*)lf[85]+1),t2,lf[86],lf[87],t4);}
+
+/* k2104 in k2101 in k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2106,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2177,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: 491 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[83]))(3,*((C_word*)lf[83]+1),t3,lf[84]);}
+
+/* k2175 in k2104 in k2101 in k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2177(C_word c,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_2177,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[8]);
+t3=(C_word)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_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]=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: 494 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t4,((C_word*)t0)[8]);}
+
+/* k2171 in k2175 in k2104 in k2101 in k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 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_2173,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[8],((C_word*)t0)[7],t1);
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[79],t2);
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=(C_word)C_a_i_record(&a,4,lf[39],lf[78],((C_word*)t0)[6],t4);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2148,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: 497 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[82]))(3,*((C_word*)lf[82]+1),t6,((C_word*)t0)[2]);}
+
+/* k2146 in k2171 in k2175 in k2104 in k2101 in k2098 in k2071 in rewrite-c-w-v in k2035 in k2032 in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2148(C_word c,C_word t0,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_2148,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[39],lf[41],lf[80],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[81],((C_word*)t0)[2],t4));}
+
+/* rvalues in k2005 in k2002 in k1999 in k1996 in k1993 in k1990 in k1987 in k1984 in k1981 in k1978 in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_2008(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_2008,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(1));
+if(C_truep(t7)){
+t8=(C_word)C_a_i_cons(&a,2,t4,t5);
+t9=t1;
+t10=t9;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[77],t8));}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1844(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_1844,NULL,5,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1850,a[2]=t3,a[3]=t4,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 424 rewrite");
+((C_proc5)C_retrieve_symbol_proc(lf[76]))(5,*((C_word*)lf[76]+1),t1,t2,C_fix(8),t6);}
+
+/* a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1850(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_1850,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(1));
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1862,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: 431 call-with-current-continuation");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[75]+1)))(3,*((C_word*)lf[75]+1),t1,t8);}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* a1861 in a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1862(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_1862,3,t0,t1,t2);}
+t3=(C_word)C_i_car(((C_word*)t0)[7]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1882,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_1885,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_word)C_slot(t3,C_fix(1));
+t7=(C_word)C_eqp(lf[50],t6);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1951,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t9=(C_word)C_slot(t3,C_fix(2));
+t10=(C_word)C_i_car(t9);
+C_trace("c-platform.scm: 439 get");
+((C_proc5)C_retrieve_symbol_proc(lf[73]))(5,*((C_word*)lf[73]+1),t8,((C_word*)t0)[2],t10,lf[74]);}
+else{
+t8=t5;
+f_1885(t8,C_SCHEME_FALSE);}}
+
+/* k1949 in a1861 in a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1951(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_1885(t2,(C_word)C_eqp(lf[72],t1));}
+
+/* k1883 in a1861 in a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1885(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_1885,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_truep(C_retrieve(lf[38]))?lf[67]:lf[68]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1905,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: 445 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t3,((C_word*)t0)[7]);}
+else{
+t2=(C_truep(C_retrieve(lf[38]))?((C_word*)t0)[6]:C_SCHEME_FALSE);
+if(C_truep(t2)){
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[6]);
+t4=((C_word*)t0)[5];
+t5=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t3,t4);
+t6=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[70],t6));}
+else{
+if(C_truep(((C_word*)t0)[4])){
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+t4=((C_word*)t0)[5];
+t5=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t3,t4);
+t6=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[71],t6));}
+else{
+C_trace("c-platform.scm: 448 return");
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_SCHEME_FALSE);}}}}
+
+/* k1903 in k1883 in a1861 in a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1905(C_word c,C_word t0,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_1905,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[39],lf[40],((C_word*)t0)[4],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[69],t4));}
+
+/* k1880 in a1861 in a1849 in rewrite-c..r in k1840 in k1837 in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1882(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_1882,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[66],t2));}
+
+/* rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1625(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_1625,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_i_pairp(t5))){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1635,a[2]=t4,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("c-platform.scm: 397 last");
+((C_proc3)C_retrieve_symbol_proc(lf[65]))(3,*((C_word*)lf[65]+1),t6,t5);}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1635(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_1635,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=t1;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_eqp(lf[49],t4);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1656,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t7=(C_word)C_i_car(((C_word*)t0)[4]);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1664,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_1724,a[2]=t1,a[3]=t8,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 404 butlast");
+((C_proc3)C_retrieve_symbol_proc(lf[55]))(3,*((C_word*)lf[55]+1),t9,((C_word*)t0)[4]);}
+else{
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1727,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_word)C_slot(t2,C_fix(1));
+t8=(C_word)C_eqp(lf[50],t7);
+if(C_truep(t8)){
+t9=(C_word)C_i_length(((C_word*)t0)[4]);
+t10=(C_word)C_eqp(C_fix(2),t9);
+if(C_truep(t10)){
+t11=(C_word)C_slot(t2,C_fix(2));
+t12=(C_word)C_i_car(t11);
+if(C_truep((C_truep((C_word)C_eqp(t12,lf[59]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t12,lf[60]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1780,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[63]))(4,*((C_word*)lf[63]+1),t13,t12,lf[64]);}
+else{
+t13=t6;
+f_1727(t13,C_SCHEME_FALSE);}}
+else{
+t11=t6;
+f_1727(t11,C_SCHEME_FALSE);}}
+else{
+t9=t6;
+f_1727(t9,C_SCHEME_FALSE);}}}
+
+/* k1778 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+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 ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1780,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_a_i_record(&a,4,lf[39],lf[57],lf[61],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t4=(C_word)C_a_i_list(&a,3,t2,((C_word*)t0)[3],t3);
+t5=((C_word*)t0)[2];
+f_1727(t5,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[62],t4));}
+else{
+t2=((C_word*)t0)[2];
+f_1727(t2,C_SCHEME_FALSE);}}
+
+/* k1725 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1727(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_1727,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_1742,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[57],lf[58],C_SCHEME_END_OF_LIST);
+C_trace("c-platform.scm: 417 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[53]))(5,*((C_word*)lf[53]+1),t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k1740 in k1725 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1742(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_1742,2,t0,t1);}
+t2=((C_word*)t0)[2];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[56],t1));}
+
+/* k1722 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1724(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_1724,2,t0,t1);}
+t2=(C_word)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_1672,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t8=((C_word*)t0)[2];
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=(C_word)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_1678,a[2]=t4,a[3]=t12,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t14=((C_word*)t12)[1];
+f_1678(t14,t7,t10);}
+
+/* loop433 in k1722 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1678(C_word t0,C_word 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_1678,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[46]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1707,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));
+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);}}
+
+/* k1705 in loop433 in k1722 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1707(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_1707,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));
+C_trace("loop433446");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_1678(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));
+C_trace("loop433446");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_1678(t6,((C_word*)t0)[3],t5);}}
+
+/* k1670 in k1722 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1672(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-platform.scm: 404 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[54]+1)))(4,*((C_word*)lf[54]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k1662 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1664(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("c-platform.scm: 402 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[53]))(5,*((C_word*)lf[53]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k1654 in k1633 in rewrite-apply in k1621 in k1618 in k1615 in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1656(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_1656,2,t0,t1);}
+t2=((C_word*)t0)[2];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[52],t1));}
+
+/* eqv?-id in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1427(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_1427,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(2));
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t5);
+t9=(C_word)C_i_cadr(t5);
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1443,a[2]=t8,a[3]=t9,a[4]=t4,a[5]=t5,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t11=(C_word)C_slot(t8,C_fix(1));
+t12=(C_word)C_eqp(lf[50],t11);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t9,C_fix(1));
+t14=(C_word)C_eqp(lf[50],t13);
+if(C_truep(t14)){
+t15=(C_word)C_slot(t8,C_fix(2));
+t16=(C_word)C_slot(t9,C_fix(2));
+if(C_truep((C_word)C_i_equalp(t15,t16))){
+t17=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1574,a[2]=t10,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("c-platform.scm: 353 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t17,C_SCHEME_TRUE);}
+else{
+t17=t10;
+f_1443(t17,C_SCHEME_FALSE);}}
+else{
+t15=t10;
+f_1443(t15,C_SCHEME_FALSE);}}
+else{
+t13=t10;
+f_1443(t13,C_SCHEME_FALSE);}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k1572 in eqv?-id in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1574(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_1574,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],t1);
+t3=((C_word*)t0)[2];
+f_1443(t3,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[51],t2));}
+
+/* k1441 in eqv?-id in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1443(C_word t0,C_word t1){
+C_word 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_1443,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_1452,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_word)C_slot(((C_word*)t0)[2],C_fix(1));
+t4=(C_word)C_eqp(lf[49],t3);
+if(C_truep(t4)){
+t5=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t6=(C_word)C_i_car(t5);
+t7=(C_word)C_i_flonump(t6);
+t8=t2;
+f_1452(t8,(C_word)C_i_not(t7));}
+else{
+t5=t2;
+f_1452(t5,C_SCHEME_FALSE);}}}
+
+/* k1450 in k1441 in eqv?-id in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1452(C_word t0,C_word t1){
+C_word 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_1452,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1455,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_1455(t3,t1);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
+t4=(C_word)C_eqp(lf[49],t3);
+if(C_truep(t4)){
+t5=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t6=(C_word)C_i_car(t5);
+t7=(C_word)C_i_flonump(t6);
+t8=t2;
+f_1455(t8,(C_word)C_i_not(t7));}
+else{
+t5=t2;
+f_1455(t5,C_SCHEME_FALSE);}}}
+
+/* k1453 in k1450 in k1441 in eqv?-id in k1423 in k1420 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1455(C_word t0,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_1455,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_record(&a,4,lf[39],lf[40],lf[47],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[48],t4));}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* op1 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_fcall f_1347(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_1347,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_1349,a[2]=t4,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp));}
+
+/* f_1349 in op1 in k1343 in k1340 in k1337 in k1334 in k1331 in k1328 in k1304 in k1301 */
+static void C_ccall f_1349(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_1349,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_eqp(t6,C_fix(1));
+if(C_truep(t7)){
+t8=(C_word)C_eqp(lf[36],C_retrieve(lf[37]));
+if(C_truep(t8)){
+if(C_truep(C_retrieve(lf[38]))){
+t9=((C_word*)t0)[4];
+t10=(C_word)C_a_i_list(&a,1,t9);
+t11=t5;
+t12=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t10,t11);
+t13=(C_word)C_a_i_list(&a,2,t4,t12);
+t14=t1;
+t15=t14;
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[42],t13));}
+else{
+t9=((C_word*)t0)[3];
+t10=(C_word)C_a_i_list(&a,1,t9);
+t11=t5;
+t12=(C_word)C_a_i_record(&a,4,lf[39],lf[40],t10,t11);
+t13=(C_word)C_a_i_list(&a,2,t4,t12);
+t14=t1;
+t15=t14;
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,(C_word)C_a_i_record(&a,4,lf[39],lf[41],lf[43],t13));}}
+else{
+t9=(C_word)C_a_i_list(&a,2,((C_word*)t0)[2],C_fix(4));
+t10=(C_word)C_i_car(t5);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1415,a[2]=t1,a[3]=t4,a[4]=t9,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
+C_trace("c-platform.scm: 339 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[46]))(3,*((C_word*)lf[46]+1),t11,C_fix(1));}}
+else{
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}
+
+/* k1413 */
+static void C_ccall f_1415(C_word c,C_word t0,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_1415,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[39],lf[44],((C_word*)t0)[4],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[39],lf[41],lf[45],t4));}
+
+#ifdef C_ENABLE_PTABLES
+static C_PTABLE_ENTRY ptable[503] = {
+{"toplevel:c_platform_scm",(void*)C_platform_toplevel},
+{"f_1303:c_platform_scm",(void*)f_1303},
+{"f_1306:c_platform_scm",(void*)f_1306},
+{"f_4930:c_platform_scm",(void*)f_4930},
+{"f_1330:c_platform_scm",(void*)f_1330},
+{"f_1333:c_platform_scm",(void*)f_1333},
+{"f_4753:c_platform_scm",(void*)f_4753},
+{"f_4894:c_platform_scm",(void*)f_4894},
+{"f_4757:c_platform_scm",(void*)f_4757},
+{"f_4825:c_platform_scm",(void*)f_4825},
+{"f_4832:c_platform_scm",(void*)f_4832},
+{"f_4848:c_platform_scm",(void*)f_4848},
+{"f_4823:c_platform_scm",(void*)f_4823},
+{"f_4779:c_platform_scm",(void*)f_4779},
+{"f_1336:c_platform_scm",(void*)f_1336},
+{"f_4603:c_platform_scm",(void*)f_4603},
+{"f_4705:c_platform_scm",(void*)f_4705},
+{"f_4703:c_platform_scm",(void*)f_4703},
+{"f_4674:c_platform_scm",(void*)f_4674},
+{"f_4672:c_platform_scm",(void*)f_4672},
+{"f_1339:c_platform_scm",(void*)f_1339},
+{"f_4444:c_platform_scm",(void*)f_4444},
+{"f_4561:c_platform_scm",(void*)f_4561},
+{"f_4559:c_platform_scm",(void*)f_4559},
+{"f_4484:c_platform_scm",(void*)f_4484},
+{"f_4491:c_platform_scm",(void*)f_4491},
+{"f_4507:c_platform_scm",(void*)f_4507},
+{"f_4482:c_platform_scm",(void*)f_4482},
+{"f_1342:c_platform_scm",(void*)f_1342},
+{"f_4326:c_platform_scm",(void*)f_4326},
+{"f_4429:c_platform_scm",(void*)f_4429},
+{"f_4361:c_platform_scm",(void*)f_4361},
+{"f_4381:c_platform_scm",(void*)f_4381},
+{"f_1345:c_platform_scm",(void*)f_1345},
+{"f_4324:c_platform_scm",(void*)f_4324},
+{"f_1422:c_platform_scm",(void*)f_1422},
+{"f_4320:c_platform_scm",(void*)f_4320},
+{"f_1425:c_platform_scm",(void*)f_1425},
+{"f_1617:c_platform_scm",(void*)f_1617},
+{"f_1620:c_platform_scm",(void*)f_1620},
+{"f_4103:c_platform_scm",(void*)f_4103},
+{"f_4276:c_platform_scm",(void*)f_4276},
+{"f_4119:c_platform_scm",(void*)f_4119},
+{"f_4221:c_platform_scm",(void*)f_4221},
+{"f_4152:c_platform_scm",(void*)f_4152},
+{"f_4188:c_platform_scm",(void*)f_4188},
+{"f_4155:c_platform_scm",(void*)f_4155},
+{"f_4125:c_platform_scm",(void*)f_4125},
+{"f_1623:c_platform_scm",(void*)f_1623},
+{"f_1839:c_platform_scm",(void*)f_1839},
+{"f_1842:c_platform_scm",(void*)f_1842},
+{"f_1980:c_platform_scm",(void*)f_1980},
+{"f_1983:c_platform_scm",(void*)f_1983},
+{"f_1986:c_platform_scm",(void*)f_1986},
+{"f_1989:c_platform_scm",(void*)f_1989},
+{"f_1992:c_platform_scm",(void*)f_1992},
+{"f_1995:c_platform_scm",(void*)f_1995},
+{"f_1998:c_platform_scm",(void*)f_1998},
+{"f_2001:c_platform_scm",(void*)f_2001},
+{"f_2004:c_platform_scm",(void*)f_2004},
+{"f_2007:c_platform_scm",(void*)f_2007},
+{"f_2034:c_platform_scm",(void*)f_2034},
+{"f_2037:c_platform_scm",(void*)f_2037},
+{"f_2259:c_platform_scm",(void*)f_2259},
+{"f_2262:c_platform_scm",(void*)f_2262},
+{"f_2265:c_platform_scm",(void*)f_2265},
+{"f_2268:c_platform_scm",(void*)f_2268},
+{"f_2271:c_platform_scm",(void*)f_2271},
+{"f_2274:c_platform_scm",(void*)f_2274},
+{"f_2277:c_platform_scm",(void*)f_2277},
+{"f_2280:c_platform_scm",(void*)f_2280},
+{"f_2283:c_platform_scm",(void*)f_2283},
+{"f_2286:c_platform_scm",(void*)f_2286},
+{"f_2289:c_platform_scm",(void*)f_2289},
+{"f_2292:c_platform_scm",(void*)f_2292},
+{"f_2295:c_platform_scm",(void*)f_2295},
+{"f_2298:c_platform_scm",(void*)f_2298},
+{"f_2301:c_platform_scm",(void*)f_2301},
+{"f_2304:c_platform_scm",(void*)f_2304},
+{"f_2307:c_platform_scm",(void*)f_2307},
+{"f_2310:c_platform_scm",(void*)f_2310},
+{"f_2313:c_platform_scm",(void*)f_2313},
+{"f_2316:c_platform_scm",(void*)f_2316},
+{"f_2319:c_platform_scm",(void*)f_2319},
+{"f_2322:c_platform_scm",(void*)f_2322},
+{"f_2325:c_platform_scm",(void*)f_2325},
+{"f_2328:c_platform_scm",(void*)f_2328},
+{"f_2331:c_platform_scm",(void*)f_2331},
+{"f_2334:c_platform_scm",(void*)f_2334},
+{"f_2337:c_platform_scm",(void*)f_2337},
+{"f_2340:c_platform_scm",(void*)f_2340},
+{"f_2343:c_platform_scm",(void*)f_2343},
+{"f_2346:c_platform_scm",(void*)f_2346},
+{"f_2349:c_platform_scm",(void*)f_2349},
+{"f_2352:c_platform_scm",(void*)f_2352},
+{"f_2355:c_platform_scm",(void*)f_2355},
+{"f_2358:c_platform_scm",(void*)f_2358},
+{"f_2361:c_platform_scm",(void*)f_2361},
+{"f_2364:c_platform_scm",(void*)f_2364},
+{"f_2367:c_platform_scm",(void*)f_2367},
+{"f_2370:c_platform_scm",(void*)f_2370},
+{"f_2373:c_platform_scm",(void*)f_2373},
+{"f_2376:c_platform_scm",(void*)f_2376},
+{"f_2379:c_platform_scm",(void*)f_2379},
+{"f_2382:c_platform_scm",(void*)f_2382},
+{"f_2385:c_platform_scm",(void*)f_2385},
+{"f_2388:c_platform_scm",(void*)f_2388},
+{"f_2391:c_platform_scm",(void*)f_2391},
+{"f_2394:c_platform_scm",(void*)f_2394},
+{"f_2397:c_platform_scm",(void*)f_2397},
+{"f_2400:c_platform_scm",(void*)f_2400},
+{"f_2403:c_platform_scm",(void*)f_2403},
+{"f_2406:c_platform_scm",(void*)f_2406},
+{"f_2409:c_platform_scm",(void*)f_2409},
+{"f_2412:c_platform_scm",(void*)f_2412},
+{"f_2415:c_platform_scm",(void*)f_2415},
+{"f_2418:c_platform_scm",(void*)f_2418},
+{"f_2421:c_platform_scm",(void*)f_2421},
+{"f_2424:c_platform_scm",(void*)f_2424},
+{"f_2427:c_platform_scm",(void*)f_2427},
+{"f_2430:c_platform_scm",(void*)f_2430},
+{"f_2433:c_platform_scm",(void*)f_2433},
+{"f_2436:c_platform_scm",(void*)f_2436},
+{"f_2439:c_platform_scm",(void*)f_2439},
+{"f_2442:c_platform_scm",(void*)f_2442},
+{"f_2445:c_platform_scm",(void*)f_2445},
+{"f_2448:c_platform_scm",(void*)f_2448},
+{"f_2451:c_platform_scm",(void*)f_2451},
+{"f_2454:c_platform_scm",(void*)f_2454},
+{"f_2457:c_platform_scm",(void*)f_2457},
+{"f_2460:c_platform_scm",(void*)f_2460},
+{"f_2463:c_platform_scm",(void*)f_2463},
+{"f_2466:c_platform_scm",(void*)f_2466},
+{"f_2469:c_platform_scm",(void*)f_2469},
+{"f_2472:c_platform_scm",(void*)f_2472},
+{"f_2475:c_platform_scm",(void*)f_2475},
+{"f_2478:c_platform_scm",(void*)f_2478},
+{"f_2481:c_platform_scm",(void*)f_2481},
+{"f_2484:c_platform_scm",(void*)f_2484},
+{"f_2487:c_platform_scm",(void*)f_2487},
+{"f_2490:c_platform_scm",(void*)f_2490},
+{"f_2493:c_platform_scm",(void*)f_2493},
+{"f_2496:c_platform_scm",(void*)f_2496},
+{"f_2499:c_platform_scm",(void*)f_2499},
+{"f_2502:c_platform_scm",(void*)f_2502},
+{"f_2505:c_platform_scm",(void*)f_2505},
+{"f_2508:c_platform_scm",(void*)f_2508},
+{"f_2511:c_platform_scm",(void*)f_2511},
+{"f_2514:c_platform_scm",(void*)f_2514},
+{"f_2517:c_platform_scm",(void*)f_2517},
+{"f_2520:c_platform_scm",(void*)f_2520},
+{"f_2523:c_platform_scm",(void*)f_2523},
+{"f_2526:c_platform_scm",(void*)f_2526},
+{"f_2529:c_platform_scm",(void*)f_2529},
+{"f_2532:c_platform_scm",(void*)f_2532},
+{"f_2535:c_platform_scm",(void*)f_2535},
+{"f_2538:c_platform_scm",(void*)f_2538},
+{"f_2541:c_platform_scm",(void*)f_2541},
+{"f_2544:c_platform_scm",(void*)f_2544},
+{"f_2547:c_platform_scm",(void*)f_2547},
+{"f_2550:c_platform_scm",(void*)f_2550},
+{"f_2553:c_platform_scm",(void*)f_2553},
+{"f_2556:c_platform_scm",(void*)f_2556},
+{"f_2559:c_platform_scm",(void*)f_2559},
+{"f_2562:c_platform_scm",(void*)f_2562},
+{"f_2565:c_platform_scm",(void*)f_2565},
+{"f_2568:c_platform_scm",(void*)f_2568},
+{"f_2571:c_platform_scm",(void*)f_2571},
+{"f_2574:c_platform_scm",(void*)f_2574},
+{"f_2577:c_platform_scm",(void*)f_2577},
+{"f_2580:c_platform_scm",(void*)f_2580},
+{"f_2583:c_platform_scm",(void*)f_2583},
+{"f_2586:c_platform_scm",(void*)f_2586},
+{"f_2589:c_platform_scm",(void*)f_2589},
+{"f_2592:c_platform_scm",(void*)f_2592},
+{"f_2595:c_platform_scm",(void*)f_2595},
+{"f_2598:c_platform_scm",(void*)f_2598},
+{"f_2601:c_platform_scm",(void*)f_2601},
+{"f_2604:c_platform_scm",(void*)f_2604},
+{"f_2607:c_platform_scm",(void*)f_2607},
+{"f_2610:c_platform_scm",(void*)f_2610},
+{"f_2613:c_platform_scm",(void*)f_2613},
+{"f_2616:c_platform_scm",(void*)f_2616},
+{"f_2619:c_platform_scm",(void*)f_2619},
+{"f_2622:c_platform_scm",(void*)f_2622},
+{"f_2625:c_platform_scm",(void*)f_2625},
+{"f_2628:c_platform_scm",(void*)f_2628},
+{"f_2631:c_platform_scm",(void*)f_2631},
+{"f_2634:c_platform_scm",(void*)f_2634},
+{"f_2637:c_platform_scm",(void*)f_2637},
+{"f_2640:c_platform_scm",(void*)f_2640},
+{"f_2643:c_platform_scm",(void*)f_2643},
+{"f_2646:c_platform_scm",(void*)f_2646},
+{"f_2649:c_platform_scm",(void*)f_2649},
+{"f_2652:c_platform_scm",(void*)f_2652},
+{"f_2655:c_platform_scm",(void*)f_2655},
+{"f_2658:c_platform_scm",(void*)f_2658},
+{"f_2661:c_platform_scm",(void*)f_2661},
+{"f_2664:c_platform_scm",(void*)f_2664},
+{"f_2667:c_platform_scm",(void*)f_2667},
+{"f_2670:c_platform_scm",(void*)f_2670},
+{"f_2673:c_platform_scm",(void*)f_2673},
+{"f_2676:c_platform_scm",(void*)f_2676},
+{"f_2679:c_platform_scm",(void*)f_2679},
+{"f_2682:c_platform_scm",(void*)f_2682},
+{"f_2685:c_platform_scm",(void*)f_2685},
+{"f_2688:c_platform_scm",(void*)f_2688},
+{"f_2691:c_platform_scm",(void*)f_2691},
+{"f_2694:c_platform_scm",(void*)f_2694},
+{"f_2697:c_platform_scm",(void*)f_2697},
+{"f_2700:c_platform_scm",(void*)f_2700},
+{"f_2703:c_platform_scm",(void*)f_2703},
+{"f_2706:c_platform_scm",(void*)f_2706},
+{"f_2709:c_platform_scm",(void*)f_2709},
+{"f_2712:c_platform_scm",(void*)f_2712},
+{"f_2715:c_platform_scm",(void*)f_2715},
+{"f_2718:c_platform_scm",(void*)f_2718},
+{"f_2721:c_platform_scm",(void*)f_2721},
+{"f_2724:c_platform_scm",(void*)f_2724},
+{"f_2727:c_platform_scm",(void*)f_2727},
+{"f_2730:c_platform_scm",(void*)f_2730},
+{"f_2733:c_platform_scm",(void*)f_2733},
+{"f_2736:c_platform_scm",(void*)f_2736},
+{"f_2739:c_platform_scm",(void*)f_2739},
+{"f_2742:c_platform_scm",(void*)f_2742},
+{"f_2745:c_platform_scm",(void*)f_2745},
+{"f_2748:c_platform_scm",(void*)f_2748},
+{"f_2751:c_platform_scm",(void*)f_2751},
+{"f_2754:c_platform_scm",(void*)f_2754},
+{"f_2757:c_platform_scm",(void*)f_2757},
+{"f_2760:c_platform_scm",(void*)f_2760},
+{"f_2763:c_platform_scm",(void*)f_2763},
+{"f_2766:c_platform_scm",(void*)f_2766},
+{"f_2769:c_platform_scm",(void*)f_2769},
+{"f_2772:c_platform_scm",(void*)f_2772},
+{"f_2775:c_platform_scm",(void*)f_2775},
+{"f_2778:c_platform_scm",(void*)f_2778},
+{"f_2781:c_platform_scm",(void*)f_2781},
+{"f_2784:c_platform_scm",(void*)f_2784},
+{"f_2787:c_platform_scm",(void*)f_2787},
+{"f_2790:c_platform_scm",(void*)f_2790},
+{"f_2793:c_platform_scm",(void*)f_2793},
+{"f_2796:c_platform_scm",(void*)f_2796},
+{"f_2799:c_platform_scm",(void*)f_2799},
+{"f_2802:c_platform_scm",(void*)f_2802},
+{"f_2805:c_platform_scm",(void*)f_2805},
+{"f_2808:c_platform_scm",(void*)f_2808},
+{"f_2811:c_platform_scm",(void*)f_2811},
+{"f_2814:c_platform_scm",(void*)f_2814},
+{"f_2817:c_platform_scm",(void*)f_2817},
+{"f_2820:c_platform_scm",(void*)f_2820},
+{"f_2823:c_platform_scm",(void*)f_2823},
+{"f_2826:c_platform_scm",(void*)f_2826},
+{"f_2829:c_platform_scm",(void*)f_2829},
+{"f_2832:c_platform_scm",(void*)f_2832},
+{"f_2835:c_platform_scm",(void*)f_2835},
+{"f_2838:c_platform_scm",(void*)f_2838},
+{"f_2841:c_platform_scm",(void*)f_2841},
+{"f_2844:c_platform_scm",(void*)f_2844},
+{"f_2847:c_platform_scm",(void*)f_2847},
+{"f_2850:c_platform_scm",(void*)f_2850},
+{"f_2853:c_platform_scm",(void*)f_2853},
+{"f_2856:c_platform_scm",(void*)f_2856},
+{"f_2859:c_platform_scm",(void*)f_2859},
+{"f_2862:c_platform_scm",(void*)f_2862},
+{"f_2865:c_platform_scm",(void*)f_2865},
+{"f_2868:c_platform_scm",(void*)f_2868},
+{"f_2871:c_platform_scm",(void*)f_2871},
+{"f_2874:c_platform_scm",(void*)f_2874},
+{"f_2877:c_platform_scm",(void*)f_2877},
+{"f_2880:c_platform_scm",(void*)f_2880},
+{"f_2883:c_platform_scm",(void*)f_2883},
+{"f_2886:c_platform_scm",(void*)f_2886},
+{"f_2889:c_platform_scm",(void*)f_2889},
+{"f_2892:c_platform_scm",(void*)f_2892},
+{"f_2895:c_platform_scm",(void*)f_2895},
+{"f_2898:c_platform_scm",(void*)f_2898},
+{"f_2901:c_platform_scm",(void*)f_2901},
+{"f_2904:c_platform_scm",(void*)f_2904},
+{"f_2907:c_platform_scm",(void*)f_2907},
+{"f_2910:c_platform_scm",(void*)f_2910},
+{"f_2913:c_platform_scm",(void*)f_2913},
+{"f_2916:c_platform_scm",(void*)f_2916},
+{"f_2919:c_platform_scm",(void*)f_2919},
+{"f_2922:c_platform_scm",(void*)f_2922},
+{"f_2925:c_platform_scm",(void*)f_2925},
+{"f_2928:c_platform_scm",(void*)f_2928},
+{"f_2931:c_platform_scm",(void*)f_2931},
+{"f_2934:c_platform_scm",(void*)f_2934},
+{"f_2937:c_platform_scm",(void*)f_2937},
+{"f_2940:c_platform_scm",(void*)f_2940},
+{"f_2943:c_platform_scm",(void*)f_2943},
+{"f_2946:c_platform_scm",(void*)f_2946},
+{"f_2949:c_platform_scm",(void*)f_2949},
+{"f_2952:c_platform_scm",(void*)f_2952},
+{"f_2955:c_platform_scm",(void*)f_2955},
+{"f_2958:c_platform_scm",(void*)f_2958},
+{"f_2961:c_platform_scm",(void*)f_2961},
+{"f_2964:c_platform_scm",(void*)f_2964},
+{"f_2967:c_platform_scm",(void*)f_2967},
+{"f_2970:c_platform_scm",(void*)f_2970},
+{"f_2973:c_platform_scm",(void*)f_2973},
+{"f_2976:c_platform_scm",(void*)f_2976},
+{"f_2979:c_platform_scm",(void*)f_2979},
+{"f_2982:c_platform_scm",(void*)f_2982},
+{"f_2985:c_platform_scm",(void*)f_2985},
+{"f_2988:c_platform_scm",(void*)f_2988},
+{"f_2991:c_platform_scm",(void*)f_2991},
+{"f_2994:c_platform_scm",(void*)f_2994},
+{"f_2997:c_platform_scm",(void*)f_2997},
+{"f_3000:c_platform_scm",(void*)f_3000},
+{"f_3003:c_platform_scm",(void*)f_3003},
+{"f_3006:c_platform_scm",(void*)f_3006},
+{"f_3009:c_platform_scm",(void*)f_3009},
+{"f_3012:c_platform_scm",(void*)f_3012},
+{"f_3015:c_platform_scm",(void*)f_3015},
+{"f_3018:c_platform_scm",(void*)f_3018},
+{"f_3021:c_platform_scm",(void*)f_3021},
+{"f_3024:c_platform_scm",(void*)f_3024},
+{"f_3027:c_platform_scm",(void*)f_3027},
+{"f_3030:c_platform_scm",(void*)f_3030},
+{"f_3033:c_platform_scm",(void*)f_3033},
+{"f_3036:c_platform_scm",(void*)f_3036},
+{"f_3039:c_platform_scm",(void*)f_3039},
+{"f_3042:c_platform_scm",(void*)f_3042},
+{"f_3045:c_platform_scm",(void*)f_3045},
+{"f_3048:c_platform_scm",(void*)f_3048},
+{"f_3051:c_platform_scm",(void*)f_3051},
+{"f_3054:c_platform_scm",(void*)f_3054},
+{"f_3057:c_platform_scm",(void*)f_3057},
+{"f_3060:c_platform_scm",(void*)f_3060},
+{"f_3063:c_platform_scm",(void*)f_3063},
+{"f_3066:c_platform_scm",(void*)f_3066},
+{"f_3069:c_platform_scm",(void*)f_3069},
+{"f_3072:c_platform_scm",(void*)f_3072},
+{"f_3075:c_platform_scm",(void*)f_3075},
+{"f_3078:c_platform_scm",(void*)f_3078},
+{"f_3081:c_platform_scm",(void*)f_3081},
+{"f_3084:c_platform_scm",(void*)f_3084},
+{"f_3087:c_platform_scm",(void*)f_3087},
+{"f_3090:c_platform_scm",(void*)f_3090},
+{"f_3093:c_platform_scm",(void*)f_3093},
+{"f_3096:c_platform_scm",(void*)f_3096},
+{"f_3099:c_platform_scm",(void*)f_3099},
+{"f_3102:c_platform_scm",(void*)f_3102},
+{"f_3105:c_platform_scm",(void*)f_3105},
+{"f_4031:c_platform_scm",(void*)f_4031},
+{"f_4069:c_platform_scm",(void*)f_4069},
+{"f_3108:c_platform_scm",(void*)f_3108},
+{"f_3111:c_platform_scm",(void*)f_3111},
+{"f_3114:c_platform_scm",(void*)f_3114},
+{"f_3117:c_platform_scm",(void*)f_3117},
+{"f_3120:c_platform_scm",(void*)f_3120},
+{"f_3123:c_platform_scm",(void*)f_3123},
+{"f_3126:c_platform_scm",(void*)f_3126},
+{"f_3129:c_platform_scm",(void*)f_3129},
+{"f_3132:c_platform_scm",(void*)f_3132},
+{"f_3875:c_platform_scm",(void*)f_3875},
+{"f_4007:c_platform_scm",(void*)f_4007},
+{"f_3951:c_platform_scm",(void*)f_3951},
+{"f_3977:c_platform_scm",(void*)f_3977},
+{"f_3901:c_platform_scm",(void*)f_3901},
+{"f_3135:c_platform_scm",(void*)f_3135},
+{"f_3138:c_platform_scm",(void*)f_3138},
+{"f_3141:c_platform_scm",(void*)f_3141},
+{"f_3144:c_platform_scm",(void*)f_3144},
+{"f_3147:c_platform_scm",(void*)f_3147},
+{"f_3150:c_platform_scm",(void*)f_3150},
+{"f_3153:c_platform_scm",(void*)f_3153},
+{"f_3156:c_platform_scm",(void*)f_3156},
+{"f_3159:c_platform_scm",(void*)f_3159},
+{"f_3162:c_platform_scm",(void*)f_3162},
+{"f_3165:c_platform_scm",(void*)f_3165},
+{"f_3168:c_platform_scm",(void*)f_3168},
+{"f_3171:c_platform_scm",(void*)f_3171},
+{"f_3174:c_platform_scm",(void*)f_3174},
+{"f_3177:c_platform_scm",(void*)f_3177},
+{"f_3180:c_platform_scm",(void*)f_3180},
+{"f_3183:c_platform_scm",(void*)f_3183},
+{"f_3186:c_platform_scm",(void*)f_3186},
+{"f_3189:c_platform_scm",(void*)f_3189},
+{"f_3192:c_platform_scm",(void*)f_3192},
+{"f_3195:c_platform_scm",(void*)f_3195},
+{"f_3198:c_platform_scm",(void*)f_3198},
+{"f_3201:c_platform_scm",(void*)f_3201},
+{"f_3204:c_platform_scm",(void*)f_3204},
+{"f_3207:c_platform_scm",(void*)f_3207},
+{"f_3210:c_platform_scm",(void*)f_3210},
+{"f_3213:c_platform_scm",(void*)f_3213},
+{"f_3216:c_platform_scm",(void*)f_3216},
+{"f_3219:c_platform_scm",(void*)f_3219},
+{"f_3222:c_platform_scm",(void*)f_3222},
+{"f_3225:c_platform_scm",(void*)f_3225},
+{"f_3228:c_platform_scm",(void*)f_3228},
+{"f_3231:c_platform_scm",(void*)f_3231},
+{"f_3234:c_platform_scm",(void*)f_3234},
+{"f_3237:c_platform_scm",(void*)f_3237},
+{"f_3240:c_platform_scm",(void*)f_3240},
+{"f_3243:c_platform_scm",(void*)f_3243},
+{"f_3246:c_platform_scm",(void*)f_3246},
+{"f_3249:c_platform_scm",(void*)f_3249},
+{"f_3252:c_platform_scm",(void*)f_3252},
+{"f_3255:c_platform_scm",(void*)f_3255},
+{"f_3258:c_platform_scm",(void*)f_3258},
+{"f_3261:c_platform_scm",(void*)f_3261},
+{"f_3264:c_platform_scm",(void*)f_3264},
+{"f_3267:c_platform_scm",(void*)f_3267},
+{"f_3270:c_platform_scm",(void*)f_3270},
+{"f_3273:c_platform_scm",(void*)f_3273},
+{"f_3276:c_platform_scm",(void*)f_3276},
+{"f_3279:c_platform_scm",(void*)f_3279},
+{"f_3282:c_platform_scm",(void*)f_3282},
+{"f_3285:c_platform_scm",(void*)f_3285},
+{"f_3288:c_platform_scm",(void*)f_3288},
+{"f_3291:c_platform_scm",(void*)f_3291},
+{"f_3294:c_platform_scm",(void*)f_3294},
+{"f_3297:c_platform_scm",(void*)f_3297},
+{"f_3300:c_platform_scm",(void*)f_3300},
+{"f_3303:c_platform_scm",(void*)f_3303},
+{"f_3306:c_platform_scm",(void*)f_3306},
+{"f_3309:c_platform_scm",(void*)f_3309},
+{"f_3312:c_platform_scm",(void*)f_3312},
+{"f_3315:c_platform_scm",(void*)f_3315},
+{"f_3318:c_platform_scm",(void*)f_3318},
+{"f_3321:c_platform_scm",(void*)f_3321},
+{"f_3324:c_platform_scm",(void*)f_3324},
+{"f_3327:c_platform_scm",(void*)f_3327},
+{"f_3330:c_platform_scm",(void*)f_3330},
+{"f_3333:c_platform_scm",(void*)f_3333},
+{"f_3336:c_platform_scm",(void*)f_3336},
+{"f_3473:c_platform_scm",(void*)f_3473},
+{"f_3476:c_platform_scm",(void*)f_3476},
+{"f_3479:c_platform_scm",(void*)f_3479},
+{"f_3482:c_platform_scm",(void*)f_3482},
+{"f_3626:c_platform_scm",(void*)f_3626},
+{"f_3629:c_platform_scm",(void*)f_3629},
+{"f_3795:c_platform_scm",(void*)f_3795},
+{"f_3825:c_platform_scm",(void*)f_3825},
+{"f_3847:c_platform_scm",(void*)f_3847},
+{"f_3633:c_platform_scm",(void*)f_3633},
+{"f_3636:c_platform_scm",(void*)f_3636},
+{"f_3639:c_platform_scm",(void*)f_3639},
+{"f_3713:c_platform_scm",(void*)f_3713},
+{"f_3767:c_platform_scm",(void*)f_3767},
+{"f_3742:c_platform_scm",(void*)f_3742},
+{"f_3739:c_platform_scm",(void*)f_3739},
+{"f_3642:c_platform_scm",(void*)f_3642},
+{"f_3668:c_platform_scm",(void*)f_3668},
+{"f_3645:c_platform_scm",(void*)f_3645},
+{"f_3648:c_platform_scm",(void*)f_3648},
+{"f_3651:c_platform_scm",(void*)f_3651},
+{"f_3654:c_platform_scm",(void*)f_3654},
+{"f_3657:c_platform_scm",(void*)f_3657},
+{"f_3660:c_platform_scm",(void*)f_3660},
+{"f_3663:c_platform_scm",(void*)f_3663},
+{"f_3666:c_platform_scm",(void*)f_3666},
+{"f_3484:c_platform_scm",(void*)f_3484},
+{"f_3503:c_platform_scm",(void*)f_3503},
+{"f_3520:c_platform_scm",(void*)f_3520},
+{"f_3576:c_platform_scm",(void*)f_3576},
+{"f_3572:c_platform_scm",(void*)f_3572},
+{"f_3568:c_platform_scm",(void*)f_3568},
+{"f_3564:c_platform_scm",(void*)f_3564},
+{"f_3338:c_platform_scm",(void*)f_3338},
+{"f_3360:c_platform_scm",(void*)f_3360},
+{"f_3426:c_platform_scm",(void*)f_3426},
+{"f_3424:c_platform_scm",(void*)f_3424},
+{"f_2039:c_platform_scm",(void*)f_2039},
+{"f_2073:c_platform_scm",(void*)f_2073},
+{"f_2100:c_platform_scm",(void*)f_2100},
+{"f_2103:c_platform_scm",(void*)f_2103},
+{"f_2106:c_platform_scm",(void*)f_2106},
+{"f_2177:c_platform_scm",(void*)f_2177},
+{"f_2173:c_platform_scm",(void*)f_2173},
+{"f_2148:c_platform_scm",(void*)f_2148},
+{"f_2008:c_platform_scm",(void*)f_2008},
+{"f_1844:c_platform_scm",(void*)f_1844},
+{"f_1850:c_platform_scm",(void*)f_1850},
+{"f_1862:c_platform_scm",(void*)f_1862},
+{"f_1951:c_platform_scm",(void*)f_1951},
+{"f_1885:c_platform_scm",(void*)f_1885},
+{"f_1905:c_platform_scm",(void*)f_1905},
+{"f_1882:c_platform_scm",(void*)f_1882},
+{"f_1625:c_platform_scm",(void*)f_1625},
+{"f_1635:c_platform_scm",(void*)f_1635},
+{"f_1780:c_platform_scm",(void*)f_1780},
+{"f_1727:c_platform_scm",(void*)f_1727},
+{"f_1742:c_platform_scm",(void*)f_1742},
+{"f_1724:c_platform_scm",(void*)f_1724},
+{"f_1678:c_platform_scm",(void*)f_1678},
+{"f_1707:c_platform_scm",(void*)f_1707},
+{"f_1672:c_platform_scm",(void*)f_1672},
+{"f_1664:c_platform_scm",(void*)f_1664},
+{"f_1656:c_platform_scm",(void*)f_1656},
+{"f_1427:c_platform_scm",(void*)f_1427},
+{"f_1574:c_platform_scm",(void*)f_1574},
+{"f_1443:c_platform_scm",(void*)f_1443},
+{"f_1452:c_platform_scm",(void*)f_1452},
+{"f_1455:c_platform_scm",(void*)f_1455},
+{"f_1347:c_platform_scm",(void*)f_1347},
+{"f_1349:c_platform_scm",(void*)f_1349},
+{"f_1415:c_platform_scm",(void*)f_1415},
+{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
new file mode 100644
index 00000000..7297e743
--- /dev/null
+++ b/bootstrap/chicken-syntax.c
@@ -0,0 +1,16487 @@
+/* Generated from chicken-syntax.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:27
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[244];
+static double C_possibly_force_alignment;
+static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,28),40,97,50,52,49,52,32,102,111,114,109,50,50,51,48,32,114,50,50,51,49,32,99,50,50,51,50,41,0,0,0,0};
+static C_char C_TLS li1[] C_aligned={C_lihdr(0,0,32),40,97,50,52,54,48,32,110,97,109,101,50,50,50,56,32,116,114,97,110,115,102,111,114,109,101,114,50,50,50,57,41};
+static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,50,48,53,32,103,50,50,49,53,50,50,49,57,41,0,0,0,0};
+static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,49,56,48,32,103,50,49,57,48,50,49,57,52,41,0,0,0,0};
+static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,49,51,54,32,108,50,49,51,49,50,49,53,57,41,0,0,0,0};
+static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,52),40,97,50,52,50,52,32,105,110,112,117,116,50,49,51,48,50,49,52,51,32,114,101,110,97,109,101,50,49,51,57,50,49,52,52,32,99,111,109,112,97,114,101,50,49,50,55,50,49,52,53,41,0,0,0,0};
+static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,52),40,97,50,54,51,57,32,105,110,112,117,116,50,48,56,51,50,48,57,54,32,114,101,110,97,109,101,50,48,57,50,50,48,57,55,32,99,111,109,112,97,114,101,50,48,56,48,50,48,57,56,41,0,0,0,0};
+static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,25),40,97,50,55,55,49,32,120,50,48,55,48,32,114,50,48,55,49,32,99,50,48,55,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,28),40,97,50,55,57,54,32,102,111,114,109,50,48,54,50,32,114,50,48,54,51,32,99,50,48,54,52,41,0,0,0,0};
+static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,28),40,97,50,56,51,51,32,102,111,114,109,50,48,52,56,32,114,50,48,52,57,32,99,50,48,53,48,41,0,0,0,0};
+static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,37),40,108,111,111,112,32,115,50,48,48,52,32,100,50,48,48,53,32,99,115,50,48,48,54,32,101,120,112,111,114,116,115,50,48,48,55,41,0,0,0};
+static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,28),40,97,50,57,51,55,32,102,111,114,109,49,57,57,53,32,114,49,57,57,54,32,99,49,57,57,55,41,0,0,0,0};
+static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,47),40,108,111,111,112,32,120,115,49,57,55,48,32,118,97,114,115,49,57,55,49,32,98,115,49,57,55,50,32,118,97,108,115,49,57,55,51,32,114,101,115,116,49,57,55,52,41,0};
+static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,28),40,97,51,50,49,56,32,102,111,114,109,49,57,54,49,32,114,49,57,54,50,32,99,49,57,54,51,41,0,0,0,0};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,40),40,108,111,111,112,32,120,115,49,57,51,52,32,118,97,114,115,49,57,51,53,32,118,97,108,115,49,57,51,54,32,114,101,115,116,49,57,51,55,41};
+static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,28),40,97,51,52,52,57,32,102,111,114,109,49,57,50,53,32,114,49,57,50,54,32,99,49,57,50,55,41,0,0,0,0};
+static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,115,108,111,116,115,49,56,57,52,32,105,49,56,57,53,41,0,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,7),40,103,49,56,56,55,41,0};
+static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,55,49,32,103,49,56,56,49,49,56,56,53,41,0,0,0,0};
+static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,52,52,32,103,49,56,53,52,49,56,53,56,41,0,0,0,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,28),40,97,51,54,52,57,32,102,111,114,109,49,56,50,53,32,114,49,56,50,54,32,99,49,56,50,55,41,0,0,0,0};
+static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,7),40,103,49,55,55,56,41,0};
+static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,54,50,32,103,49,55,55,50,49,55,55,54,41,0,0,0,0};
+static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,20),40,112,97,114,115,101,45,99,108,97,117,115,101,32,99,49,55,51,55,41,0,0,0,0};
+static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,57,56,32,103,49,56,48,56,49,56,49,50,41,0,0,0,0};
+static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,28),40,97,52,49,50,48,32,102,111,114,109,49,55,50,50,32,114,49,55,50,51,32,99,49,55,50,52,41,0,0,0,0};
+static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,28),40,97,52,53,52,51,32,102,111,114,109,49,55,48,55,32,114,49,55,48,56,32,99,49,55,48,57,41,0,0,0,0};
+static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,28),40,97,52,55,53,55,32,102,111,114,109,49,54,56,49,32,114,49,54,56,50,32,99,49,54,56,51,41,0,0,0,0};
+static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,53,53,41,0,0,0,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,15),40,103,101,110,118,97,114,115,32,110,49,53,53,51,41,0};
+static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,7),40,97,53,48,49,50,41,0};
+static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,30),40,108,111,111,112,49,54,53,50,32,103,49,54,54,50,49,54,54,55,32,103,49,54,54,51,49,54,54,56,41,0,0};
+static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,27),40,98,117,105,108,100,32,118,97,114,115,50,49,54,50,52,32,118,114,101,115,116,49,54,50,53,41,0,0,0,0,0};
+static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,27),40,97,53,48,50,50,32,118,97,114,115,49,49,54,50,48,32,118,97,114,115,50,49,54,50,49,41,0,0,0,0,0};
+static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,34),40,97,52,57,56,48,32,118,97,114,115,49,54,48,50,32,97,114,103,99,49,54,48,51,32,114,101,115,116,49,54,48,52,41,0,0,0,0,0,0};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,22),40,97,52,57,55,48,32,99,49,54,48,48,32,98,111,100,121,49,54,48,49,41,0,0};
+static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,34),40,97,53,51,52,53,32,118,97,114,115,49,53,56,48,32,97,114,103,99,49,53,56,49,32,114,101,115,116,49,53,56,50,41,0,0,0,0,0,0};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,54,49,32,103,49,53,55,49,49,53,55,53,41,0,0,0,0};
+static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,28),40,97,52,56,53,57,32,102,111,114,109,49,53,52,57,32,114,49,53,53,48,32,99,49,53,53,49,41,0,0,0,0};
+static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,27),40,108,111,111,112,32,97,114,103,115,49,53,50,55,32,118,97,114,100,101,102,115,49,53,50,56,41,0,0,0,0,0};
+static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,28),40,97,53,52,48,55,32,102,111,114,109,49,53,49,48,32,114,49,53,49,49,32,99,49,53,49,50,41,0,0,0,0};
+static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,28),40,97,53,55,50,49,32,102,111,114,109,49,52,57,49,32,114,49,52,57,50,32,99,49,52,57,51,41,0,0,0,0};
+static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,58),40,114,101,99,117,114,32,118,97,114,115,49,51,52,51,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,52,52,32,100,101,102,115,49,51,52,53,32,110,101,120,116,45,103,117,121,49,51,52,54,41,0,0,0,0,0,0};
+static C_char C_TLS li43[] 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,51,55,32,98,111,100,121,45,112,114,111,99,49,51,51,56,32,100,101,102,97,117,108,116,101,114,45,110,97,109,101,115,49,51,51,57,32,100,101,102,115,49,51,52,48,41};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,48),40,114,101,99,117,114,32,118,97,114,115,49,51,53,57,32,100,101,102,97,117,108,116,101,114,115,49,51,54,48,32,110,111,110,45,100,101,102,97,117,108,116,115,49,51,54,49,41};
+static C_char C_TLS li45[] 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,53,51,32,100,101,102,97,117,108,116,101,114,115,49,51,53,52,32,98,111,100,121,45,112,114,111,99,49,51,53,53,32,114,101,115,116,49,51,53,54,41,0,0,0};
+static C_char C_TLS li46[] 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,51,57,56,32,115,121,109,49,51,57,57,41,0};
+static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,15),40,103,49,52,55,48,32,118,97,114,49,52,55,50,41,0};
+static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,53,52,32,103,49,52,54,52,49,52,54,56,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,50,56,32,103,49,52,51,56,49,52,52,50,41,0,0,0,0};
+static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,13),40,103,49,52,49,57,32,118,49,52,50,49,41,0,0,0};
+static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,48,51,32,103,49,52,49,51,49,52,49,55,41,0,0,0,0};
+static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,55,54,32,103,49,51,56,54,49,51,57,48,41,0,0,0,0};
+static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,28),40,97,53,57,52,54,32,102,111,114,109,49,51,50,54,32,114,49,51,50,55,32,99,49,51,50,56,41,0,0,0,0};
+static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,7),40,103,49,51,48,57,41,0};
+static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,50,57,51,32,103,49,51,48,51,49,51,48,55,41,0,0,0,0};
+static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,50,56,48,41,0,0,0,0};
+static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,28),40,97,54,53,51,57,32,102,111,114,109,49,50,54,53,32,114,49,50,54,54,32,99,49,50,54,55,41,0,0,0,0};
+static C_char C_TLS li58[] C_aligned={C_lihdr(0,0,13),40,102,111,108,100,32,98,115,49,50,51,55,41,0,0,0};
+static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,28),40,97,54,55,51,57,32,102,111,114,109,49,50,50,57,32,114,49,50,51,48,32,99,49,50,51,49,41,0,0,0,0};
+static C_char C_TLS li60[] 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,48,53,32,105,100,49,50,48,54,41,0,0,0,0};
+static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,28),40,97,54,57,48,50,32,102,111,114,109,49,50,48,48,32,114,49,50,48,49,32,99,49,50,48,50,41,0,0,0,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,28),40,97,55,48,48,55,32,102,111,114,109,49,49,57,48,32,114,49,49,57,49,32,99,49,49,57,50,41,0,0,0,0};
+static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,8),40,108,111,111,107,117,112,41};
+static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,7),40,103,49,49,55,50,41,0};
+static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,53,54,32,103,49,49,54,54,49,49,55,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,51,51,32,103,49,49,52,51,49,49,52,55,41,0,0,0,0};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,14),40,103,49,49,50,52,32,118,98,49,49,50,54,41,0,0};
+static C_char C_TLS li68[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,48,56,32,103,49,49,49,56,49,49,50,50,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,56,52,32,103,49,48,57,52,49,48,57,56,41,0,0,0,0};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,13),40,103,49,48,55,48,32,118,49,48,55,50,41,0,0,0};
+static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,53,52,32,103,49,48,54,52,49,48,54,56,41,0,0,0,0};
+static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,50,57,32,103,49,48,51,57,49,48,52,51,41,0,0,0,0};
+static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,28),40,97,55,48,57,48,32,102,111,114,109,49,48,49,56,32,114,49,48,49,57,32,99,49,48,50,48,41,0,0,0,0};
+static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,20),40,102,111,108,100,32,118,98,105,110,100,105,110,103,115,49,48,48,55,41,0,0,0,0};
+static C_char C_TLS li75[] C_aligned={C_lihdr(0,0,27),40,97,55,52,54,49,32,102,111,114,109,57,57,57,32,114,49,48,48,48,32,99,49,48,48,49,41,0,0,0,0,0};
+static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,20),40,97,112,112,101,110,100,42,32,105,108,56,51,51,32,108,56,51,52,41,0,0,0,0};
+static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,19),40,109,97,112,42,32,112,114,111,99,56,51,53,32,108,56,51,54,41,0,0,0,0,0};
+static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,13),40,108,111,111,107,117,112,32,118,57,48,56,41,0,0,0};
+static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,11),40,103,57,53,53,32,118,57,53,55,41,0,0,0,0,0};
+static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,57,51,57,32,103,57,52,57,57,53,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,35),40,102,111,108,100,32,108,108,105,115,116,115,57,50,52,32,101,120,112,115,57,50,53,32,108,108,105,115,116,115,50,57,50,54,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,55,52,32,103,57,56,52,57,56,56,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,57,49,49,32,97,99,99,57,49,50,41,0};
+static C_char C_TLS li84[] C_aligned={C_lihdr(0,0,11),40,103,57,48,49,32,118,57,48,51,41,0,0,0,0,0};
+static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,56,53,32,103,56,57,53,56,57,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,108,108,105,115,116,115,56,55,48,32,97,99,99,56,55,49,41,0};
+static C_char C_TLS li87[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,56,52,55,32,103,56,53,55,56,54,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,25),40,97,55,53,51,51,32,102,111,114,109,56,50,52,32,114,56,50,53,32,99,56,50,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,18),40,97,56,48,56,50,32,103,56,49,51,56,49,52,56,49,53,41,0,0,0,0,0,0};
+static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,25),40,97,56,48,53,56,32,102,111,114,109,56,48,48,32,114,56,48,49,32,99,56,48,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,55,54,56,32,103,55,55,56,55,56,51,32,103,55,55,57,55,56,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,55,52,49,32,103,55,53,49,55,53,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,25),40,97,56,49,48,48,32,102,111,114,109,55,49,56,32,114,55,49,57,32,99,55,50,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,25),40,97,56,51,50,56,32,102,111,114,109,55,49,48,32,114,55,49,49,32,99,55,49,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,25),40,97,56,51,56,49,32,102,111,114,109,55,48,50,32,114,55,48,51,32,99,55,48,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,12),40,103,54,57,48,32,97,50,54,57,51,41,0,0,0,0};
+static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,55,48,32,103,54,56,48,54,56,53,32,103,54,56,49,54,56,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,52,51,32,103,54,53,51,54,53,56,32,103,54,53,52,54,53,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,54,49,54,32,103,54,50,54,54,51,49,32,103,54,50,55,54,51,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,6),40,103,54,48,52,41,0,0};
+static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,56,56,32,103,53,57,56,54,48,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,6),40,103,53,55,57,41,0,0};
+static C_char C_TLS li103[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,54,51,32,103,53,55,51,53,55,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,51,57,32,103,53,52,57,53,53,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,53,49,53,32,103,53,50,53,53,50,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,25),40,97,56,52,50,54,32,102,111,114,109,53,48,51,32,114,53,48,52,32,99,53,48,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,115,115,52,55,53,41,0,0,0,0};
+static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,25),40,97,56,57,49,50,32,102,111,114,109,52,53,55,32,114,52,53,56,32,99,52,53,57,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,52,50,53,32,103,52,51,53,52,52,48,32,103,52,51,54,52,52,49,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,57,50,32,103,52,48,50,52,48,55,32,103,52,48,51,52,48,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,53,57,32,103,51,54,57,51,55,52,32,103,51,55,48,51,55,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,51,50,54,32,103,51,51,54,51,52,49,32,103,51,51,55,51,52,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,50,57,54,32,103,51,48,54,51,49,49,32,103,51,48,55,51,49,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,110,51,50,50,41,0,0,0,0,0};
+static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,25),40,108,111,111,112,50,52,54,32,103,50,53,54,50,54,49,32,103,50,53,55,50,54,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,55,51,32,103,50,56,51,50,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,6),40,103,50,51,50,41,0,0};
+static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,50,49,54,32,103,50,50,54,50,51,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,6),40,103,50,48,55,41,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,57,49,32,103,50,48,49,50,48,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,49,54,55,32,103,49,55,55,49,56,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,25),40,97,57,48,51,51,32,102,111,114,109,49,53,56,32,114,49,53,57,32,99,49,54,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,25),40,97,57,55,49,57,32,102,111,114,109,49,52,48,32,114,49,52,49,32,99,49,52,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,25),40,97,57,56,53,54,32,102,111,114,109,49,49,56,32,114,49,49,57,32,99,49,50,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,48,50,41};
+static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,22),40,100,111,108,111,111,112,49,48,55,32,120,49,49,49,32,120,115,49,49,50,41,0,0};
+static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,48,55,41};
+static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,8),40,97,49,48,48,52,48,41};
+static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,7),40,97,57,57,57,54,41,0};
+static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,22),40,97,57,57,55,48,32,102,111,114,109,56,54,32,114,56,55,32,99,56,56,41,0,0};
+static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,23),40,97,49,48,48,53,57,32,102,111,114,109,55,57,32,114,56,48,32,99,56,49,41,0};
+static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,23),40,97,49,48,48,55,55,32,102,111,114,109,54,57,32,114,55,48,32,99,55,49,41,0};
+static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,23),40,97,49,48,49,55,54,32,102,111,114,109,51,57,32,114,52,48,32,99,52,49,41,0};
+static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,22),40,109,97,112,115,108,111,116,115,32,115,108,111,116,115,49,57,32,105,50,48,41,0,0};
+static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,17),40,97,49,48,51,49,57,32,120,49,32,114,50,32,99,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li136[] 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_2285)
+static void C_ccall f_2285(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2289)
+static void C_ccall f_2289(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10324)
+static void C_ccall f_10324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10333)
+static void C_ccall f_10333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10336)
+static void C_ccall f_10336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10342)
+static void C_ccall f_10342(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10345)
+static void C_ccall f_10345(C_word c,C_word t0,C_word t1) 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_10351)
+static void C_ccall f_10351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10761)
+static void C_ccall f_10761(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10721)
+static void C_ccall f_10721(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_10713)
+static void C_ccall f_10713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10669)
+static void C_ccall f_10669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10380)
+static void C_fcall f_10380(C_word t0,C_word t1,C_word t2,C_word t3) 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_10657)
+static void C_ccall f_10657(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_10653)
+static void C_ccall f_10653(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_10443)
+static void C_fcall f_10443(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10407)
+static void C_ccall f_10407(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_10374)
+static void C_ccall f_10374(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10318)
+static void C_ccall f_10318(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2292)
+static void C_ccall f_2292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10177)
+static void C_ccall f_10177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_10184)
+static void C_ccall f_10184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10187)
+static void C_ccall f_10187(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10223)
+static void C_ccall f_10223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10238)
+static void C_fcall f_10238(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10292)
+static void C_ccall f_10292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10253)
+static void C_ccall f_10253(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_10175)
+static void C_ccall f_10175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2295)
+static void C_ccall f_2295(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10078)
+static void C_ccall f_10078(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10082)
+static void C_ccall f_10082(C_word c,C_word t0,C_word t1) 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_10088)
+static void C_ccall f_10088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10167)
+static void C_ccall f_10167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10076)
+static void C_ccall f_10076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2298)
+static void C_ccall f_2298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10060)
+static void C_ccall f_10060(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_10058)
+static void C_ccall f_10058(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2301)
+static void C_ccall f_2301(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9975)
+static void C_ccall f_9975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9978)
+static void C_ccall f_9978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9981)
+static void C_ccall f_9981(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_9984)
+static void C_ccall f_9984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9997)
+static void C_ccall f_9997(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10041)
+static void C_ccall f_10041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10008)
+static void C_ccall f_10008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10016)
+static void C_ccall f_10016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10018)
+static void C_fcall f_10018(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10035)
+static void C_ccall f_10035(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_9995)
+static void C_ccall f_9995(C_word c,C_word t0,C_word t1) 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_9969)
+static void C_ccall f_9969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2304)
+static void C_ccall f_2304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9857)
+static void C_ccall f_9857(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_9870)
+static void C_ccall f_9870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9873)
+static void C_ccall f_9873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9876)
+static void C_fcall f_9876(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9936)
+static void C_ccall f_9936(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9911)
+static void C_ccall f_9911(C_word c,C_word t0,C_word t1) 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_2307)
+static void C_ccall f_2307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9720)
+static void C_ccall f_9720(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9724)
+static void C_ccall f_9724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9736)
+static void C_ccall f_9736(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_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_9789)
+static void C_ccall f_9789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9718)
+static void C_ccall f_9718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2310)
+static void C_ccall f_2310(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9034)
+static void C_ccall f_9034(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_9681)
+static void C_fcall f_9681(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9710)
+static void C_ccall f_9710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9047)
+static void C_ccall f_9047(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9637)
+static void C_fcall f_9637(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9675)
+static void C_ccall f_9675(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9664)
+static void C_fcall f_9664(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9672)
+static void C_ccall f_9672(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9050)
+static void C_ccall f_9050(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9593)
+static void C_fcall f_9593(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9631)
+static void C_ccall f_9631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9620)
+static void C_fcall f_9620(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_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_9056)
+static void C_ccall f_9056(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_9558)
+static void C_fcall f_9558(C_word t0,C_word t1,C_word t2) 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_9507)
+static void C_ccall f_9507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9509)
+static void C_fcall f_9509(C_word t0,C_word t1,C_word t2,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_9522)
+static void C_fcall f_9522(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9418)
+static void C_ccall f_9418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9485)
+static void C_fcall f_9485(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9499)
+static void C_ccall f_9499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9430)
+static void C_ccall f_9430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9432)
+static void C_fcall f_9432(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9465)
+static void C_ccall f_9465(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9445)
+static void C_fcall f_9445(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9426)
+static void C_ccall f_9426(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_9070)
+static void C_ccall f_9070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9354)
+static void C_fcall f_9354(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9367)
+static void C_fcall f_9367(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9274)
+static void C_ccall f_9274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9292)
+static void C_fcall f_9292(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9305)
+static void C_fcall f_9305(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_9278)
+static void C_ccall f_9278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9270)
+static void C_ccall f_9270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9262)
+static void C_ccall f_9262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9194)
+static void C_fcall f_9194(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9207)
+static void C_fcall f_9207(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9114)
+static void C_ccall f_9114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9132)
+static void C_fcall f_9132(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9145)
+static void C_fcall f_9145(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9122)
+static void C_ccall f_9122(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9118)
+static void C_ccall f_9118(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_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_2313)
+static void C_ccall f_2313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8913)
+static void C_ccall f_8913(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_8923)
+static void C_ccall f_8923(C_word c,C_word t0,C_word t1) 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_8929)
+static void C_ccall f_8929(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8932)
+static void C_ccall f_8932(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_noret;
+C_noret_decl(f_8975)
+static void C_fcall f_8975(C_word t0,C_word t1,C_word t2) 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_9005)
+static void C_ccall f_9005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9012)
+static void C_ccall f_9012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8988)
+static void C_ccall f_8988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8938)
+static void C_ccall f_8938(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_2316)
+static void C_ccall f_2316(C_word c,C_word t0,C_word t1) 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_word t3,C_word t4) 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_8440)
+static void C_ccall f_8440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8443)
+static void C_ccall f_8443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8446)
+static void C_ccall f_8446(C_word c,C_word t0,C_word t1) 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_8903)
+static void C_ccall f_8903(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_8839)
+static void C_fcall f_8839(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_noret;
+C_noret_decl(f_8452)
+static void C_ccall f_8452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8795)
+static void C_fcall f_8795(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8833)
+static void C_ccall f_8833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8822)
+static void C_fcall f_8822(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8830)
+static void C_ccall f_8830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8455)
+static void C_ccall f_8455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8751)
+static void C_fcall f_8751(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8789)
+static void C_ccall f_8789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8778)
+static void C_fcall f_8778(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8786)
+static void C_ccall f_8786(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8458)
+static void C_ccall f_8458(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_8735)
+static void C_ccall f_8735(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8715)
+static void C_fcall f_8715(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8647)
+static void C_ccall f_8647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8653)
+static void C_fcall f_8653(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8686)
+static void C_ccall f_8686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8666)
+static void C_fcall f_8666(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8651)
+static void C_ccall f_8651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8469)
+static void C_ccall f_8469(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8543)
+static void C_fcall f_8543(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8556)
+static void C_fcall f_8556(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8574)
+static C_word C_fcall f_8574(C_word *a,C_word t0,C_word t1,C_word t2);
+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_8537)
+static void C_ccall f_8537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8517)
+static void C_ccall f_8517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8425)
+static void C_ccall f_8425(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2319)
+static void C_ccall f_2319(C_word c,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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8386)
+static void C_ccall f_8386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8393)
+static void C_ccall f_8393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8413)
+static void C_ccall f_8413(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_8380)
+static void C_ccall f_8380(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_8329)
+static void C_ccall f_8329(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8333)
+static void C_ccall f_8333(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_noret;
+C_noret_decl(f_8368)
+static void C_ccall f_8368(C_word c,C_word t0,C_word t1) 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_8327)
+static void C_ccall f_8327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2325)
+static void C_ccall f_2325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8101)
+static void C_ccall f_8101(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8105)
+static void C_ccall f_8105(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8114)
+static void C_ccall f_8114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8286)
+static void C_fcall f_8286(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8315)
+static void C_ccall f_8315(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_8216)
+static void C_fcall f_8216(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8229)
+static void C_fcall f_8229(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8214)
+static void C_ccall f_8214(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8210)
+static void C_ccall f_8210(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8099)
+static void C_ccall f_8099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2328)
+static void C_ccall f_2328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8059)
+static void C_ccall f_8059(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_8083)
+static void C_ccall f_8083(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8091)
+static void C_ccall f_8091(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_8073)
+static void C_ccall f_8073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8077)
+static void C_ccall f_8077(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8057)
+static void C_ccall f_8057(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2331)
+static void C_ccall f_2331(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7534)
+static void C_ccall f_7534(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7538)
+static void C_ccall f_7538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7547)
+static void C_ccall f_7547(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_8020)
+static void C_fcall f_8020(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8049)
+static void C_ccall f_8049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7625)
+static void C_ccall f_7625(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7980)
+static void C_fcall f_7980(C_word t0,C_word t1,C_word t2,C_word t3) 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_7628)
+static void C_ccall f_7628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7932)
+static void C_fcall f_7932(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7974)
+static void C_ccall f_7974(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_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_7967)
+static void C_ccall f_7967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7631)
+static void C_ccall f_7631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7886)
+static void C_fcall f_7886(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7919)
+static void C_ccall f_7919(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7926)
+static void C_ccall f_7926(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_7846)
+static void C_fcall f_7846(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7650)
+static void C_ccall f_7650(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_word t4) C_noret;
+C_noret_decl(f_7840)
+static void C_ccall f_7840(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7724)
+static void C_fcall f_7724(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_7763)
+static void C_ccall f_7763(C_word c,C_word t0,C_word t1) 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_7676)
+static void C_fcall f_7676(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7714)
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7703)
+static void C_fcall f_7703(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7711)
+static void C_ccall f_7711(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7670)
+static void C_ccall f_7670(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7674)
+static void C_ccall f_7674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7632)
+static void C_ccall f_7632(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7583)
+static void C_fcall f_7583(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7606)
+static void C_ccall f_7606(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_7552)
+static void C_fcall f_7552(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7573)
+static void C_ccall f_7573(C_word c,C_word t0,C_word t1) 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_2334)
+static void C_ccall f_2334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7462)
+static void C_ccall f_7462(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_7475)
+static void C_ccall f_7475(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7478)
+static void C_ccall f_7478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7483)
+static void C_fcall f_7483(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7520)
+static void C_ccall f_7520(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_7460)
+static void C_ccall f_7460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2337)
+static void C_ccall f_2337(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_word t3,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_7104)
+static void C_ccall f_7104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7107)
+static void C_ccall f_7107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7418)
+static void C_fcall f_7418(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7416)
+static void C_ccall f_7416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7110)
+static void C_ccall f_7110(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7366)
+static void C_fcall f_7366(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7408)
+static void C_ccall f_7408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7393)
+static void C_fcall f_7393(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7405)
+static void C_ccall f_7405(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7401)
+static void C_ccall f_7401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7113)
+static void C_ccall f_7113(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7326)
+static void C_fcall f_7326(C_word t0,C_word t1,C_word t2) 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_7147)
+static void C_fcall f_7147(C_word t0,C_word t1,C_word t2) 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_7174)
+static void C_fcall f_7174(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7272)
+static void C_fcall f_7272(C_word t0,C_word t1,C_word t2) 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_7216)
+static void C_fcall f_7216(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7243)
+static C_word C_fcall f_7243(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_7210)
+static void C_ccall f_7210(C_word c,C_word t0,C_word t1) 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_7141)
+static void C_ccall f_7141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7145)
+static void C_ccall f_7145(C_word c,C_word t0,C_word t1) 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 C_word C_fcall f_7114(C_word t0,C_word t1);
+C_noret_decl(f_7089)
+static void C_ccall f_7089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2340)
+static void C_ccall f_2340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7085)
+static void C_ccall f_7085(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7008)
+static void C_ccall f_7008(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7012)
+static void C_ccall f_7012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7015)
+static void C_ccall f_7015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7018)
+static void C_ccall f_7018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7053)
+static void C_ccall f_7053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7006)
+static void C_ccall f_7006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2343)
+static void C_ccall f_2343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6903)
+static void C_ccall f_6903(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6907)
+static void C_ccall f_6907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6994)
+static void C_ccall f_6994(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_6909)
+static void C_fcall f_6909(C_word t0,C_word t1,C_word t2,C_word t3) 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_6970)
+static void C_ccall f_6970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6922)
+static void C_fcall f_6922(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6944)
+static void C_ccall f_6944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6934)
+static void C_fcall f_6934(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6925)
+static void C_ccall f_6925(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_2346)
+static void C_ccall f_2346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6740)
+static void C_ccall f_6740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6744)
+static void C_ccall f_6744(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_6756)
+static void C_ccall f_6756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6761)
+static void C_fcall f_6761(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6806)
+static void C_ccall f_6806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6873)
+static void C_ccall f_6873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6835)
+static void C_ccall f_6835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6775)
+static void C_ccall f_6775(C_word c,C_word t0,C_word t1) 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_6738)
+static void C_ccall f_6738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2349)
+static void C_ccall f_2349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6540)
+static void C_ccall f_6540(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6544)
+static void C_ccall f_6544(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_6556)
+static void C_ccall f_6556(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6559)
+static void C_ccall f_6559(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6562)
+static void C_ccall f_6562(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_6572)
+static void C_ccall f_6572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6590)
+static void C_fcall f_6590(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6606)
+static void C_ccall f_6606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6612)
+static void C_ccall f_6612(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6672)
+static void C_fcall f_6672(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6699)
+static C_word C_fcall f_6699(C_word *a,C_word t0,C_word t1);
+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_6662)
+static void C_ccall f_6662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6654)
+static void C_ccall f_6654(C_word c,C_word t0,C_word t1) 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_6619)
+static void C_ccall f_6619(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_6538)
+static void C_ccall f_6538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2352)
+static void C_ccall f_2352(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_5947)
+static void C_ccall f_5947(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5951)
+static void C_ccall f_5951(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5963)
+static void C_ccall f_5963(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_5969)
+static void C_ccall f_5969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6269)
+static void C_ccall f_6269(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6272)
+static void C_ccall f_6272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6481)
+static void C_fcall f_6481(C_word t0,C_word t1,C_word t2) 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_6275)
+static void C_ccall f_6275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6437)
+static void C_fcall f_6437(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6475)
+static void C_ccall f_6475(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6464)
+static void C_fcall f_6464(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6472)
+static void C_ccall f_6472(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6291)
+static void C_ccall f_6291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6402)
+static void C_fcall f_6402(C_word t0,C_word t1,C_word t2) 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_6294)
+static void C_ccall f_6294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6297)
+static void C_ccall f_6297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6300)
+static void C_ccall f_6300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6358)
+static void C_fcall f_6358(C_word t0,C_word t1,C_word t2) 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_6385)
+static void C_fcall f_6385(C_word t0,C_word t1,C_word t2) 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_6303)
+static void C_ccall f_6303(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6306)
+static void C_ccall f_6306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6309)
+static void C_ccall f_6309(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6316)
+static void C_ccall f_6316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6276)
+static void C_fcall f_6276(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6288)
+static void C_ccall f_6288(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6284)
+static void C_ccall f_6284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6068)
+static void C_fcall f_6068(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_6074)
+static void C_fcall f_6074(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_6250)
+static void C_ccall f_6250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6234)
+static void C_ccall f_6234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6198)
+static void C_ccall f_6198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6148)
+static void C_ccall f_6148(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_5971)
+static void C_fcall f_5971(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_5979)
+static void C_ccall f_5979(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_5987)
+static void C_ccall f_5987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5989)
+static void C_fcall f_5989(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_6042)
+static void C_ccall f_6042(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_6054)
+static void C_ccall f_6054(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6010)
+static void C_ccall f_6010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5945)
+static void C_ccall f_5945(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_5937)
+static void C_ccall f_5937(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_5929)
+static void C_ccall f_5929(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5722)
+static void C_ccall f_5722(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5726)
+static void C_ccall f_5726(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5729)
+static void C_ccall f_5729(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5732)
+static void C_ccall f_5732(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5739)
+static void C_ccall f_5739(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5889)
+static void C_ccall f_5889(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5774)
+static void C_ccall f_5774(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5850)
+static void C_ccall f_5850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5862)
+static void C_ccall f_5862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5834)
+static void C_ccall f_5834(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5720)
+static void C_ccall f_5720(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_5712)
+static void C_ccall f_5712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5408)
+static void C_ccall f_5408(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_5424)
+static void C_ccall f_5424(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_5433)
+static void C_ccall f_5433(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_5460)
+static void C_fcall f_5460(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5688)
+static void C_ccall f_5688(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5550)
+static void C_ccall f_5550(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_5526)
+static void C_ccall f_5526(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_5406)
+static void C_ccall f_5406(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_5398)
+static void C_ccall f_5398(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5394)
+static void C_ccall f_5394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5390)
+static void C_ccall f_5390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5386)
+static void C_ccall f_5386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4860)
+static void C_ccall f_4860(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4864)
+static void C_ccall f_4864(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_5309)
+static void C_fcall f_5309(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5346)
+static void C_ccall f_5346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5350)
+static void C_ccall f_5350(C_word c,C_word t0,C_word t1) 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_4904)
+static void C_ccall f_4904(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_4910)
+static void C_ccall f_4910(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_4916)
+static void C_ccall f_4916(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_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_4928)
+static void C_ccall f_4928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4931)
+static void C_ccall f_4931(C_word c,C_word t0,C_word t1) 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_4945)
+static void C_ccall f_4945(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_4981)
+static void C_ccall f_4981(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4985)
+static void C_ccall f_4985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4999)
+static void C_fcall f_4999(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5023)
+static void C_ccall f_5023(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5099)
+static void C_fcall f_5099(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5247)
+static void C_ccall f_5247(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_5186)
+static void C_ccall f_5186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5156)
+static void C_ccall f_5156(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5124)
+static void C_ccall f_5124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5027)
+static void C_ccall f_5027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5050)
+static void C_fcall f_5050(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5083)
+static void C_ccall f_5083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5063)
+static void C_fcall f_5063(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5044)
+static void C_ccall f_5044(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_5021)
+static void C_ccall f_5021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5007)
+static void C_ccall f_5007(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4969)
+static void C_ccall f_4969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4866)
+static void C_fcall f_4866(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4872)
+static void C_fcall f_4872(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4898)
+static void C_ccall f_4898(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4886)
+static void C_ccall f_4886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4890)
+static void C_ccall f_4890(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4858)
+static void C_ccall f_4858(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_4758)
+static void C_ccall f_4758(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4762)
+static void C_ccall f_4762(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_4842)
+static void C_ccall f_4842(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_4800)
+static void C_ccall f_4800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4812)
+static void C_ccall f_4812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4756)
+static void C_ccall f_4756(C_word c,C_word t0,C_word t1) 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_4752)
+static void C_ccall f_4752(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4748)
+static void C_ccall f_4748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4544)
+static void C_ccall f_4544(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_4551)
+static void C_ccall f_4551(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4554)
+static void C_ccall f_4554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4557)
+static void C_ccall f_4557(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_4596)
+static void C_ccall f_4596(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4688)
+static void C_ccall f_4688(C_word c,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_2370)
+static void C_ccall f_2370(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_4530)
+static void C_ccall f_4530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4121)
+static void C_ccall f_4121(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4125)
+static void C_ccall f_4125(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4128)
+static void C_ccall f_4128(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_4134)
+static void C_ccall f_4134(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_noret;
+C_noret_decl(f_4140)
+static void C_ccall f_4140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4143)
+static void C_ccall f_4143(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_4355)
+static void C_ccall f_4355(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_4429)
+static void C_fcall f_4429(C_word t0,C_word t1,C_word t2) 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_4403)
+static void C_ccall f_4403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4399)
+static void C_ccall f_4399(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4148)
+static void C_fcall f_4148(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4272)
+static void C_fcall f_4272(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4299)
+static C_word C_fcall f_4299(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_4270)
+static void C_ccall f_4270(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_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_4239)
+static void C_ccall f_4239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4209)
+static void C_ccall f_4209(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_4119)
+static void C_ccall f_4119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2373)
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3650)
+static void C_ccall f_3650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3654)
+static void C_ccall f_3654(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_3672)
+static void C_ccall f_3672(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3675)
+static void C_ccall f_3675(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3678)
+static void C_ccall f_3678(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_3687)
+static void C_ccall f_3687(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3690)
+static void C_ccall f_3690(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4058)
+static void C_fcall f_4058(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4087)
+static void C_ccall f_4087(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3693)
+static void C_ccall f_3693(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4011)
+static void C_fcall f_4011(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4038)
+static C_word C_fcall f_4038(C_word t0,C_word t1);
+C_noret_decl(f_4009)
+static void C_ccall f_4009(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_3722)
+static void C_fcall f_3722(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3748)
+static void C_fcall f_3748(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3784)
+static void C_fcall f_3784(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3764)
+static void C_ccall f_3764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3760)
+static void C_ccall f_3760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3720)
+static void C_ccall f_3720(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3716)
+static void C_ccall f_3716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3648)
+static void C_ccall f_3648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2376)
+static void C_ccall f_2376(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_3450)
+static void C_ccall f_3450(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3454)
+static void C_ccall f_3454(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3457)
+static void C_ccall f_3457(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_noret;
+C_noret_decl(f_3463)
+static void C_ccall f_3463(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_3475)
+static void C_fcall f_3475(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3578)
+static void C_ccall f_3578(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_3600)
+static void C_ccall f_3600(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3581)
+static void C_ccall f_3581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3485)
+static void C_ccall f_3485(C_word c,C_word t0,C_word t1) C_noret;
+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_3560)
+static void C_ccall f_3560(C_word c,C_word t0,C_word t1) 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_3494)
+static void C_ccall f_3494(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_3525)
+static void C_ccall f_3525(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3448)
+static void C_ccall f_3448(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_3440)
+static void C_ccall f_3440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3219)
+static void C_ccall f_3219(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_3244)
+static void C_fcall f_3244(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_3363)
+static void C_ccall f_3363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3391)
+static void C_ccall f_3391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3424)
+static void C_ccall f_3424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3397)
+static void C_ccall f_3397(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_3366)
+static void C_ccall f_3366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3254)
+static void C_ccall f_3254(C_word c,C_word t0,C_word t1) 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_3353)
+static void C_ccall f_3353(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3318)
+static void C_ccall f_3318(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_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_3306)
+static void C_ccall f_3306(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_2382)
+static void C_ccall f_2382(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2942)
+static void C_ccall f_2942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2945)
+static void C_ccall f_2945(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2948)
+static void C_ccall f_2948(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_2957)
+static void C_ccall f_2957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2966)
+static void C_fcall f_2966(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3112)
+static void C_fcall f_3112(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_ccall f_3124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3149)
+static void C_ccall f_3149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3174)
+static void C_ccall f_3174(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(f11165)
+static void C_ccall f11165(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11161)
+static void C_ccall f11161(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_3168)
+static void C_ccall f_3168(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3164)
+static void C_ccall f_3164(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_3139)
+static void C_ccall f_3139(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_2976)
+static void C_fcall f_2976(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_3091)
+static void C_ccall f_3091(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_3075)
+static void C_ccall f_3075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3011)
+static void C_ccall f_3011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3039)
+static void C_ccall f_3039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3051)
+static void C_ccall f_3051(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_2936)
+static void C_ccall f_2936(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2385)
+static void C_ccall f_2385(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2838)
+static void C_ccall f_2838(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_2928)
+static void C_ccall f_2928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2889)
+static void C_ccall f_2889(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_2832)
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2388)
+static void C_ccall f_2388(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_word t2,C_word t3,C_word t4) 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_2808)
+static void C_ccall f_2808(C_word c,C_word t0,C_word t1) 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_2824)
+static void C_ccall f_2824(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_2391)
+static void C_ccall f_2391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2772)
+static void C_ccall f_2772(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2770)
+static void C_ccall f_2770(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2394)
+static void C_ccall f_2394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2640)
+static void C_ccall f_2640(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2700)
+static void C_fcall f_2700(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_2666)
+static void C_ccall f_2666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2682)
+static void C_ccall f_2682(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_2397)
+static void C_ccall f_2397(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2586)
+static void C_fcall f_2586(C_word t0,C_word t1,C_word t2) 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_2573)
+static void C_ccall f_2573(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_noret;
+C_noret_decl(f_2523)
+static void C_fcall f_2523(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2438)
+static void C_ccall f_2438(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2475)
+static void C_fcall f_2475(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2441)
+static void C_ccall f_2441(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_2461)
+static void C_ccall f_2461(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2459)
+static void C_ccall f_2459(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_2400)
+static void C_ccall f_2400(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_word t2,C_word t3,C_word t4) 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_2403)
+static void C_ccall f_2403(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_2409)
+static void C_ccall f_2409(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_10380)
+static void C_fcall trf_10380(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10380(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_10380(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10443)
+static void C_fcall trf_10443(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10443(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10443(t0,t1);}
+
+C_noret_decl(trf_10238)
+static void C_fcall trf_10238(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10238(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10238(t0,t1);}
+
+C_noret_decl(trf_10018)
+static void C_fcall trf_10018(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10018(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_10018(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9876)
+static void C_fcall trf_9876(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9876(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9876(t0,t1);}
+
+C_noret_decl(trf_9681)
+static void C_fcall trf_9681(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9681(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9681(t0,t1,t2);}
+
+C_noret_decl(trf_9637)
+static void C_fcall trf_9637(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9637(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9637(t0,t1,t2);}
+
+C_noret_decl(trf_9664)
+static void C_fcall trf_9664(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9664(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9664(t0,t1);}
+
+C_noret_decl(trf_9593)
+static void C_fcall trf_9593(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9593(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9593(t0,t1,t2);}
+
+C_noret_decl(trf_9620)
+static void C_fcall trf_9620(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9620(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9620(t0,t1);}
+
+C_noret_decl(trf_9558)
+static void C_fcall trf_9558(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9558(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9558(t0,t1,t2);}
+
+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 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_9509(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9522)
+static void C_fcall trf_9522(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9522(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9522(t0,t1);}
+
+C_noret_decl(trf_9485)
+static void C_fcall trf_9485(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9485(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9485(t0,t1,t2);}
+
+C_noret_decl(trf_9432)
+static void C_fcall trf_9432(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9432(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_9432(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9445)
+static void C_fcall trf_9445(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9445(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9445(t0,t1);}
+
+C_noret_decl(trf_9354)
+static void C_fcall trf_9354(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9354(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_9354(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9367)
+static void C_fcall trf_9367(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9367(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9367(t0,t1);}
+
+C_noret_decl(trf_9292)
+static void C_fcall trf_9292(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9292(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_9292(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9305)
+static void C_fcall trf_9305(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9305(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9305(t0,t1);}
+
+C_noret_decl(trf_9194)
+static void C_fcall trf_9194(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9194(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_9194(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9207)
+static void C_fcall trf_9207(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9207(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9207(t0,t1);}
+
+C_noret_decl(trf_9132)
+static void C_fcall trf_9132(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9132(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_9132(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9145)
+static void C_fcall trf_9145(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9145(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9145(t0,t1);}
+
+C_noret_decl(trf_8975)
+static void C_fcall trf_8975(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8975(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8975(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_8839)
+static void C_fcall trf_8839(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8839(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8839(t0,t1,t2);}
+
+C_noret_decl(trf_8795)
+static void C_fcall trf_8795(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8795(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8795(t0,t1,t2);}
+
+C_noret_decl(trf_8822)
+static void C_fcall trf_8822(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8822(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8822(t0,t1);}
+
+C_noret_decl(trf_8751)
+static void C_fcall trf_8751(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8751(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8751(t0,t1,t2);}
+
+C_noret_decl(trf_8778)
+static void C_fcall trf_8778(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8778(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8778(t0,t1);}
+
+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 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_8702(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8715)
+static void C_fcall trf_8715(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8715(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8715(t0,t1);}
+
+C_noret_decl(trf_8653)
+static void C_fcall trf_8653(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8653(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_8653(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8666)
+static void C_fcall trf_8666(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8666(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8666(t0,t1);}
+
+C_noret_decl(trf_8543)
+static void C_fcall trf_8543(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8543(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_8543(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8556)
+static void C_fcall trf_8556(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8556(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8556(t0,t1);}
+
+C_noret_decl(trf_8286)
+static void C_fcall trf_8286(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8286(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8286(t0,t1,t2);}
+
+C_noret_decl(trf_8216)
+static void C_fcall trf_8216(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8216(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_8216(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8229)
+static void C_fcall trf_8229(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8229(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8229(t0,t1);}
+
+C_noret_decl(trf_8020)
+static void C_fcall trf_8020(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8020(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8020(t0,t1,t2);}
+
+C_noret_decl(trf_7980)
+static void C_fcall trf_7980(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7980(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_7980(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7932)
+static void C_fcall trf_7932(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7932(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7932(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7959(t0,t1,t2);}
+
+C_noret_decl(trf_7886)
+static void C_fcall trf_7886(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7886(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_7886(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7846)
+static void C_fcall trf_7846(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7846(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7846(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 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_7652(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_7724)
+static void C_fcall trf_7724(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7724(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7724(t0,t1);}
+
+C_noret_decl(trf_7676)
+static void C_fcall trf_7676(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7676(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7676(t0,t1,t2);}
+
+C_noret_decl(trf_7703)
+static void C_fcall trf_7703(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7703(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7703(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 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_7583(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7552)
+static void C_fcall trf_7552(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7552(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_7552(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7483)
+static void C_fcall trf_7483(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7483(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7483(t0,t1,t2);}
+
+C_noret_decl(trf_7418)
+static void C_fcall trf_7418(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7418(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7418(t0,t1,t2);}
+
+C_noret_decl(trf_7366)
+static void C_fcall trf_7366(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7366(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7366(t0,t1,t2);}
+
+C_noret_decl(trf_7393)
+static void C_fcall trf_7393(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7393(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7393(t0,t1,t2);}
+
+C_noret_decl(trf_7326)
+static void C_fcall trf_7326(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7326(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7326(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_7174)
+static void C_fcall trf_7174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7174(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7174(t0,t1,t2);}
+
+C_noret_decl(trf_7272)
+static void C_fcall trf_7272(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7272(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7272(t0,t1,t2);}
+
+C_noret_decl(trf_7216)
+static void C_fcall trf_7216(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7216(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7216(t0,t1,t2);}
+
+C_noret_decl(trf_6909)
+static void C_fcall trf_6909(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6909(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_6909(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6922)
+static void C_fcall trf_6922(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6922(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6922(t0,t1);}
+
+C_noret_decl(trf_6934)
+static void C_fcall trf_6934(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6934(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6934(t0,t1);}
+
+C_noret_decl(trf_6761)
+static void C_fcall trf_6761(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6761(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6761(t0,t1,t2);}
+
+C_noret_decl(trf_6590)
+static void C_fcall trf_6590(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6590(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6590(t0,t1,t2);}
+
+C_noret_decl(trf_6672)
+static void C_fcall trf_6672(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6672(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6672(t0,t1,t2);}
+
+C_noret_decl(trf_6481)
+static void C_fcall trf_6481(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6481(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6481(t0,t1,t2);}
+
+C_noret_decl(trf_6437)
+static void C_fcall trf_6437(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6437(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6437(t0,t1,t2);}
+
+C_noret_decl(trf_6464)
+static void C_fcall trf_6464(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6464(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6464(t0,t1,t2);}
+
+C_noret_decl(trf_6402)
+static void C_fcall trf_6402(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6402(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6402(t0,t1,t2);}
+
+C_noret_decl(trf_6358)
+static void C_fcall trf_6358(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6358(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6358(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6385(t0,t1,t2);}
+
+C_noret_decl(trf_6276)
+static void C_fcall trf_6276(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6276(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6276(t0,t1,t2);}
+
+C_noret_decl(trf_6068)
+static void C_fcall trf_6068(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6068(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_6068(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_6074)
+static void C_fcall trf_6074(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6074(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_6074(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_5971)
+static void C_fcall trf_5971(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5971(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_5971(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_5989)
+static void C_fcall trf_5989(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5989(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_5989(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_5460)
+static void C_fcall trf_5460(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5460(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_5460(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5309)
+static void C_fcall trf_5309(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5309(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5309(t0,t1,t2);}
+
+C_noret_decl(trf_4999)
+static void C_fcall trf_4999(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4999(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4999(t0,t1);}
+
+C_noret_decl(trf_5099)
+static void C_fcall trf_5099(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5099(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_5099(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5050)
+static void C_fcall trf_5050(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5050(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_5050(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5063)
+static void C_fcall trf_5063(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5063(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5063(t0,t1);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4866(t0,t1,t2);}
+
+C_noret_decl(trf_4872)
+static void C_fcall trf_4872(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4872(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4872(t0,t1,t2);}
+
+C_noret_decl(trf_4429)
+static void C_fcall trf_4429(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4429(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4429(t0,t1,t2);}
+
+C_noret_decl(trf_4148)
+static void C_fcall trf_4148(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4148(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4148(t0,t1,t2);}
+
+C_noret_decl(trf_4272)
+static void C_fcall trf_4272(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4272(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4272(t0,t1,t2);}
+
+C_noret_decl(trf_4058)
+static void C_fcall trf_4058(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4058(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4058(t0,t1,t2);}
+
+C_noret_decl(trf_4011)
+static void C_fcall trf_4011(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4011(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4011(t0,t1,t2);}
+
+C_noret_decl(trf_3722)
+static void C_fcall trf_3722(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3722(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_3722(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3748)
+static void C_fcall trf_3748(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3748(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3748(t0,t1);}
+
+C_noret_decl(trf_3784)
+static void C_fcall trf_3784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3784(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3784(t0,t1);}
+
+C_noret_decl(trf_3475)
+static void C_fcall trf_3475(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3475(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_3475(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_3244)
+static void C_fcall trf_3244(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3244(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_3244(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_2966)
+static void C_fcall trf_2966(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2966(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_2966(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_3112)
+static void C_fcall trf_3112(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3112(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3112(t0,t1);}
+
+C_noret_decl(trf_2976)
+static void C_fcall trf_2976(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2976(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2976(t0,t1);}
+
+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_2586)
+static void C_fcall trf_2586(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2586(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2586(t0,t1,t2);}
+
+C_noret_decl(trf_2523)
+static void C_fcall trf_2523(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2523(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2523(t0,t1,t2);}
+
+C_noret_decl(trf_2475)
+static void C_fcall trf_2475(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2475(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2475(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(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(3170)){
+C_save(t1);
+C_rereclaim2(3170*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,244);
+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],9,"\003sysmap-n");
+lf[17]=C_h_intern(&lf[17],24,"\004corelet-compiler-syntax");
+lf[18]=C_h_intern(&lf[18],25,"\003syssyntax-rules-mismatch");
+lf[19]=C_h_intern(&lf[19],9,"\003syslist\077");
+lf[20]=C_h_intern(&lf[20],9,"\003sysnull\077");
+lf[21]=C_h_intern(&lf[21],22,"define-compiler-syntax");
+lf[22]=C_h_intern(&lf[22],6,"lambda");
+lf[23]=C_h_intern(&lf[23],27,"\004coredefine-compiler-syntax");
+lf[24]=C_h_intern(&lf[24],3,"use");
+lf[25]=C_h_intern(&lf[25],22,"\004corerequire-extension");
+lf[26]=C_h_intern(&lf[26],16,"\003syscheck-syntax");
+lf[27]=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[28]=C_h_intern(&lf[28],17,"define-for-syntax");
+lf[29]=C_h_intern(&lf[29],10,"\003sysappend");
+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],21,"\003sysmacro-environment");
+lf[241]=C_h_intern(&lf[241],11,"\003sysprovide");
+lf[242]=C_h_intern(&lf[242],19,"chicken-more-macros");
+lf[243]=C_h_intern(&lf[243],14,"chicken-syntax");
+C_register_lf2(lf,244,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2285,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 35 ##sys#provide */
+t3=*((C_word*)lf[241]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[242],lf[243]);}
+
+/* k2283 */
+static void C_ccall f_2285(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2285,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2289,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 43 ##sys#macro-environment */
+t3=*((C_word*)lf[240]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k2287 in k2283 */
+static void C_ccall f_2289(C_word c,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_2289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2292,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_10318,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10320,a[2]=((C_word)li135),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 47 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10319 in k2287 in k2283 */
+static void C_ccall f_10320(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_10320,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10324,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 49 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[232],t2,lf[239]);}
+
+/* k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10324(C_word c,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_10324,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|5,a[1]=(C_word)f_10333,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: 52 symbol->string */
+t5=*((C_word*)lf[141]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10333(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_10333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10336,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: 53 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
+
+/* k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10336(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_10336,2,t0,t1);}
+t2=(C_word)C_i_memq(lf[71],*((C_word*)lf[72]+1));
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10342,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: 55 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
+
+/* k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10342(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_10342,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10345,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: 56 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
+
+/* k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10345(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_10345,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10348,a[2]=((C_word*)t0)[2],a[3]=((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: 57 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
+
+/* k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10348,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10351,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: 58 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10351(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_10351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10721,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_10761,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 61 string-append */
+t4=*((C_word*)lf[140]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[238],((C_word*)t0)[2]);}
+
+/* k10759 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10761(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 61 string->symbol */
+t2=*((C_word*)lf[139]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10721(C_word c,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_10721,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t2);
+t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10753,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);}
+
+/* k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10753(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_10753,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[69],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)[12],t4);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],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)[10],t7);
+t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t8);
+t10=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_10669,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_10713,a[2]=t10,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 64 string-append */
+t12=*((C_word*)lf[140]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,((C_word*)t0)[2],lf[237]);}
+
+/* k10711 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10713(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 64 string->symbol */
+t2=*((C_word*)lf[139]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10669(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10669,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[41],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[80],t5);
+t7=(C_word)C_a_i_cons(&a,2,lf[70],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*)t0)[11],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,t1,t11);
+t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t12);
+t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10374,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_10378,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_10380,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)li134),tmp=(C_word)a,a+=12,tmp));
+t19=((C_word*)t17)[1];
+f_10380(t19,t15,((C_word*)t0)[2],C_fix(1));}
+
+/* mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_fcall f_10380(C_word t0,C_word 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_10380,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_10390,a[2]=((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_word)C_slot(t2,C_fix(0));
+/* chicken-syntax.scm: 69 symbol->string */
+t7=*((C_word*)lf[141]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}}
+
+/* k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10390(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_10390,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_10393,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_10657,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 70 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]);}
+
+/* k10655 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10657(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 70 string->symbol */
+t2=*((C_word*)lf[139]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10391 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+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[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10393,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_10396,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_10653,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 71 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]);}
+
+/* k10651 in k10391 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10653(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 71 string->symbol */
+t2=*((C_word*)lf[139]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10394 in k10391 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10396(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10396,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[80],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],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,lf[80],t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[73],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[74],t9);
+t11=(C_word)C_a_i_cons(&a,2,lf[233],C_SCHEME_END_OF_LIST);
+t12=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[80],t12);
+t14=(C_word)C_a_i_cons(&a,2,lf[76],t13);
+t15=(C_word)C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=(C_word)C_a_i_cons(&a,2,t10,t15);
+t17=(C_word)C_a_i_cons(&a,2,t3,t16);
+t18=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t17);
+t19=(C_word)C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
+t21=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t20);
+t22=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_10443,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_word)C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t24=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t25=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],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,lf[80],t26);
+t28=(C_word)C_a_i_cons(&a,2,lf[73],t27);
+t29=(C_word)C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
+t30=(C_word)C_a_i_cons(&a,2,lf[74],t29);
+t31=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t32=(C_word)C_a_i_cons(&a,2,lf[80],t31);
+t33=(C_word)C_a_i_cons(&a,2,lf[75],t32);
+t34=(C_word)C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
+t35=(C_word)C_a_i_cons(&a,2,t30,t34);
+t36=(C_word)C_a_i_cons(&a,2,t23,t35);
+t37=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t36);
+t38=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t39=(C_word)C_a_i_cons(&a,2,t37,t38);
+t40=t22;
+f_10443(t40,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t39));}
+else{
+t23=(C_word)C_a_i_cons(&a,2,lf[80],C_SCHEME_END_OF_LIST);
+t24=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t25=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],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,lf[80],t26);
+t28=(C_word)C_a_i_cons(&a,2,lf[73],t27);
+t29=(C_word)C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST);
+t30=(C_word)C_a_i_cons(&a,2,lf[74],t29);
+t31=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t32=(C_word)C_a_i_cons(&a,2,lf[80],t31);
+t33=(C_word)C_a_i_cons(&a,2,lf[75],t32);
+t34=(C_word)C_a_i_cons(&a,2,t33,C_SCHEME_END_OF_LIST);
+t35=(C_word)C_a_i_cons(&a,2,t30,t34);
+t36=(C_word)C_a_i_cons(&a,2,t23,t35);
+t37=t22;
+f_10443(t37,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t36));}}
+
+/* k10441 in k10394 in k10391 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_fcall f_10443(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_10443,NULL,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)[9],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],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)[7],t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10407,a[2]=t7,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t9=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t10=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+/* chicken-syntax.scm: 90 mapslots */
+t11=((C_word*)((C_word*)t0)[2])[1];
+f_10380(t11,t8,t9,t10);}
+
+/* k10405 in k10441 in k10394 in k10391 in k10388 in mapslots in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10407(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_10407,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));}
+
+/* k10376 in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+static void C_ccall f_10378(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k10372 in k10667 in k10751 in k10719 in k10349 in k10346 in k10343 in k10340 in k10334 in k10331 in k10322 in a10319 in k2287 in k2283 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10374,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k10316 in k2287 in k2283 */
+static void C_ccall f_10318(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[232],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2290 in k2287 in k2283 */
+static void C_ccall f_2292(C_word c,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_2292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2295,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_10175,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10177,a[2]=((C_word)li133),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 95 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10177(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_10177,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10181,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 97 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+
+/* k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10181(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_10181,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10184,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: 98 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10184(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_10184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10187,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: 99 ##sys#check-syntax */
+t3=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[229],((C_word*)t0)[4],lf[231]);}
+
+/* k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10187(C_word c,C_word t0,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_10187,2,t0,t1);}
+t2=(C_word)C_i_cddr(((C_word*)t0)[5]);
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10216,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+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_10223,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: 103 ##sys#check-syntax */
+t4=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[229],((C_word*)t0)[5],lf[230]);}}
+
+/* k10221 in k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10223(C_word c,C_word t0,C_word 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_10223,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
+t3=(C_word)C_i_caddr(((C_word*)t0)[5]);
+t4=(C_word)C_i_cdddr(((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10238,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_word)C_i_pairp(t2))){
+t6=(C_word)C_i_cdr(t2);
+t7=t5;
+f_10238(t7,(C_word)C_i_nullp(t6));}
+else{
+t6=t5;
+f_10238(t6,C_SCHEME_FALSE);}}
+
+/* k10236 in k10221 in k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_fcall f_10238(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_10238,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[7]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],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,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10253,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[3],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,C_SCHEME_END_OF_LIST,t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10292,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}}
+
+/* k10290 in k10236 in k10221 in k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10292(C_word c,C_word t0,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_10292,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[97],t5));}
+
+/* k10251 in k10236 in k10221 in k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+static void C_ccall f_10253(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_10253,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));}
+
+/* k10214 in k10185 in k10182 in k10179 in a10176 in k2290 in k2287 in k2283 */
+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 t5;
+C_word t6;
+C_word ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10216,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,((C_word*)t0)[3],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[189],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,t3,t4);
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,lf[97],t5));}
+
+/* k10173 in k2290 in k2287 in k2283 */
+static void C_ccall f_10175(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 92 ##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);}
+
+/* k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2295(C_word c,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_2295,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2298,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_10076,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10078,a[2]=((C_word)li132),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 115 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10077 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10078(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_10078,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10082,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 117 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[188]);}
+
+/* k10080 in a10077 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10082(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_10082,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10085,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: 118 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
+
+/* k10083 in k10080 in a10077 in k2293 in k2290 in k2287 in k2283 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10085,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10088,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: 119 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k10086 in k10083 in k10080 in a10077 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10088(C_word c,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_10088,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[226],C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10167,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_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
+
+/* k10165 in k10086 in k10083 in k10080 in a10077 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10167(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10167,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,((C_word*)t0)[6],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[227],C_SCHEME_END_OF_LIST);
+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[228],t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t8=(C_word)C_a_i_cons(&a,2,lf[95],t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[96],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_word*)t0)[5],t11);
+t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t12);
+t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,t3,t14);
+t16=(C_word)C_a_i_cons(&a,2,lf[97],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,((C_word*)t0)[4],t17);
+t19=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t19+1)))(2,t19,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t18));}
+
+/* k10074 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10076(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 113 ##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);}
+
+/* k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2298(C_word c,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_2298,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2301,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_10058,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10060,a[2]=((C_word)li131),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 130 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a10059 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10060(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_10060,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10068,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cdr(t2);
+/* ##sys#append */
+t7=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+
+/* k10066 in a10059 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10068(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_10068,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[224],t1));}
+
+/* k10056 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10058(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 128 ##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);}
+
+/* k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2301(C_word c,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_2301,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2304,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_9969,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9971,a[2]=((C_word)li130),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 136 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9971(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_9971,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9975,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 138 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[214],t2,lf[223]);}
+
+/* k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9975(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_9975,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9978,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 139 ##sys#resolve-include-filename */
+t4=*((C_word*)lf[222]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_TRUE);}
+
+/* k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9978(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_9978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9981,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 140 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
+
+/* k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9981(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_9981,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9984,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_10047,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 141 load-verbose */
+t4=*((C_word*)lf[221]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k10045 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10047(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: 141 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_9984(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9984(C_word c,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_9984,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9991,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_9995,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9997,a[2]=((C_word*)t0)[2],a[3]=((C_word)li129),tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 143 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);}
+
+/* a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9997(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9997,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_10003,a[2]=t3,a[3]=t5,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10008,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10041,a[2]=t5,a[3]=t3,a[4]=((C_word)li128),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);}
+
+/* a10040 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10041(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_10041,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);}
+
+/* a10007 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10008(C_word 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_10008,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10016,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 146 read */
+t3=*((C_word*)lf[216]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k10014 in a10007 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10016(C_word c,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_10016,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_10018,a[2]=t3,a[3]=((C_word)li126),tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_10018(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* doloop107 in k10014 in a10007 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_10018(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_10018,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_eofp(t2))){
+/* chicken-syntax.scm: 149 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_10035,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: 146 read */
+t5=*((C_word*)lf[216]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k10033 in doloop107 in k10014 in a10007 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_10035(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10035,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10018(t3,((C_word*)t0)[2],t1,t2);}
+
+/* a10002 in a9996 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_10003,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);}
+
+/* k9993 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9995(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k9989 in k9982 in k9979 in k9976 in k9973 in a9970 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9991(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_9991,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));}
+
+/* k9967 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9969(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 134 ##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);}
+
+/* k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2304(C_word c,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_2304,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2307,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_9855,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9857,a[2]=((C_word)li124),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);}
+
+/* a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9857(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_9857,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9861,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 155 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[210],t2,lf[213]);}
+
+/* k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9861,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|5,a[1]=(C_word)f_9870,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: 158 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
+
+/* k9868 in k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9870(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_9870,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9873,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: 159 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
+
+/* k9871 in k9868 in k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9873(C_word c,C_word t0,C_word 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_9873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9876,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_word)C_eqp(C_SCHEME_END_OF_LIST,((C_word*)t0)[2]);
+if(C_truep(t3)){
+t4=(C_word)C_a_i_cons(&a,2,lf[212],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[41],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=t2;
+f_9876(t7,(C_word)C_a_i_cons(&a,2,lf[128],t6));}
+else{
+t4=t2;
+f_9876(t4,(C_word)C_i_car(((C_word*)t0)[2]));}}
+
+/* k9874 in k9871 in k9868 in k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9876(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9876,NULL,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,lf[74],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9911,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_word)C_i_length(((C_word*)t0)[3]);
+if(C_truep((C_word)C_fixnum_greaterp(t6,C_fix(1)))){
+t7=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* ##sys#append */
+t8=*((C_word*)lf[29]+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_9936,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 169 ##sys#strip-syntax */
+t8=*((C_word*)lf[211]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[6]);}}
+
+/* k9934 in k9874 in k9871 in k9868 in k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9936(C_word c,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_9936,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)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t4,C_SCHEME_END_OF_LIST);}
+
+/* k9909 in k9874 in k9871 in k9868 in k9859 in a9856 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9911(C_word c,C_word t0,C_word 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_9911,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,lf[129],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));}
+
+/* k9853 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9855(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[210],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2307(C_word c,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_2307,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2310,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_9718,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9720,a[2]=((C_word)li123),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 174 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9720(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_9720,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9724,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 176 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[205],t2,lf[209]);}
+
+/* k9722 in a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9724(C_word c,C_word t0,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_9724,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_9736,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: 180 r */
+t6=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[131]);}
+
+/* k9734 in k9722 in a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9736(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_9736,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9739,a[2]=((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: 181 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k9737 in k9734 in k9722 in a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9739(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_9739,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9742,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: 182 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k9740 in k9737 in k9734 in k9722 in a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t6;
+C_word t7;
+C_word 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_9742,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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,t3,C_SCHEME_END_OF_LIST);
+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,((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,lf[74],t7);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9789,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_word)C_i_pairp(((C_word*)t0)[2]))){
+/* ##sys#append */
+t10=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+else{
+t10=(C_word)C_a_i_cons(&a,2,lf[208],C_SCHEME_END_OF_LIST);
+t11=(C_word)C_a_i_cons(&a,2,lf[41],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,lf[128],t12);
+t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,lf[41],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)[6],t16);
+t18=(C_word)C_a_i_cons(&a,2,t13,t17);
+/* ##sys#append */
+t19=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t19+1)))(4,t19,t9,t18,C_SCHEME_END_OF_LIST);}}
+
+/* k9787 in k9740 in k9737 in k9734 in k9722 in a9719 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_9789,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[206],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[207],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,((C_word*)t0)[5],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)[4],t8);
+t10=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+
+/* k9716 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9718(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 171 ##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);}
+
+/* k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2310(C_word c,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_2310,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2313,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_9032,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9034,a[2]=((C_word)li122),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 195 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9034(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_9034,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9038,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 197 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[203],t2,lf[204]);}
+
+/* k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word 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_9038,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(C_word)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_9047,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_9681,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li121),tmp=(C_word)a,a+=6,tmp));
+t12=((C_word*)t10)[1];
+f_9681(t12,t8,t2);}
+
+/* loop167 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9681(C_word t0,C_word 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_9681,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[78]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9710,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));
+/* g183184 */
+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);}}
+
+/* k9708 in loop167 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9710(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9710,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));
+/* loop167180 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9681(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));
+/* loop167180 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9681(t6,((C_word*)t0)[3],t5);}}
+
+/* k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9047(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9047,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_9050,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_9637,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li120),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_9637(t10,t6,((C_word*)t0)[3]);}
+
+/* loop191 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9637(C_word t0,C_word 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_9637,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_9664,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_9675,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));
+/* g207208 */
+t6=t3;
+f_9664(t6,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k9673 in loop191 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9675(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9675,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));
+/* loop191204 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9637(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));
+/* loop191204 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9637(t6,((C_word*)t0)[3],t5);}}
+
+/* g207 in loop191 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9664(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_9664,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9672,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 201 gensym */
+t3=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9670 in g207 in loop191 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9672(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 201 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9050(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9050,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_9053,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_9593,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li118),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_9593(t10,t6,((C_word*)t0)[3]);}
+
+/* loop216 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9593(C_word t0,C_word 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_9593,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_9620,a[2]=((C_word*)t0)[5],a[3]=((C_word)li117),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9631,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));
+/* g232233 */
+t6=t3;
+f_9620(t6,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k9629 in loop216 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9631(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9631,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));
+/* loop216229 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9593(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));
+/* loop216229 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9593(t6,((C_word*)t0)[3],t5);}}
+
+/* g232 in loop216 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9620(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_9620,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9628,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 202 gensym */
+t3=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9626 in g232 in loop216 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 202 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9053(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_9053,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9056,a[2]=((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: 203 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9056(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_9056,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9059,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: 204 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t5;
+C_word t6;
+C_word t7;
+C_word 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_9059,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9070,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_9418,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_9507,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_9558,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li116),tmp=(C_word)a,a+=6,tmp));
+t16=((C_word*)t14)[1];
+f_9558(t16,t12,((C_word*)t0)[2]);}
+
+/* loop273 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9558(C_word t0,C_word 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_9558,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[146]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9587,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));
+/* g289290 */
+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);}}
+
+/* k9585 in loop273 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_9587,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));
+/* loop273286 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9558(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));
+/* loop273286 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9558(t6,((C_word*)t0)[3],t5);}}
+
+/* k9505 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9507(C_word c,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_9507,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_9509,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li115),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_9509(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop246 in k9505 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9509(C_word t0,C_word 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_9509,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[189]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9542,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));
+/* g266267 */
+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);}}
+
+/* k9540 in loop246 in k9505 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9542(C_word c,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_9542,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_9522,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_9522(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_9522(t5,t4);}}
+
+/* k9520 in k9540 in loop246 in k9505 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9522(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));
+/* loop246260 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9509(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9418(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_9418,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9422,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_9426,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9430,a[2]=((C_word*)t0)[3],a[3]=t7,a[4]=t4,a[5]=t6,tmp=(C_word)a,a+=6,tmp);
+t9=(C_word)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_9485,a[2]=t11,a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp));
+t13=((C_word*)t11)[1];
+f_9485(t13,t8,t9);}
+
+/* loop in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9485(C_word t0,C_word 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_9485,NULL,3,t0,t1,t2);}
+t3=(C_word)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_9499,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_fixnum_difference(t2,C_fix(1));
+/* chicken-syntax.scm: 210 loop */
+t7=t4;
+t8=t5;
+t1=t7;
+t2=t8;
+goto loop;}}
+
+/* k9497 in loop in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9499(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_9499,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,C_SCHEME_FALSE,t1));}
+
+/* k9428 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9430(C_word c,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_9430,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_9432,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li113),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_9432(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop296 in k9428 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9432(C_word t0,C_word 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_9432,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[189]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9465,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));
+/* g316317 */
+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);}}
+
+/* k9463 in loop296 in k9428 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9465(C_word c,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_9465,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_9445,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_9445(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_9445(t5,t4);}}
+
+/* k9443 in k9463 in loop296 in k9428 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9445(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));
+/* loop296310 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9432(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9424 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9426(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k9420 in k9416 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9422(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9070(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9270,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_9274,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_9354,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li112),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_9354(t11,t7,((C_word*)t0)[4],((C_word*)t0)[5]);}
+
+/* loop326 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9354(C_word t0,C_word 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_9354,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)C_slot(t2,C_fix(0));
+t7=(C_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[167],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9367,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_9367(t13,(C_word)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_9367(t14,t13);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k9365 in loop326 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9367(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));
+/* loop326340 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9354(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9272 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9274(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9278,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_9282,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_9292,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li111),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_9292(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop359 in k9272 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9292(C_word t0,C_word 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_9292,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)C_slot(t2,C_fix(0));
+t7=(C_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[167],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9305,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_9305(t13,(C_word)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_9305(t14,t13);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k9303 in loop359 in k9272 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9305(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));
+/* loop359373 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9292(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9280 in k9272 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9282(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_9282,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
+
+/* k9276 in k9272 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9278(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9270(C_word c,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_9270,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,((C_word*)t0)[9],t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9262,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9262(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_9262,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,((C_word*)t0)[9],t2);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9110,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_9114,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_9194,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word)li110),tmp=(C_word)a,a+=6,tmp));
+t13=((C_word*)t11)[1];
+f_9194(t13,t9,((C_word*)t0)[2],((C_word*)t0)[4]);}
+
+/* loop392 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9194(C_word t0,C_word 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_9194,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)C_slot(t2,C_fix(0));
+t7=(C_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[167],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9207,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_9207(t13,(C_word)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_9207(t14,t13);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k9205 in loop392 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9207(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));
+/* loop392406 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9194(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9112 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9114(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9114,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9118,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_9122,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_9132,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_9132(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop425 in k9112 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9132(C_word t0,C_word 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_9132,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)C_slot(t2,C_fix(0));
+t7=(C_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[167],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9145,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_9145(t13,(C_word)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_9145(t14,t13);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k9143 in loop425 in k9112 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_9145(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));
+/* loop425439 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_9132(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k9120 in k9112 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9122(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_9122,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
+
+/* k9116 in k9112 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9118(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k9108 in k9260 in k9268 in k9068 in k9057 in k9054 in k9051 in k9048 in k9045 in k9036 in a9033 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9110(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9110,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,((C_word*)t0)[7],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)[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,lf[187],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)[4],t8);
+t10=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+
+/* k9030 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9032(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 193 ##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);}
+
+/* k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2313(C_word c,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_2313,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2316,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_8911,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8913,a[2]=((C_word)li108),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 228 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8913(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_8913,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8917,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 230 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[192],t2,lf[202]);}
+
+/* k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8917,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8923,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: 232 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
+
+/* k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8923(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_8923,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9024,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)C_i_cddr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9024,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8929,a[2]=((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: 234 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[201]);}
+
+/* k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8929(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_8929,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8932,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: 235 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[200]);}
+
+/* k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8932(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_8932,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8935,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: 236 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[199]);}
+
+/* k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8935(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_8935,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_8938,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_8975,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)li107),tmp=(C_word)a,a+=11,tmp));
+t12=((C_word*)t10)[1];
+f_8975(t12,t8,((C_word*)t0)[2]);}
+
+/* loop in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8975(C_word t0,C_word 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_8975,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8988,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_8998,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: 243 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);}}
+
+/* k8996 in loop in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8998(C_word c,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_8998,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_set_block_item(((C_word*)t0)[12],0,C_SCHEME_TRUE);
+t3=(C_word)C_slot(((C_word*)t0)[11],C_fix(1));
+/* chicken-syntax.scm: 247 loop */
+t4=((C_word*)((C_word*)t0)[10])[1];
+f_8975(t4,((C_word*)t0)[9],t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9005,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: 244 c */
+t3=((C_word*)t0)[5];
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* k9003 in k8996 in loop in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9005,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_set_block_item(((C_word*)t0)[10],0,C_SCHEME_TRUE);
+t3=(C_word)C_slot(((C_word*)t0)[9],C_fix(1));
+/* chicken-syntax.scm: 247 loop */
+t4=((C_word*)((C_word*)t0)[8])[1];
+f_8975(t4,((C_word*)t0)[7],t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9012,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: 245 c */
+t3=((C_word*)t0)[4];
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k9010 in k9003 in k8996 in loop in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_9012(C_word 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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* chicken-syntax.scm: 247 loop */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_8975(t4,((C_word*)t0)[3],t3);}
+else{
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+/* chicken-syntax.scm: 246 ##sys#error */
+t3=*((C_word*)lf[129]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],lf[198],t2);}}
+
+/* k8986 in loop in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8988(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));
+/* chicken-syntax.scm: 247 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_8975(t3,((C_word*)t0)[2],t2);}
+
+/* k8936 in k8933 in k8930 in k8927 in k9022 in k8921 in k8915 in a8912 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8938(C_word c,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_8938,2,t0,t1);}
+if(C_truep((C_word)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_word)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_word)C_a_i_cons(&a,2,lf[194],t3));}
+else{
+if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
+t3=(C_word)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_word)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]));}}
+
+/* k8909 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8911(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 226 ##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);}
+
+/* k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2316(C_word c,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_2316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2319,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_8425,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8427,a[2]=((C_word)li106),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 259 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8427(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_8427,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8431,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 261 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[186],t2,lf[191]);}
+
+/* k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8431,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|5,a[1]=(C_word)f_8440,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: 264 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[190]);}
+
+/* k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8440(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_8440,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8443,a[2]=((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: 265 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8443(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_8443,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8446,a[2]=((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: 266 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8446(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8446,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_8449,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_8874,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li105),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_8874(t10,t6,((C_word*)t0)[2]);}
+
+/* loop515 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*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=*((C_word*)lf[78]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8903,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));
+/* g531532 */
+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);}}
+
+/* k8901 in loop515 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_8903,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));
+/* loop515528 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8874(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));
+/* loop515528 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8874(t6,((C_word*)t0)[3],t5);}}
+
+/* k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_8449,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_8452,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_8839,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li104),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_8839(t10,t6,((C_word*)t0)[2]);}
+
+/* loop539 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8839(C_word t0,C_word 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_8839,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[146]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8868,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));
+/* g555556 */
+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);}}
+
+/* k8866 in loop539 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_8868,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));
+/* loop539552 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8839(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));
+/* loop539552 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8839(t6,((C_word*)t0)[3],t5);}}
+
+/* k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8452(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8452,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_8455,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_8795,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li103),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_8795(t10,t6,((C_word*)t0)[3]);}
+
+/* loop563 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8795(C_word t0,C_word 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_8795,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_8822,a[2]=((C_word*)t0)[5],a[3]=((C_word)li102),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8833,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));
+/* g579580 */
+t6=t3;
+f_8822(t6,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8831 in loop563 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8833(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8833,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));
+/* loop563576 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8795(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));
+/* loop563576 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8795(t6,((C_word*)t0)[3],t5);}}
+
+/* g579 in loop563 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8822(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_8822,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8830,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 269 gensym */
+t3=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k8828 in g579 in loop563 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8830(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 269 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8455(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8455,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_8458,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_8751,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li101),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_8751(t10,t6,((C_word*)t0)[3]);}
+
+/* loop588 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8751(C_word t0,C_word 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_8751,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_8778,a[2]=((C_word*)t0)[5],a[3]=((C_word)li100),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8789,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));
+/* g604605 */
+t6=t3;
+f_8778(t6,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8787 in loop588 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8789(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8789,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));
+/* loop588601 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8751(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));
+/* loop588601 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8751(t6,((C_word*)t0)[3],t5);}}
+
+/* g604 in loop588 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8778(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_8778,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8786,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 270 gensym */
+t3=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k8784 in g604 in loop588 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8786(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 270 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8458(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_8458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8469,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_8647,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_8702,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li99),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_8702(t11,t7,((C_word*)t0)[4],((C_word*)t0)[2]);}
+
+/* loop616 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8702(C_word t0,C_word 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_8702,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[189]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8735,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));
+/* g636637 */
+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);}}
+
+/* k8733 in loop616 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8735(C_word c,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_8735,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_8715,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_8715(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_8715(t5,t4);}}
+
+/* k8713 in k8733 in loop616 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8715(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));
+/* loop616630 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8702(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k8645 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8647(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8647,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_8651,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_8653,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li98),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_8653(t10,t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop643 in k8645 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8653(C_word t0,C_word 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_8653,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[189]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8686,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));
+/* g663664 */
+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);}}
+
+/* k8684 in loop643 in k8645 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8686(C_word c,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_8686,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_8666,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_8666(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_8666(t5,t4);}}
+
+/* k8664 in k8684 in loop643 in k8645 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8666(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));
+/* loop643657 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8653(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k8649 in k8645 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8651(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 271 ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8469(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_8469,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8537,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_8541,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_8543,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word*)t0)[6],a[6]=((C_word)li97),tmp=(C_word)a,a+=7,tmp));
+t11=((C_word*)t9)[1];
+f_8543(t11,t7,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop670 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8543(C_word t0,C_word 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_8543,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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8574,a[2]=((C_word*)t0)[5],a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+t9=f_8574(C_a_i(&a,39),t6,t7,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_8556,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_8556(t12,(C_word)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_8556(t13,t12);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k8554 in loop670 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8556(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));
+/* loop670684 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8543(t5,((C_word*)t0)[2],t3,t4);}
+
+/* g690 in loop670 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_8574(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_word)C_a_i_cons(&a,2,t1,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[188],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,t2,C_SCHEME_END_OF_LIST);
+t8=(C_word)C_a_i_cons(&a,2,t1,t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[188],C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,t2,t9);
+t11=(C_word)C_a_i_cons(&a,2,lf[167],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,t8,t12);
+t14=(C_word)C_a_i_cons(&a,2,t6,t13);
+return((C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t14));}
+
+/* k8539 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8541(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8535 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8537(C_word c,C_word t0,C_word t1){
+C_word 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_8537,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,((C_word*)t0)[7],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)[6],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8517,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k8515 in k8535 in k8467 in k8456 in k8453 in k8450 in k8447 in k8444 in k8441 in k8438 in k8429 in a8426 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8517(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_8517,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,((C_word*)t0)[7],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],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,((C_word*)t0)[6],t5);
+t7=(C_word)C_a_i_cons(&a,2,lf[187],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)[5],t8);
+t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],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)[3],t11);
+t13=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t12));}
+
+/* k8423 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8425(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 257 ##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);}
+
+/* k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2319(C_word c,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_2319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2322,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_8380,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8382,a[2]=((C_word)li95),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 284 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8381 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8382(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_8382,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8386,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 286 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[184],t2,lf[185]);}
+
+/* k8384 in a8381 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8386(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_8386,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8393,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: 287 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k8391 in k8384 in a8381 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8393(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_8393,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8413,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: 288 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
+
+/* k8411 in k8391 in k8384 in a8381 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8413(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_8413,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8417,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k8415 in k8411 in k8391 in k8384 in a8381 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8417,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_SCHEME_END_OF_LIST);
+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));}
+
+/* k8378 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8380(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 282 ##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);}
+
+/* k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2322,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2325,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_8327,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8329,a[2]=((C_word)li94),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 292 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8328 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8329(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_8329,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8333,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 294 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[182],t2,lf[183]);}
+
+/* k8331 in a8328 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8333(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_8333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8340,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: 295 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k8338 in k8331 in a8328 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8340(C_word c,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_8340,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(C_word)C_a_i_cons(&a,2,lf[180],C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8368,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: 297 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[55]);}
+
+/* k8366 in k8338 in k8331 in a8328 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8368(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_8368,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8372,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)C_i_cddr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k8370 in k8366 in k8338 in k8331 in a8328 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8372(C_word c,C_word t0,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_8372,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,t2,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],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));}
+
+/* k8325 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8327(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 290 ##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);}
+
+/* k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2325(C_word c,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_2325,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2328,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_8099,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8101,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 301 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8101(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_8101,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8105,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 303 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[175],t2,lf[181]);}
+
+/* k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8105(C_word c,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_8105,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(C_word)C_i_caddr(((C_word*)t0)[4]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8114,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 306 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[22]);}
+
+/* k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8114(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8114,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[4]))){
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],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,t1,t3);
+t5=(C_word)C_a_i_cons(&a,2,lf[180],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,C_SCHEME_END_OF_LIST,t6);
+t8=(C_word)C_a_i_cons(&a,2,t1,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,t4,t9);
+t11=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_cons(&a,2,lf[97],t10));}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,t3,t4);
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)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_8183,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_8286,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li92),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_8286(t11,t7,((C_word*)t0)[4]);}}}
+
+/* loop741 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8286(C_word t0,C_word 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_8286,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[60]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8315,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));
+/* g757758 */
+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);}}
+
+/* k8313 in loop741 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8315(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8315,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));
+/* loop741754 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8286(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));
+/* loop741754 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8286(t6,((C_word*)t0)[3],t5);}}
+
+/* k8181 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8183(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_8183,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,((C_word*)t0)[4],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8210,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_8214,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_8216,a[2]=t7,a[3]=t12,a[4]=t9,a[5]=((C_word)li91),tmp=(C_word)a,a+=6,tmp));
+t14=((C_word*)t12)[1];
+f_8216(t14,t10,((C_word*)t0)[2],t1);}
+
+/* loop768 in k8181 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8216(C_word t0,C_word 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_8216,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)C_slot(t2,C_fix(0));
+t7=(C_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[167],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8229,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_8229(t13,(C_word)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_8229(t14,t13);}}
+else{
+t6=((C_word*)((C_word*)t0)[2])[1];
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k8227 in loop768 in k8181 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8229(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));
+/* loop768782 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8216(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k8212 in k8181 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8214(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8208 in k8181 in k8112 in k8103 in a8100 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8210(C_word c,C_word t0,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_8210,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[97],t5));}
+
+/* k8097 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8099(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 299 ##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);}
+
+/* k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2328(C_word c,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_2328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2331,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_8057,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8059,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 325 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8059(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_8059,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8063,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 327 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[174],t2,lf[179]);}
+
+/* k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8063,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8066,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_8083,a[2]=((C_word)li89),tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)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);}
+
+/* a8082 in k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8083(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_8083,3,t0,t1,t2);}
+t3=*((C_word*)lf[176]+1);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8091,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 328 ##sys#current-module */
+t5=*((C_word*)lf[177]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k8089 in a8082 in k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8091(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g816817 */
+t2=((C_word*)t0)[4];
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8064 in k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8066,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8073,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 329 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[175]);}
+
+/* k8071 in k8064 in k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8073(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_8073,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8077,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k8075 in k8071 in k8064 in k8061 in a8058 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8077(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_8077,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));}
+
+/* k8055 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8057(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 323 ##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);}
+
+/* k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2331(C_word c,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_2331,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2334,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_7532,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7534,a[2]=((C_word)li88),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 333 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7534(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_7534,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7538,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 335 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[171],t2,lf[173]);}
+
+/* k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7538(C_word c,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_7538,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|5,a[1]=(C_word)f_7547,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: 338 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
+
+/* k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7547(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_7547,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7550,a[2]=((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: 339 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t7;
+C_word 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_7550,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_7552,a[2]=t3,a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7583,a[2]=t5,a[3]=((C_word)li77),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_7625,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_8020,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li87),tmp=(C_word)a,a+=6,tmp));
+t16=((C_word*)t14)[1];
+f_8020(t16,t12,((C_word*)t0)[3]);}
+
+/* loop847 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_8020(C_word t0,C_word 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_8020,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[78]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8049,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));
+/* g863864 */
+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);}}
+
+/* k8047 in loop847 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_8049(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8049,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));
+/* loop847860 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8020(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));
+/* loop847860 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8020(t6,((C_word*)t0)[3],t5);}}
+
+/* k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7625(C_word c,C_word t0,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_7625,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7628,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_7980,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li86),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_7980(t6,t2,t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7980(C_word t0,C_word 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_7980,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_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7993,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_listp(t4))){
+/* chicken-syntax.scm: 355 append */
+t6=*((C_word*)lf[48]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,t3);}
+else{
+if(C_truep((C_word)C_i_pairp(t4))){
+/* chicken-syntax.scm: 356 append* */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_7552(t6,t5,t4,t3);}
+else{
+t6=(C_word)C_a_i_cons(&a,2,t4,t3);
+t7=(C_word)C_i_cdr(t2);
+/* chicken-syntax.scm: 358 loop */
+t10=t1;
+t11=t7;
+t12=t6;
+t1=t10;
+t2=t11;
+t3=t12;
+goto loop;}}}}
+
+/* k7991 in loop in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 *a;
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 358 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_7980(t3,((C_word*)t0)[2],t2,t1);}
+
+/* k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_7628,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_7631,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_7932,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li85),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_7932(t10,t6,t1);}
+
+/* loop885 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7932(C_word t0,C_word 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_7932,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_7959,a[2]=((C_word*)t0)[5],a[3]=((C_word)li84),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7974,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));
+/* g901902 */
+t6=t3;
+f_7959(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7972 in loop885 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7974(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7974,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));
+/* loop885898 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7932(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));
+/* loop885898 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7932(t6,((C_word*)t0)[3],t5);}}
+
+/* g901 in loop885 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7959(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_7959,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7967,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7971,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 359 gensym */
+t5=*((C_word*)lf[60]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k7969 in g901 in loop885 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7971(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 359 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7965 in g901 in loop885 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7967(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_7967,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));}
+
+/* k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7631(C_word c,C_word t0,C_word 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_7631,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7632,a[2]=t1,a[3]=((C_word)li78),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|9,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]=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_7886,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t5,a[5]=((C_word)li83),tmp=(C_word)a,a+=6,tmp));
+t7=((C_word*)t5)[1];
+f_7886(t7,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
+
+/* loop in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7886(C_word t0,C_word 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_7886,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+/* chicken-syntax.scm: 363 reverse */
+t4=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
+else{
+t4=(C_word)C_i_car(t2);
+if(C_truep((C_word)C_i_pairp(t4))){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7926,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: 367 map* */
+t6=((C_word*)((C_word*)t0)[3])[1];
+f_7583(t6,t5,((C_word*)t0)[2],t4);}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7919,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: 366 lookup */
+t6=((C_word*)t0)[2];
+f_7632(3,t6,t5,t4);}}}
+
+/* k7917 in loop in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7919(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_7919,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 368 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7886(t4,((C_word*)t0)[2],t3,t2);}
+
+/* k7924 in loop in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7926(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_7926,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 368 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7886(t4,((C_word*)t0)[2],t3,t2);}
+
+/* k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[22],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7643,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_7650,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_7846,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li82),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_7846(t10,t6,((C_word*)t0)[2]);}
+
+/* loop974 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7846(C_word t0,C_word 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_7846,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_cadr(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));
+/* loop974987 */
+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));
+/* loop974987 */
+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);}}
+
+/* k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7650(C_word c,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_7650,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_7652,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)li81),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_7652(t5,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7652(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_7652,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)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_7670,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_7676,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[5],a[6]=((C_word)li80),tmp=(C_word)a,a+=7,tmp));
+t13=((C_word*)t11)[1];
+f_7676(t13,t9,((C_word*)t0)[4]);}
+else{
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7724,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_word)C_i_car(t4);
+if(C_truep((C_word)C_i_pairp(t6))){
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7840,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 374 cdar */
+t8=*((C_word*)lf[47]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t4);}
+else{
+t7=t5;
+f_7724(t7,C_SCHEME_FALSE);}}}
+
+/* k7838 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7840(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_7724(t2,(C_word)C_i_nullp(t1));}
+
+/* k7722 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7724(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_7724,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7763,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: 375 caar */
+t3=*((C_word*)lf[50]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
+else{
+t2=(C_word)C_i_car(((C_word*)t0)[8]);
+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)[2],t4);
+t6=(C_word)C_i_car(((C_word*)t0)[4]);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7806,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_word)C_i_cdr(((C_word*)t0)[5]);
+t9=(C_word)C_i_cdr(((C_word*)t0)[8]);
+t10=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 380 fold */
+t11=((C_word*)((C_word*)t0)[3])[1];
+f_7652(t11,t7,t8,t9,t10);}}
+
+/* k7804 in k7722 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_7806,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)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(C_word)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_word)C_a_i_cons(&a,2,lf[97],t6));}
+
+/* k7761 in k7722 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_7763,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=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7743,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t7=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t8=(C_word)C_i_cdr(((C_word*)t0)[7]);
+t9=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 376 fold */
+t10=((C_word*)((C_word*)t0)[2])[1];
+f_7652(t10,t6,t7,t8,t9);}
+
+/* k7741 in k7761 in k7722 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7743(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_7743,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));}
+
+/* loop939 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void 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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_7676,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_7703,a[2]=((C_word*)t0)[5],a[3]=((C_word)li79),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7714,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));
+/* g955956 */
+t6=t3;
+f_7703(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7712 in loop939 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7714,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));
+/* loop939952 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7676(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));
+/* loop939952 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7676(t6,((C_word*)t0)[3],t5);}}
+
+/* g955 in loop939 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7703(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_7703,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7711,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 373 lookup */
+t4=((C_word*)t0)[2];
+f_7632(3,t4,t3,t2);}
+
+/* k7709 in g955 in loop939 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7711(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_7711,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*)t0)[2],t1));}
+
+/* k7668 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7670(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_7670,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7674,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k7672 in k7668 in fold in k7648 in k7641 in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7674(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_7674,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));}
+
+/* lookup in k7629 in k7626 in k7623 in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7632(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_7632,3,t0,t1,t2);}
+t3=(C_word)C_i_assq(t2,((C_word*)t0)[2]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
+
+/* map* in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7583(C_word 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_7583,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_word)C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7606,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t5=(C_word)C_i_car(t3);
+/* chicken-syntax.scm: 348 proc */
+t6=t2;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+else{
+/* chicken-syntax.scm: 347 proc */
+t4=t2;
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}}}
+
+/* k7604 in map* in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7606(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_7606,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7610,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* chicken-syntax.scm: 348 map* */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7583(t4,t2,((C_word*)t0)[2],t3);}
+
+/* k7608 in k7604 in map* in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7610(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_7610,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));}
+
+/* append* in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7552(C_word t0,C_word 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_7552,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|3,a[1]=(C_word)f_7573,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_i_cdr(t2);
+/* chicken-syntax.scm: 344 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_word)C_a_i_cons(&a,2,t2,t3));}}
+
+/* k7571 in append* in k7548 in k7545 in k7536 in a7533 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7573(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_7573,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));}
+
+/* k7530 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7532(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 331 ##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);}
+
+/* k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2334(C_word c,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_2334,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2337,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_7460,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7462,a[2]=((C_word)li75),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 384 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7462(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_7462,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7466,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 386 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[170],t2,lf[172]);}
+
+/* k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7466,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|5,a[1]=(C_word)f_7475,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: 389 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
+
+/* k7473 in k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7475(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_7475,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7478,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: 390 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[171]);}
+
+/* k7476 in k7473 in k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7478(C_word c,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_7478,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_7483,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=((C_word)li74),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_7483(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* fold in k7476 in k7473 in k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7483(C_word t0,C_word 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_7483,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_7501,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);}
+else{
+t3=(C_word)C_i_car(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_7520,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_i_cdr(t2);
+/* chicken-syntax.scm: 395 fold */
+t9=t5;
+t10=t6;
+t1=t9;
+t2=t10;
+goto loop;}}
+
+/* k7518 in fold in k7476 in k7473 in k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7520(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_7520,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));}
+
+/* k7499 in fold in k7476 in k7473 in k7464 in a7461 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7501,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));}
+
+/* k7458 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7460(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 382 ##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);}
+
+/* k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2337(C_word c,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_2337,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2340,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_7089,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7091,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 399 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7091(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_7091,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7095,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 401 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[166],t2,lf[169]);}
+
+/* k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7095,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|5,a[1]=(C_word)f_7104,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: 404 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[64]);}
+
+/* k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7104,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7107,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: 405 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7107(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7107,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7110,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_7416,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_7418,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li72),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_7418(t11,t7,((C_word*)t0)[3]);}
+
+/* loop1029 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7418(C_word t0,C_word 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_7418,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));
+/* loop10291042 */
+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));
+/* loop10291042 */
+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);}}
+
+/* k7414 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7416(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[29]+1),t1);}
+
+/* k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7110(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_7110,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_7113,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_7366,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[2],a[6]=((C_word)li71),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_7366(t10,t6,t1);}
+
+/* loop1054 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7366(C_word t0,C_word 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_7366,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_7393,a[2]=((C_word*)t0)[5],a[3]=((C_word)li70),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7408,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));
+/* g10701071 */
+t6=t3;
+f_7393(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7406 in loop1054 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7408(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7408,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));
+/* loop10541067 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7366(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));
+/* loop10541067 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7366(t6,((C_word*)t0)[3],t5);}}
+
+/* g1070 in loop1054 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7393(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_7393,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7401,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7405,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 407 gensym */
+t5=*((C_word*)lf[60]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k7403 in g1070 in loop1054 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7405(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 407 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7399 in g1070 in loop1054 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7401(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_7401,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));}
+
+/* k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7113(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7113,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7114,a[2]=t1,a[3]=((C_word)li63),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_7133,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_7326,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_7326(t11,t7,((C_word*)t0)[2]);}
+
+/* loop1084 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7326(C_word t0,C_word 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_7326,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,2,t3,lf[168]);
+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));
+/* loop10841097 */
+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));
+/* loop10841097 */
+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);}}
+
+/* k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7133(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7133,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7137,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_7141,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_7147,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)li68),tmp=(C_word)a,a+=8,tmp));
+t11=((C_word*)t9)[1];
+f_7147(t11,t7,((C_word*)t0)[2]);}
+
+/* loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_7147,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_7174,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li67),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7320,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));
+/* g11241125 */
+t6=t3;
+f_7174(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7318 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_7320,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));
+/* loop11081121 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7147(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));
+/* loop11081121 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7147(t6,((C_word*)t0)[3],t5);}}
+
+/* g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7174(C_word t0,C_word 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_7174,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cadr(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_SCHEME_END_OF_LIST,t4);
+t6=(C_word)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_7202,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_word)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_7272,a[2]=t8,a[3]=t14,a[4]=t10,a[5]=((C_word*)t0)[2],a[6]=((C_word)li66),tmp=(C_word)a,a+=7,tmp));
+t16=((C_word*)t14)[1];
+f_7272(t16,t11,t12);}
+
+/* loop1133 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7272(C_word t0,C_word 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_7272,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_7114(((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));
+/* loop11331146 */
+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));
+/* loop11331146 */
+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);}}
+
+/* k7200 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word 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_7202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7206,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_7210,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)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_7216,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li65),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_7216(t12,t7,t8);}
+
+/* loop1156 in k7200 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_7216(C_word t0,C_word 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_7216,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_7243,a[2]=((C_word*)t0)[5],a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_7243(C_a_i(&a,9),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));
+/* loop11561169 */
+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));
+/* loop11561169 */
+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);}}
+
+/* g1172 in loop1156 in k7200 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_7243(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_7114(((C_word*)t0)[2],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,t1,t3);
+return((C_word)C_a_i_cons(&a,2,lf[167],t4));}
+
+/* k7208 in k7200 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7210(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k7204 in k7200 in g1124 in loop1108 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_7206,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[97],t5));}
+
+/* k7139 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7141(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_7141,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7145,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* ##sys#append */
+t3=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k7143 in k7139 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7145(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k7135 in k7131 in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7137,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));}
+
+/* lookup in k7111 in k7108 in k7105 in k7102 in k7093 in a7090 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_7114(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));}
+
+/* k7087 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7089(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 397 ##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);}
+
+/* k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2340(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_2340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2343,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_7085,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 420 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[163]);}
+
+/* k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7085(C_word c,C_word t0,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_7085,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[163],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7006,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_7008,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 421 ##sys#er-transformer */
+t6=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a7007 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7008(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_7008,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7012,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 423 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[164],t2,lf[165]);}
+
+/* k7010 in a7007 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7012(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_7012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7015,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: 424 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
+
+/* k7013 in k7010 in a7007 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7015(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_7015,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7018,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: 425 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k7016 in k7013 in k7010 in a7007 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7018(C_word c,C_word t0,C_word 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_7018,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[5]);
+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,t1,t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7053,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: 428 r */
+t7=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[163]);}
+
+/* k7051 in k7016 in k7013 in k7010 in a7007 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7053(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7053,2,t0,t1);}
+t2=(C_word)C_i_cadr(((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_word*)t0)[5],t3);
+t5=(C_word)C_a_i_cons(&a,2,t1,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[97],t10));}
+
+/* k7004 in k7083 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_7006(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 418 ##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);}
+
+/* k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2343(C_word c,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_2343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2346,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_6901,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6903,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 432 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6903(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_6903,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6907,a[2]=t2,a[3]=t1,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 434 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+
+/* k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6907(C_word c,C_word t0,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_6907,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6909,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li60),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6990,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6994,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_i_cdr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 448 quotify-proc */
+t6=t2;
+f_6909(t6,t4,t5,lf[159]);}
+
+/* k6992 in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6994(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k6988 in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6990(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_6990,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[162],t1));}
+
+/* quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6909(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_6909,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6913,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: 437 ##sys#check-syntax */
+t5=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,t3,t2,lf[161]);}
+
+/* k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6913(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6913,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+t3=(C_word)C_i_pairp(t2);
+t4=(C_truep(t3)?(C_word)C_i_car(t2):t2);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6922,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_word)C_i_pairp(t2))){
+t6=(C_word)C_i_cdr(t2);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6970,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+t8=(C_word)C_i_cdr(((C_word*)t0)[5]);
+/* ##sys#append */
+t9=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
+else{
+t6=t5;
+f_6922(t6,(C_word)C_i_cadr(((C_word*)t0)[5]));}}
+
+/* k6968 in k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6970(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_6970,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=((C_word*)t0)[3];
+f_6922(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+
+/* k6920 in k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6922(C_word t0,C_word t1){
+C_word 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_6922,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6925,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)C_i_pairp(t1);
+t4=(C_word)C_i_not(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6934,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_6934(t6,t4);}
+else{
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6944,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(C_word)C_i_car(t1);
+/* chicken-syntax.scm: 443 c */
+t8=((C_word*)t0)[3];
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
+
+/* k6942 in k6920 in k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6944(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_6934(t2,(C_word)C_i_not(t1));}
+
+/* k6932 in k6920 in k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6934(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_6934,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* chicken-syntax.scm: 444 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_word)C_a_i_list(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]));}}
+
+/* k6923 in k6920 in k6911 in quotify-proc in k6905 in a6902 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6925(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_6925,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* k6899 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6901(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 430 ##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);}
+
+/* k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2346(C_word c,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_2346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2349,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_6738,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6740,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 452 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6740(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_6740,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6744,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 454 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[157],t2,lf[158]);}
+
+/* k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6744(C_word c,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_6744,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|5,a[1]=(C_word)f_6753,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: 457 r */
+t5=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[118]);}
+
+/* k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6753,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6756,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: 458 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6756(C_word c,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_6756,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_6761,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)li58),tmp=(C_word)a,a+=8,tmp));
+t5=((C_word*)t3)[1];
+f_6761(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6761(C_word t0,C_word 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_6761,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_6775,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 461 r */
+t4=((C_word*)t0)[5];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[55]);}
+else{
+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_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6835,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 465 fold */
+t17=t7;
+t18=t4;
+t1=t17;
+t2=t18;
+goto loop;}
+else{
+t6=(C_word)C_i_car(t3);
+t7=(C_word)C_i_cadr(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,t6,t8);
+t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6873,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: 469 fold */
+t17=t11;
+t18=t4;
+t1=t17;
+t2=t18;
+goto loop;}}
+else{
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6806,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 464 fold */
+t17=t5;
+t18=t4;
+t1=t17;
+t2=t18;
+goto loop;}}}
+
+/* k6804 in fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6806(C_word c,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_6806,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,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);
+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));}
+
+/* k6871 in fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6873(C_word c,C_word t0,C_word t1){
+C_word 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_6873,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,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)[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));}
+
+/* k6833 in fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6835(C_word c,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_6835,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,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);
+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));}
+
+/* k6773 in fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6775(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_6775,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6779,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* ##sys#append */
+t3=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k6777 in k6773 in fold in k6754 in k6751 in k6742 in a6739 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6779(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_6779,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));}
+
+/* k6736 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6738(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 450 ##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);}
+
+/* k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2349(C_word c,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_2349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2352,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_6538,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6540,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 473 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6540(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_6540,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6544,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 475 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[151],t2,lf[156]);}
+
+/* k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6544(C_word c,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_6544,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_6553,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: 478 r */
+t5=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[131]);}
+
+/* k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6553(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_6553,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6556,a[2]=((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: 479 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6556(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_6556,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6559,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: 480 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
+
+/* k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6559(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_6559,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6562,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: 481 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[155]);}
+
+/* k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6562(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_6562,2,t0,t1);}
+t2=(*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]=((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: 482 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
+
+/* k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6565,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,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]=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: 483 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6572(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6572,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],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_6588,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_6590,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)li56),tmp=(C_word)a,a+=10,tmp));
+t9=((C_word*)t7)[1];
+f_6590(t9,t5,((C_word*)t0)[2]);}
+
+/* expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6590(C_word 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_6590,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_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6606,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: 489 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+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]);}}
+
+/* k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6606(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_6606,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6612,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_word)C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 490 c */
+t4=((C_word*)t0)[3];
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
+
+/* k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6612(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_6612,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6619,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[7]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+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_6662,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_6666,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_6672,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li55),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_6672(t12,t7,t8);}}
+
+/* loop1293 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6672(C_word t0,C_word 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_6672,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_6699,a[2]=((C_word*)t0)[5],a[3]=((C_word)li54),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_6699(C_a_i(&a,9),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));
+/* loop12931306 */
+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));
+/* loop12931306 */
+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);}}
+
+/* g1309 in loop1293 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_6699(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_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2);
+return((C_word)C_a_i_cons(&a,2,lf[152],t3));}
+
+/* k6664 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6666(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k6660 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6662,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6654,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_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
+
+/* k6652 in k6660 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6654(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_6654,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6650,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: 495 expand */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_6590(t4,t3,((C_word*)t0)[2]);}
+
+/* k6648 in k6652 in k6660 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6650(C_word c,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_6650,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));}
+
+/* k6617 in k6610 in k6604 in expand in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6619(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_6619,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));}
+
+/* k6586 in k6570 in k6563 in k6560 in k6557 in k6554 in k6551 in k6542 in a6539 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6588,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));}
+
+/* k6536 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6538(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 471 ##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);}
+
+/* k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2352(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_2352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2355,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_6534,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 576 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
+
+/* k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6534,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6530,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 577 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
+
+/* k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t6;
+C_word t7;
+C_word ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6530,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[107],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)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5945,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_5947,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 578 ##sys#er-transformer */
+t7=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
+
+/* a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5947(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_5947,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5951,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 580 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[137],t2,lf[150]);}
+
+/* k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5951(C_word c,C_word t0,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_5951,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_5963,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: 584 r */
+t6=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[118]);}
+
+/* k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5963(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_5963,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5966,a[2]=((C_word*)t0)[2],a[3]=((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: 585 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5966,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5969,a[2]=((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: 586 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5969(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5969,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_5971,a[2]=t1,a[3]=((C_word)li43),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6068,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],a[5]=((C_word)li45),tmp=(C_word)a,a+=6,tmp));
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6269,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: 624 ##sys#check-syntax */
+t9=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,lf[137],((C_word*)t0)[2],lf[149]);}
+
+/* k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6269(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_6269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6272,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 625 ##sys#check-syntax */
+t3=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[137],((C_word*)t0)[8],lf[148]);}
+
+/* k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6272(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6272,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_6275,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_6481,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li52),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_6481(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1376 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6481(C_word t0,C_word 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_6481,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[78]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6510,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));
+/* g13921393 */
+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);}}
+
+/* k6508 in loop1376 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_6510,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));
+/* loop13761389 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6481(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));
+/* loop13761389 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6481(t6,((C_word*)t0)[3],t5);}}
+
+/* k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6275(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_6275,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6276,a[2]=((C_word)li46),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_6291,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_6437,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=t2,a[6]=((C_word*)t0)[5],a[7]=((C_word)li51),tmp=(C_word)a,a+=8,tmp));
+t11=((C_word*)t9)[1];
+f_6437(t11,t7,t1);}
+
+/* loop1403 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6437(C_word t0,C_word 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_6437,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_6464,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li50),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6475,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));
+/* g14191420 */
+t6=t3;
+f_6464(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6473 in loop1403 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6475(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6475,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));
+/* loop14031416 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6437(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));
+/* loop14031416 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6437(t6,((C_word*)t0)[3],t5);}}
+
+/* g1419 in loop1403 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6464(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_6464,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6472,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 633 prefix-sym */
+f_6276(t3,lf[147],t2);}
+
+/* k6470 in g1419 in loop1403 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6472(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 633 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6291(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6291,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_6294,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_6402,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_6402(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1428 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6402(C_word t0,C_word 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_6402,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[146]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6431,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));
+/* g14441445 */
+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);}}
+
+/* k6429 in loop1428 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_6431,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));
+/* loop14281441 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6402(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));
+/* loop14281441 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6402(t6,((C_word*)t0)[3],t5);}}
+
+/* k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6294(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_6294,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6297,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: 637 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[145]);}
+
+/* k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6297(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_6297,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6300,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 640 r */
+t3=((C_word*)t0)[7];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[144]);}
+
+/* k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6300(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6300,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_6303,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_6358,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)li48),tmp=(C_word)a,a+=8,tmp));
+t10=((C_word*)t8)[1];
+f_6358(t10,t6,((C_word*)t0)[12]);}
+
+/* loop1454 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6358(C_word t0,C_word 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_6358,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_6385,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_6396,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));
+/* g14701471 */
+t6=t3;
+f_6385(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6394 in loop1454 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_6396,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));
+/* loop14541467 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6358(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));
+/* loop14541467 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6358(t6,((C_word*)t0)[3],t5);}}
+
+/* g1470 in loop1454 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6385(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_6385,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6393,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 642 prefix-sym */
+f_6276(t3,lf[143],t2);}
+
+/* k6391 in g1470 in loop1454 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6393(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 642 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k6301 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6303(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_6303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6306,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: 645 make-default-procs */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5971(t3,t2,((C_word*)t0)[4],((C_word*)t0)[8],t1,((C_word*)t0)[2]);}
+
+/* k6304 in k6301 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6306(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_6306,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6309,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: 647 make-if-tree */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_6068(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[7],((C_word*)t0)[11]);}
+
+/* k6307 in k6304 in k6301 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6309(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_6309,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6316,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: 650 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[142]);}
+
+/* k6314 in k6307 in k6304 in k6301 in k6298 in k6295 in k6292 in k6289 in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6316(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_6316,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[7]);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],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,t7,((C_word*)t0)[4]);
+t9=(C_word)C_a_i_cons(&a,2,t3,t8);
+t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t11=(C_word)C_a_i_cons(&a,2,t9,t10);
+t12=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,t1,t11));}
+
+/* prefix-sym in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6276(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_6276,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6284,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6288,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 628 symbol->string */
+t6=*((C_word*)lf[141]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
+
+/* k6286 in prefix-sym in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6288(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 628 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);}
+
+/* k6282 in prefix-sym in k6273 in k6270 in k6267 in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6284(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 628 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 k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6068(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_6068,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_6074,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)li44),tmp=(C_word)a,a+=9,tmp));
+t9=((C_word*)t7)[1];
+f_6074(t9,t1,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_6074(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_6074,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6148,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: 612 r */
+t6=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[125]);}
+else{
+t5=(C_word)C_i_car(t2);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,lf[125],t6);
+t8=(C_word)C_i_car(t3);
+t9=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6262,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: 617 reverse */
+t10=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t4);}}
+
+/* k6260 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6262(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_6262,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],t1);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 618 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
+
+/* k6248 in k6260 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[26],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6250,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],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)[12],t4);
+t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_6234,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: 619 r */
+t7=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[107]);}
+
+/* k6232 in k6248 in k6260 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6234(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_6234,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],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)[13],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)[12],t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6198,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_word)C_i_cdr(((C_word*)t0)[6]);
+t10=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[3]);
+/* chicken-syntax.scm: 620 recur */
+t12=((C_word*)((C_word*)t0)[2])[1];
+f_6074(t12,t8,t9,t10,t11);}
+
+/* k6196 in k6232 in k6248 in k6260 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6198(C_word c,C_word t0,C_word t1){
+C_word 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_6198,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,t4,C_SCHEME_END_OF_LIST);
+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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7));}
+
+/* k6146 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6148(C_word c,C_word t0,C_word 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_6148,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,lf[74],t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6136,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: 613 reverse */
+t7=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[2]);}
+
+/* k6134 in k6146 in recur in make-if-tree in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word 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_6136,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,lf[138],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[41],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[128],t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],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[129],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,t2,t10);
+t12=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t12));}
+
+/* make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5971(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_5971,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5979,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: 592 reverse */
+t7=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t2);}
+
+/* k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5979(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_5979,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5983,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: 593 reverse */
+t3=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5983(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_5983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5987,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: 594 reverse */
+t3=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5987(C_word c,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_5987,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_5989,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_5989(t5,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* recur in k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5989(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_5989,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_END_OF_LIST);}
+else{
+t6=(C_word)C_i_cdr(t2);
+t7=(C_word)C_i_car(t3);
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6042,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: 599 reverse */
+t9=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t6);}}
+
+/* k6040 in recur in k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6042(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_6042,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6054,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_6058,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 600 reverse */
+t4=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k6056 in k6040 in recur in k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6058,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[3]);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t1,t3);}
+
+/* k6052 in k6040 in recur in k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6054(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_6054,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_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,t5,C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t6);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6010,a[2]=t7,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t9=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t10=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t11=(C_word)C_i_car(((C_word*)t0)[5]);
+/* chicken-syntax.scm: 601 recur */
+t12=((C_word*)((C_word*)t0)[3])[1];
+f_5989(t12,t8,((C_word*)t0)[2],t9,t10,t11);}
+
+/* k6008 in k6052 in k6040 in recur in k5985 in k5981 in k5977 in make-default-procs in k5967 in k5964 in k5961 in k5949 in a5946 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_6010(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_6010,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));}
+
+/* k5943 in k6528 in k6532 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5945(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 574 ##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);}
+
+/* k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2358,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_5937,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 670 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
+
+/* k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5937,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[125],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5933,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 671 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
+
+/* k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[8],*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,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5929,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: 672 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
+
+/* k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5929(C_word c,C_word t0,C_word t1){
+C_word 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_5929,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[107],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)[4],t3);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5720,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_5722,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 673 ##sys#er-transformer */
+t8=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}
+
+/* a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5722(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_5722,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5726,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 675 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[133],t2,lf[136]);}
+
+/* k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5726(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_5726,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5729,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: 676 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
+
+/* k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5729(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_5729,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5732,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: 677 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5732(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_5732,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5739,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: 678 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5739(C_word c,C_word t0,C_word 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_5739,2,t0,t1);}
+t2=(C_word)C_i_cadr(((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_word*)t0)[5],t3);
+t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5889,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: 679 r */
+t7=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[125]);}
+
+/* k5887 in k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5889(C_word c,C_word t0,C_word 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_5889,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,t1,t2);
+t4=(C_word)C_i_cddr(((C_word*)t0)[7]);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5774,a[2]=((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_word)C_i_nullp(t4))){
+t6=t5;
+f_5774(2,t6,C_SCHEME_FALSE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=t5;
+f_5774(2,t7,(C_word)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);}}}
+
+/* k5772 in k5887 in k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5774(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_5774,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5850,a[2]=((C_word*)t0)[2],a[3]=((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: 681 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
+
+/* k5848 in k5772 in k5887 in k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5850(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_5850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5862,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 681 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
+
+/* k5860 in k5848 in k5772 in k5887 in k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5862(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5862,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],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)[9],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,lf[74],t6);
+t8=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5834,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: 682 r */
+t9=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,lf[78]);}
+
+/* k5832 in k5860 in k5848 in k5772 in k5887 in k5737 in k5730 in k5727 in k5724 in a5721 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5834(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_5834,2,t0,t1);}
+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,t1,t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[134],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[41],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,lf[128],t6);
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],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,lf[129],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,t3,t11);
+t13=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t12);
+t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t13);
+t15=(C_word)C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t15);
+t17=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t16);
+t18=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t17);
+t19=(C_word)C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t20));}
+
+/* k5718 in k5927 in k5931 in k5935 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5720(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 668 ##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);}
+
+/* k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2361,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_5712,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 705 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[125]);}
+
+/* k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5712(C_word c,C_word t0,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_5712,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[125],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5406,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_5408,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 706 ##sys#er-transformer */
+t6=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5408(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_5408,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5412,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 708 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[126],t2,lf[132]);}
+
+/* k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_5412,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_5424,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: 712 r */
+t6=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
+
+/* k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5424,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5427,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: 713 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[125]);}
+
+/* k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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;
+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]=((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: 714 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
+
+/* k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5430,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5433,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: 715 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
+
+/* k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5433,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5436,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: 716 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5436,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,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],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: 717 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[131]);}
+
+/* k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_5439,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],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=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5458,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_5460,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)li39),tmp=(C_word)a,a+=11,tmp));
+t9=((C_word*)t7)[1];
+f_5460(t9,t5,t1,((C_word*)t0)[2]);}
+
+/* loop in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5460(C_word t0,C_word 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_5460,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t3))){
+t4=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],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,lf[74],t6);
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5526,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}
+else{
+t4=(C_word)C_i_car(t3);
+if(C_truep((C_word)C_i_pairp(t4))){
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5550,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: 728 r */
+t6=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[130]);}
+else{
+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,t6,C_SCHEME_END_OF_LIST);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5688,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}}}
+
+/* k5686 in loop in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5688(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_5688,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));}
+
+/* k5548 in loop in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5550(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_5550,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[11]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t3);
+t5=(C_word)C_i_cadr(((C_word*)t0)[11]);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],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_word)C_a_i_cons(&a,2,t4,t9);
+t11=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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,t2,t12);
+t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t14);
+t16=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
+t17=(C_word)C_a_i_cons(&a,2,lf[41],t16);
+t18=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t19=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t18);
+t20=(C_word)C_a_i_cons(&a,2,t19,C_SCHEME_END_OF_LIST);
+t21=(C_word)C_a_i_cons(&a,2,t17,t20);
+t22=(C_word)C_a_i_cons(&a,2,t15,t21);
+t23=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t22);
+t24=(C_word)C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
+t25=(C_word)C_a_i_cons(&a,2,t1,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,t13,t26);
+t28=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5569,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t27,tmp=(C_word)a,a+=5,tmp);
+t29=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 735 loop */
+t30=((C_word*)((C_word*)t0)[2])[1];
+f_5460(t30,t28,t1,t29);}
+
+/* k5567 in k5548 in loop in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5569,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));}
+
+/* k5524 in loop in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5526(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_5526,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,((C_word*)t0)[6],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[127],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[41],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,lf[128],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,lf[129],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,t3,t11);
+t13=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t13));}
+
+/* k5456 in k5437 in k5434 in k5431 in k5428 in k5425 in k5422 in k5410 in a5407 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5458,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));}
+
+/* k5404 in k5710 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5406(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 703 ##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);}
+
+/* k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2364,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_5398,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 743 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[106]);}
+
+/* k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5398(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_5398,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[106],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5394,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 744 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[78]);}
+
+/* k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5394(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_5394,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[78],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5390,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: 745 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[107]);}
+
+/* k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5390(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_5390,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[107],t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5386,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: 746 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[108]);}
+
+/* k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5386(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5386,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[108],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)[5],t3);
+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*)t0)[3],t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4858,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_4860,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 747 ##sys#er-transformer */
+t9=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
+
+/* a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4860(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_4860,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4864,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 749 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[109],t2,lf[124]);}
+
+/* k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4864(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_4864,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4866,a[2]=((C_word*)t0)[4],a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4901,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: 755 require */
+t4=*((C_word*)lf[122]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[123]);}
+
+/* k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word 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_4901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4904,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_5303,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)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_5309,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word)li37),tmp=(C_word)a,a+=6,tmp));
+t12=((C_word*)t10)[1];
+f_5309(t12,t7,t8);}
+
+/* loop1561 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5309(C_word t0,C_word 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_5309,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_5350,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_car(t4);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5346,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 757 ##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);}}
+
+/* a5345 in loop1561 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5346(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_5346,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
+
+/* k5348 in loop1561 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5350(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5350,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));
+/* loop15611574 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5309(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));
+/* loop15611574 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5309(t6,((C_word*)t0)[3],t5);}}
+
+/* k5301 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5303(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);}
+
+/* k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4904(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_4904,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4907,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: 761 genvars */
+t3=((C_word*)t0)[2];
+f_4866(t3,t2,t1);}
+
+/* k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4907,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4910,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: 762 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[120]);}
+
+/* k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4913,a[2]=((C_word*)t0)[2],a[3]=((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: 763 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[119]);}
+
+/* k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4913,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4916,a[2]=((C_word*)t0)[2],a[3]=((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: 764 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4916(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_4916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4919,a[2]=((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: 765 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4922,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 766 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[106]);}
+
+/* k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4922(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_4922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4925,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: 767 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[108]);}
+
+/* k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_4928,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: 768 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[78]);}
+
+/* k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4928(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_4928,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_4931,a[2]=((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: 769 r */
+t3=((C_word*)t0)[5];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[107]);}
+
+/* k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4931(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_4931,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_4934,a[2]=((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: 770 r */
+t3=((C_word*)t0)[5];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[118]);}
+
+/* k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4934,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4945,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 771 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]);}
+
+/* k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_4945,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[15],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[110],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)[14],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4969,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_4971,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)li35),tmp=(C_word)a,a+=14,tmp);
+t9=(C_word)C_i_cdr(((C_word*)t0)[2]);
+/* chicken-syntax.scm: 773 fold-right */
+t10=*((C_word*)lf[116]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t7,t8,lf[117],t9);}
+
+/* a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4971(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_4971,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4981,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)li34),tmp=(C_word)a,a+=16,tmp);
+/* chicken-syntax.scm: 775 ##sys#decompose-lambda-list */
+t6=*((C_word*)lf[115]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t4,t5);}
+
+/* a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4981(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_4981,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_4985,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 778 ##sys#check-syntax */
+t7=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[109],t6,lf[114]);}
+
+/* k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4985(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4985,2,t0,t1);}
+t2=(C_word)C_fixnum_difference(((C_word*)t0)[18],((C_word*)t0)[17]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_4999,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_word)C_eqp(t2,C_fix(0));
+if(C_truep(t4)){
+t5=t3;
+f_4999(t5,C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t5);
+t7=t3;
+f_4999(t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t6));}}
+else{
+t4=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t4);
+t6=t3;
+f_4999(t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}}
+
+/* k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4999(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_4999,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5007,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_5013,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word)li30),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5023,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)li33),tmp=(C_word)a,a+=11,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,t2,t3,t4);}
+
+/* a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5023(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_5023,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5027,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_5099,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)li32),tmp=(C_word)a,a+=10,tmp));
+t8=((C_word*)t6)[1];
+f_5099(t8,t4,t3,((C_word*)t0)[2]);}
+
+/* build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5099(C_word t0,C_word 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_5099,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+if(C_truep(((C_word*)t0)[8])){
+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,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5124,a[2]=((C_word*)t0)[7],a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+t8=(C_word)C_i_cdr(((C_word*)t0)[6]);
+/* ##sys#append */
+t9=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,t8,C_SCHEME_END_OF_LIST);}
+else{
+t4=(C_word)C_i_cddr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cadr(((C_word*)t0)[6]));}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5156,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_i_cdr(((C_word*)t0)[6]);
+/* ##sys#append */
+t7=*((C_word*)lf[29]+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_5167,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_5247,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 793 gensym */
+t6=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
+
+/* k5245 in build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 793 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k5165 in build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_5167,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[8]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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=(C_word)C_a_i_cons(&a,2,t2,t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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,t8,C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,t1,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,t6,t11);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5186,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t12,tmp=(C_word)a,a+=5,tmp);
+t14=(C_word)C_i_cdr(((C_word*)t0)[8]);
+if(C_truep((C_word)C_i_pairp(t14))){
+t15=(C_word)C_i_cdr(((C_word*)t0)[8]);
+/* chicken-syntax.scm: 797 build */
+t16=((C_word*)((C_word*)t0)[2])[1];
+f_5099(t16,t13,t15,t1);}
+else{
+/* chicken-syntax.scm: 798 build */
+t15=((C_word*)((C_word*)t0)[2])[1];
+f_5099(t15,t13,C_SCHEME_END_OF_LIST,t1);}}
+
+/* k5184 in k5165 in build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5186,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));}
+
+/* k5154 in build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5156(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_5156,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));}
+
+/* k5122 in build in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5124(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_5124,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));}
+
+/* k5025 in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5027(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_5027,2,t0,t1);}
+if(C_truep((C_word)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_5044,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_5050,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li31),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_5050(t10,t6,((C_word*)t0)[5],((C_word*)t0)[2]);}}
+
+/* loop1652 in k5025 in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5050(C_word t0,C_word 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_5050,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[113]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5083,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));
+/* g16721673 */
+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);}}
+
+/* k5081 in loop1652 in k5025 in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5083(C_word c,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_5083,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_5063,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_5063(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_5063(t5,t4);}}
+
+/* k5061 in k5081 in loop1652 in k5025 in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_5063(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));
+/* loop16521666 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_5050(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k5042 in k5025 in a5022 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5044(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_5044,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,t1,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));}
+
+/* a5012 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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!=2) C_bad_argc_2(c,2,t0);
+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_5021,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 786 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]);}
+
+/* k5019 in a5012 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5021(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 786 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]);}
+
+/* k5005 in k4997 in k4983 in a4980 in a4970 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_5007(C_word c,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_5007,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);
+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));}
+
+/* k4967 in k4943 in k4932 in k4929 in k4926 in k4923 in k4920 in k4917 in k4914 in k4911 in k4908 in k4905 in k4902 in k4899 in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4969(C_word c,C_word t0,C_word 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_4969,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,((C_word*)t0)[5],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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t6));}
+
+/* genvars in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4866(C_word 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_4866,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_4872,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t2,a[5]=((C_word)li28),tmp=(C_word)a,a+=6,tmp));
+t6=((C_word*)t4)[1];
+f_4872(t6,t1,C_fix(0));}
+
+/* loop in genvars in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4872(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_4872,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_4886,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_4898,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 754 gensym */
+t5=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k4896 in loop in genvars in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4898(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 754 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k4884 in loop in genvars in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4886(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_4886,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4890,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));
+/* chicken-syntax.scm: 754 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_4872(t4,t2,t3);}
+
+/* k4888 in k4884 in loop in genvars in k4862 in a4859 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4890(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_4890,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));}
+
+/* k4856 in k5384 in k5388 in k5392 in k5396 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4858(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 741 ##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);}
+
+/* k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2364,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2367,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_4756,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4758,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 811 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4758(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_4758,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4762,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 813 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[101],t2,lf[105]);}
+
+/* k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4762(C_word c,C_word t0,C_word t1){
+C_word 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_4762,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(C_word)C_i_cddr(((C_word*)t0)[4]);
+if(C_truep((C_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4777,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_word)C_a_i_cons(&a,2,t2,t3);
+/* chicken-syntax.scm: 817 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+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_4827,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_a_i_cons(&a,2,t2,t3);
+/* chicken-syntax.scm: 824 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[101],t5,lf[104]);}}
+
+/* k4825 in k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4827(C_word c,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_4827,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[41],t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4842,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k4840 in k4825 in k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4842(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_4842,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[102],t2));}
+
+/* k4775 in k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4777,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(0));
+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[41],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4800,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: 822 r */
+t6=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[22]);}
+
+/* k4798 in k4775 in k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4800(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_4800,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4812,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k4810 in k4798 in k4775 in k4760 in a4757 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4812(C_word c,C_word t0,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_4812,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[102],t5));}
+
+/* k4754 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4756(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 809 ##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);}
+
+/* k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2367(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_2367,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2370,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_4752,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 832 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[93]);}
+
+/* k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4752(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_4752,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[93],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4748,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 833 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
+
+/* k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4748(C_word c,C_word t0,C_word 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_4748,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[94],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)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4542,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_4544,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 834 ##sys#er-transformer */
+t7=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
+
+/* a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4544(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_4544,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4548,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[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[88],t2,lf[100]);}
+
+/* k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4548(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_4548,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4551,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: 837 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[99]);}
+
+/* k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4551(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_4551,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4554,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: 838 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[98]);}
+
+/* k4552 in k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4554(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_4554,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4557,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: 839 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k4555 in k4552 in k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4557(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_4557,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,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]=((C_word*)t0)[5],a[7]=((C_word*)t0)[6],tmp=(C_word)a,a+=8,tmp);
+/* chicken-syntax.scm: 840 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[93]);}
+
+/* k4566 in k4555 in k4552 in k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4568,2,t0,t1);}
+t2=(C_word)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_4596,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: 842 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[94]);}
+
+/* k4594 in k4566 in k4555 in k4552 in k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4596(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4596,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[8]);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_i_caddr(((C_word*)t0)[8]);
+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_SCHEME_END_OF_LIST,t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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)[6],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,t3,t10);
+t12=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t11);
+t13=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4688,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_word)C_i_cdddr(((C_word*)t0)[8]);
+/* ##sys#append */
+t15=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t13,t14,C_SCHEME_END_OF_LIST);}
+
+/* k4686 in k4594 in k4566 in k4555 in k4552 in k4549 in k4546 in a4543 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4688(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4688,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,((C_word*)t0)[9],t2);
+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,lf[95],t4);
+t6=(C_word)C_a_i_cons(&a,2,lf[96],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_SCHEME_END_OF_LIST,t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[22],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)[7],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)[8],t12);
+t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t13);
+t15=(C_word)C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=(C_word)C_a_i_cons(&a,2,t3,t15);
+t17=(C_word)C_a_i_cons(&a,2,lf[97],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,C_SCHEME_END_OF_LIST,t18);
+t20=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t19);
+t21=(C_word)C_a_i_cons(&a,2,t20,C_SCHEME_END_OF_LIST);
+t22=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
+t23=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t22);
+t24=(C_word)C_a_i_cons(&a,2,t23,C_SCHEME_END_OF_LIST);
+t25=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t24);
+t26=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
+t27=(C_word)C_a_i_cons(&a,2,t26,C_SCHEME_END_OF_LIST);
+t28=(C_word)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_word)C_a_i_cons(&a,2,t28,C_SCHEME_END_OF_LIST));}
+
+/* k4540 in k4746 in k4750 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4542(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 830 ##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);}
+
+/* k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2370(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_2370,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2373,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_4534,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 853 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
+
+/* k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4534(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_4534,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[43],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4530,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 854 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[82]);}
+
+/* k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4530(C_word c,C_word t0,C_word 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_4530,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[82],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)[3],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4119,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_4121,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 855 ##sys#er-transformer */
+t7=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
+
+/* a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4121(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_4121,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4125,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 857 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[83],t2,lf[92]);}
+
+/* k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4125(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_4125,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4128,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: 858 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[91]);}
+
+/* k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4128(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_4128,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4131,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: 859 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[90]);}
+
+/* k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4131(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_4131,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4134,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: 860 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[89]);}
+
+/* k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4134(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_4134,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4137,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: 861 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[64]);}
+
+/* k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4137(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_4137,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4140,a[2]=((C_word*)t0)[2],a[3]=((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: 862 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
+
+/* k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4140(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_4140,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4143,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: 863 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[82]);}
+
+/* k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4143(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_4143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_4146,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: 864 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[43]);}
+
+/* k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[22],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4146,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4148,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)li23),tmp=(C_word)a,a+=10,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_4355,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: 878 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[88]);}
+
+/* k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4355(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4355,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[84],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],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)[10],t4);
+t6=(C_word)C_a_i_cons(&a,2,lf[70],t5);
+t7=(C_word)C_a_i_cons(&a,2,C_fix(1),C_SCHEME_END_OF_LIST);
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[85],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_word*)t0)[9],t11);
+t13=(C_word)C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
+t14=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t13);
+t15=(C_word)C_a_i_cons(&a,2,t14,C_SCHEME_END_OF_LIST);
+t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_4395,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: 881 r */
+t17=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t17+1)))(3,t17,t16,lf[87]);}
+
+/* k4393 in k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_4395,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4399,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_4403,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t8=(C_word)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_4429,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t10,a[5]=t6,a[6]=((C_word)li24),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_4429(t12,t7,t8);}
+
+/* loop1798 in k4393 in k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4429(C_word 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_4429,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_4458,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));
+/* g18141815 */
+t5=((C_word*)t0)[2];
+f_4148(t5,t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4456 in loop1798 in k4393 in k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_4458,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));
+/* loop17981811 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4429(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));
+/* loop17981811 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4429(t6,((C_word*)t0)[3],t5);}}
+
+/* k4401 in k4393 in k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4403(C_word c,C_word t0,C_word 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_4403,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[86],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)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t7=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t1,t6);}
+
+/* k4397 in k4393 in k4353 in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4399(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_4399,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],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_i_cadr(((C_word*)t0)[5]);
+t7=(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST);
+t8=(C_word)C_a_i_cons(&a,2,t5,t7);
+t9=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+
+/* parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4148(C_word t0,C_word 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_4148,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_symbolp(t3);
+t5=(C_truep(t4)?(C_word)C_i_car(t2):C_SCHEME_FALSE);
+t6=(C_truep(t5)?(C_word)C_i_cadr(t2):(C_word)C_i_car(t2));
+t7=(C_truep(t5)?(C_word)C_i_cddr(t2):(C_word)C_i_cdr(t2));
+if(C_truep((C_word)C_i_nullp(t6))){
+if(C_truep(t5)){
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t5,t8);
+t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4190,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[29]+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_4209,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[29]+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_4266,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_4270,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_4272,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)li22),tmp=(C_word)a,a+=9,tmp));
+t17=((C_word*)t15)[1];
+f_4272(t17,t13,t6);}}
+
+/* loop1762 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4272(C_word t0,C_word 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_4272,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_4299,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li21),tmp=(C_word)a,a+=6,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_4299(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));
+/* loop17621775 */
+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));
+/* loop17621775 */
+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);}}
+
+/* g1778 in loop1762 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_4299(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,((C_word*)t0)[4],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,t3,t4);
+return((C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+
+/* k4268 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4270(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k4264 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4266(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4266,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+if(C_truep(((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*)t0)[6],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4239,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[29]+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_4258,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}
+
+/* k4256 in k4264 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4258,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,((C_word*)t0)[4],t2);
+t4=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+
+/* k4237 in k4264 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4239,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+
+/* k4207 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4209(C_word c,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_4209,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,((C_word*)t0)[4],t2);
+t4=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+
+/* k4188 in parse-clause in k4144 in k4141 in k4138 in k4135 in k4132 in k4129 in k4126 in k4123 in a4120 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4190,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t4));}
+
+/* k4117 in k4528 in k4532 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4119(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 851 ##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);}
+
+/* k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_2373,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2376,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_a_i_cons(&a,2,lf[67],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[41],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[65],t5);
+t7=(C_word)C_a_i_cons(&a,2,lf[67],t6);
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3648,a[2]=t8,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3650,a[2]=((C_word)li20),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 891 ##sys#er-transformer */
+t11=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
+
+/* a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3650(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_3650,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3654,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 893 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[68],t2,lf[81]);}
+
+/* k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3654(C_word c,C_word t0,C_word 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_3654,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_cadddr(((C_word*)t0)[4]);
+t5=(C_word)C_i_cddddr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3669,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: 898 r */
+t7=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[55]);}
+
+/* k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3669(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_3669,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3672,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: 899 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3672,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3675,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: 900 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
+
+/* k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3675(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_3675,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3678,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 901 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
+
+/* k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3678(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_3678,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3681,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 902 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[67]);}
+
+/* k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3681(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_3681,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[11]);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3687,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: 904 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[80]);}
+
+/* k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3687(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_3687,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3690,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: 905 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[79]);}
+
+/* k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3690(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3690,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_3693,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_4058,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li19),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_4058(t10,t6,((C_word*)t0)[3]);}
+
+/* loop1844 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4058(C_word t0,C_word 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_4058,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[78]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4087,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));
+/* g18601861 */
+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);}}
+
+/* k4085 in loop1844 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4087(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4087,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));
+/* loop18441857 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4058(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));
+/* loop18441857 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_4058(t6,((C_word*)t0)[3],t5);}}
+
+/* k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3693(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_3693,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[14],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],t2);
+t4=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_4005,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_4009,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_4011,a[2]=t6,a[3]=t11,a[4]=t8,a[5]=((C_word*)t0)[2],a[6]=((C_word)li18),tmp=(C_word)a,a+=7,tmp));
+t13=((C_word*)t11)[1];
+f_4011(t13,t9,t1);}
+
+/* loop1871 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_4011(C_word t0,C_word 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_4011,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_4038,a[2]=((C_word*)t0)[5],a[3]=((C_word)li17),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_4038(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));
+/* loop18711884 */
+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));
+/* loop18711884 */
+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);}}
+
+/* g1887 in loop1871 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static C_word C_fcall f_4038(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_stack_check;
+if(C_truep((C_word)C_i_memq(t1,((C_word*)t0)[2]))){
+t2=t1;
+return(t2);}
+else{
+return(lf[77]);}}
+
+/* k4007 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_4009(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4005,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[14],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[69],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)[13],t4);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t5);
+t7=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],C_SCHEME_END_OF_LIST);
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],t7);
+t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],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)[11],t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[70],t12);
+t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,t8,t14);
+t16=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[12],t15);
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3716,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_3720,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_3722,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)li16),tmp=(C_word)a,a+=11,tmp));
+t22=((C_word*)t20)[1];
+f_3722(t22,t18,((C_word*)t0)[2],C_fix(1));}
+
+/* loop in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3722(C_word t0,C_word 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_3722,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{
+t4=(C_word)C_i_car(t2);
+t5=(C_word)C_i_memq(lf[71],*((C_word*)lf[72]+1));
+t6=(C_word)C_i_cddr(t4);
+t7=(C_word)C_i_pairp(t6);
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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)[9],t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[73],t12);
+t14=(C_word)C_a_i_cons(&a,2,t13,C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,lf[74],t14);
+t16=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t17=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t16);
+t18=(C_word)C_a_i_cons(&a,2,lf[75],t17);
+t19=(C_word)C_a_i_cons(&a,2,t18,C_SCHEME_END_OF_LIST);
+t20=(C_word)C_a_i_cons(&a,2,t15,t19);
+t21=(C_word)C_a_i_cons(&a,2,t8,t20);
+t22=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t21);
+t23=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_3748,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_word)C_i_caddr(t4);
+t25=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t26=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t25);
+t27=(C_word)C_a_i_cons(&a,2,t24,t26);
+t28=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);
+t29=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t28);
+t30=(C_word)C_a_i_cons(&a,2,t29,C_SCHEME_END_OF_LIST);
+t31=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t30);
+t32=(C_word)C_a_i_cons(&a,2,lf[73],t31);
+t33=(C_word)C_a_i_cons(&a,2,t32,C_SCHEME_END_OF_LIST);
+t34=(C_word)C_a_i_cons(&a,2,lf[74],t33);
+t35=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t36=(C_word)C_a_i_cons(&a,2,t3,t35);
+t37=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t36);
+t38=(C_word)C_a_i_cons(&a,2,lf[76],t37);
+t39=(C_word)C_a_i_cons(&a,2,t38,C_SCHEME_END_OF_LIST);
+t40=(C_word)C_a_i_cons(&a,2,t34,t39);
+t41=(C_word)C_a_i_cons(&a,2,t27,t40);
+t42=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t41);
+t43=t23;
+f_3748(t43,(C_word)C_a_i_cons(&a,2,t42,C_SCHEME_END_OF_LIST));}
+else{
+t24=t23;
+f_3748(t24,C_SCHEME_END_OF_LIST);}}}
+
+/* k3746 in loop in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3748(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3748,NULL,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[11]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3784,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_word)C_i_caddr(((C_word*)t0)[11]);
+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)[3],t6);
+t8=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t7);
+t9=t3;
+f_3784(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+else{
+t5=t3;
+f_3784(t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST));}}
+
+/* k3782 in k3746 in loop in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3784(C_word t0,C_word t1){
+C_word 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_3784,NULL,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3760,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_3764,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t7=(C_word)C_fixnum_increase(((C_word*)t0)[3]);
+/* chicken-syntax.scm: 935 loop */
+t8=((C_word*)((C_word*)t0)[2])[1];
+f_3722(t8,t5,t6,t7);}
+
+/* k3762 in k3782 in k3746 in loop in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3764(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k3758 in k3782 in k3746 in loop in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3760(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3760,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+/* ##sys#append */
+t3=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k3718 in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3720(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k3714 in k4003 in k3691 in k3688 in k3685 in k3679 in k3676 in k3673 in k3670 in k3667 in k3652 in a3649 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3716(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_3716,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k3646 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3648(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 888 ##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);}
+
+/* k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2376(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_2376,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2379,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_3640,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 942 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
+
+/* k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3640,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[58],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3448,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_3450,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 943 ##sys#er-transformer */
+t6=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3450(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_3450,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3454,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 945 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[63]);}
+
+/* k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3454(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_3454,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3457,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: 946 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
+
+/* k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3457(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_3457,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3460,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: 947 r */
+t3=((C_word*)t0)[5];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
+
+/* k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3460(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_3460,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3463,a[2]=((C_word*)t0)[2],a[3]=((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: 948 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
+
+/* k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3463(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_3463,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3466,a[2]=((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: 949 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_3466,2,t0,t1);}
+t2=(C_word)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_3475,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)li14),tmp=(C_word)a,a+=11,tmp));
+t6=((C_word*)t4)[1];
+f_3475(t6,((C_word*)t0)[2],t2,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3475(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_3475,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3485,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: 952 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_3578,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_word)C_i_car(t2);
+/* chicken-syntax.scm: 959 c */
+t8=((C_word*)t0)[4];
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,((C_word*)t0)[2],t7);}}
+
+/* k3576 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3578(C_word c,C_word t0,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_3578,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3581,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_3600,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 960 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_3606,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_word)C_i_car(((C_word*)t0)[9]);
+/* chicken-syntax.scm: 962 c */
+t4=((C_word*)t0)[3];
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
+
+/* k3604 in k3576 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3606,2,t0,t1);}
+if(C_truep(t1)){
+/* chicken-syntax.scm: 962 loop */
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_3475(t2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST,((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[2]);
+t3=(C_word)C_i_car(((C_word*)t0)[2]);
+t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[3]);
+/* chicken-syntax.scm: 963 loop */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_3475(t5,((C_word*)t0)[5],t2,((C_word*)t0)[4],t4,C_SCHEME_FALSE);}}
+
+/* k3598 in k3576 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3600(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 960 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k3579 in k3576 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3581(C_word c,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_3581,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t4=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+/* chicken-syntax.scm: 961 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_3475(t5,((C_word*)t0)[2],t2,t3,t4,C_SCHEME_FALSE);}
+
+/* k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3485(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_3485,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3488,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: 953 reverse */
+t3=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_3488,2,t0,t1);}
+if(C_truep(((C_word*)t0)[8])){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3494,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_3537,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 955 gensym */
+t4=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t2=(C_word)C_i_car(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)[2],t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3560,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_word)C_i_cdr(t1);
+/* ##sys#append */
+t7=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}}
+
+/* k3558 in k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3560(C_word c,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_3560,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_SCHEME_END_OF_LIST);
+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));}
+
+/* k3535 in k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3537(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 955 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k3492 in k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3494,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3505,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
+
+/* k3503 in k3492 in k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3505,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3525,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)C_i_cdr(((C_word*)t0)[6]);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t6=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
+
+/* k3523 in k3503 in k3492 in k3486 in k3483 in loop in k3464 in k3461 in k3458 in k3455 in k3452 in a3449 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3525(C_word c,C_word t0,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_3525,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_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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t5));}
+
+/* k3446 in k3638 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3448(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 940 ##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);}
+
+/* k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2379,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2382,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_3440,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 967 ##sys#primitive-alias */
+t4=*((C_word*)lf[65]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[58]);}
+
+/* k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t6;
+C_word ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3440,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[58],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3217,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_3219,a[2]=((C_word)li13),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 968 ##sys#er-transformer */
+t6=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3219(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_3219,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3223,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 970 r */
+t6=t3;
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[64]);}
+
+/* k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3226,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: 971 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3226,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3229,a[2]=((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: 972 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[58]);}
+
+/* k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3232,a[2]=((C_word*)t0)[2],a[3]=((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: 973 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[63]);}
+
+/* k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3232,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3235,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: 974 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[62]);}
+
+/* k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_3235,2,t0,t1);}
+t2=(C_word)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_3244,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)li12),tmp=(C_word)a,a+=11,tmp));
+t6=((C_word*)t4)[1];
+f_3244(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 k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3244(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_3244,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t7=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3254,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: 977 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_3363,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_word)C_i_car(t2);
+/* chicken-syntax.scm: 987 c */
+t9=((C_word*)t0)[4];
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,((C_word*)t0)[2],t8);}}
+
+/* k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3363,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3366,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_3385,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 988 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_3391,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_word)C_i_car(((C_word*)t0)[10]);
+/* chicken-syntax.scm: 990 c */
+t4=((C_word*)t0)[3];
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}}
+
+/* k3389 in k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3391(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_3391,2,t0,t1);}
+if(C_truep(t1)){
+/* chicken-syntax.scm: 990 loop */
+t2=((C_word*)((C_word*)t0)[8])[1];
+f_3244(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_3397,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_3424,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 992 gensym */
+t4=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k3422 in k3389 in k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3424(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 992 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k3395 in k3389 in k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3397(C_word c,C_word t0,C_word 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_3397,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
+t3=(C_word)C_i_car(((C_word*)t0)[7]);
+t4=(C_word)C_a_i_list(&a,2,t1,t3);
+t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[6]);
+t6=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+/* chicken-syntax.scm: 993 loop */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_3244(t7,((C_word*)t0)[3],t2,((C_word*)t0)[2],t5,t6,C_SCHEME_FALSE);}
+
+/* k3383 in k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3385(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 988 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k3364 in k3361 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3366(C_word c,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_3366,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
+t3=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[6]);
+t4=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+/* chicken-syntax.scm: 989 loop */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_3244(t5,((C_word*)t0)[3],t2,t3,((C_word*)t0)[2],t4,C_SCHEME_FALSE);}
+
+/* k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3254(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_3254,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3257,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: 978 reverse */
+t3=*((C_word*)lf[61]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_3257,2,t0,t1);}
+if(C_truep(((C_word*)t0)[9])){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3263,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_3318,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 980 gensym */
+t4=*((C_word*)lf[60]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t2=(C_word)C_i_car(t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3353,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_word)C_i_cdr(t1);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}}
+
+/* k3351 in k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3353(C_word c,C_word t0,C_word t1){
+C_word 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_3353,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)[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));}
+
+/* k3316 in k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3318(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 980 r */
+t2=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k3261 in k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3263(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_3263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3286,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
+
+/* k3284 in k3261 in k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t5;
+C_word t6;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3286,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3306,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_word)C_i_cdr(((C_word*)t0)[8]);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t6=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
+
+/* k3304 in k3284 in k3261 in k3255 in k3252 in loop in k3233 in k3230 in k3227 in k3224 in k3221 in a3218 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3306(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3306,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+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=(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));}
+
+/* k3215 in k3438 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3217(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 965 ##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);}
+
+/* k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2382(C_word c,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_2382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2385,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_2936,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2938,a[2]=((C_word)li11),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1003 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2938(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_2938,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2942,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* chicken-syntax.scm: 1005 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[36],t2,lf[57]);}
+
+/* k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2942(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_2942,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2945,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: 1006 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[56]);}
+
+/* k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2945(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_2945,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2948,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: 1007 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[55]);}
+
+/* k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2948(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_2948,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2951,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: 1008 r */
+t3=((C_word*)t0)[4];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[54]);}
+
+/* k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2951,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2954,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: 1009 r */
+t3=((C_word*)t0)[5];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[53]);}
+
+/* k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2957,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: 1010 r */
+t3=((C_word*)t0)[6];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[52]);}
+
+/* k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2957(C_word c,C_word t0,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_2957,2,t0,t1);}
+t2=(C_word)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_2966,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)li10),tmp=(C_word)a,a+=11,tmp));
+t6=((C_word*)t4)[1];
+f_2966(t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,t2,C_SCHEME_FALSE);}
+
+/* loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_2966(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_2966,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_i_nullp(t4))){
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2976,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_3106,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,t5,C_SCHEME_END_OF_LIST);}
+else{
+t7=t6;
+f_2976(t7,lf[46]);}}
+else{
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3112,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_word)C_i_pairp(t4))){
+t7=(C_word)C_i_car(t4);
+t8=t6;
+f_3112(t8,(C_word)C_i_pairp(t7));}
+else{
+t7=t6;
+f_3112(t7,C_SCHEME_FALSE);}}}
+
+/* k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_3112(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_3112,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_3115,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1025 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: 1036 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]);}}
+
+/* k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3115,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[12]);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_3124,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: 1027 c */
+t4=((C_word*)t0)[5];
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t1);}
+
+/* k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3124,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3139,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_3143,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1028 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_3149,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: 1029 c */
+t3=((C_word*)t0)[5];
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[3]);}}
+
+/* k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3149(C_word c,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_3149,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3164,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_3168,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1030 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_3174,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: 1031 c */
+t3=((C_word*)t0)[4];
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k3172 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3174(C_word c,C_word t0,C_word 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_3174,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3181,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)f11161,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1032 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)f11165,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1032 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_3196,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1034 caar */
+t3=*((C_word*)lf[50]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
+
+/* k3194 in k3172 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3196(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1034 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);}
+
+/* f11165 in k3172 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f11165(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1032 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);}
+
+/* f11161 in k3172 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f11161(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1032 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);}
+
+/* k3179 in k3172 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3181(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1032 loop */
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_2966(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k3166 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3168(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k3162 in k3147 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3164(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_3164,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
+/* chicken-syntax.scm: 1030 loop */
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_2966(t4,((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3141 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3143(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k3137 in k3122 in k3113 in k3110 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[7]);
+/* chicken-syntax.scm: 1028 loop */
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_2966(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k3104 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3106,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,t2,C_SCHEME_END_OF_LIST);
+t4=((C_word*)t0)[3];
+f_2976(t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_2976(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_2976,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2983,a[2]=((C_word*)t0)[2],a[3]=((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: 1016 r */
+t3=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[45]);}
+
+/* k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_3091,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3091,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[37],t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3079,a[2]=((C_word*)t0)[2],a[3]=((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: 1018 r */
+t5=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,lf[44]);}
+
+/* k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[16],*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,lf[38],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,t1,t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3075,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k3073 in k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3075,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3011,a[2]=((C_word*)t0)[2],a[3]=((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: 1019 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[43]);}
+
+/* k3009 in k3073 in k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3011(C_word c,C_word t0,C_word 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_3011,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,*((C_word*)lf[39]+1),C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[40],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)[9],t4);
+t6=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 1022 r */
+t7=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,lf[42]);}
+
+/* k3037 in k3009 in k3073 in k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3039(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_3039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_3051,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: 1022 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[41]);}
+
+/* k3049 in k3037 in k3009 in k3073 in k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3051(C_word c,C_word t0,C_word 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_3051,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,*((C_word*)lf[39]+1),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)[10],t4);
+t6=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_3035,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[29]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k3033 in k3049 in k3037 in k3009 in k3073 in k3077 in k3089 in k2981 in k2974 in loop in k2955 in k2952 in k2949 in k2946 in k2943 in k2940 in a2937 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_3035(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_3035,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,((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,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t8));}
+
+/* k2934 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2936(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1001 ##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);}
+
+/* k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2385(C_word c,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_2385,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2388,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_2832,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2834,a[2]=((C_word)li9),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1045 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2834(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_2834,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2838,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1047 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[33],t2,lf[35]);}
+
+/* k2836 in a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2838(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_2838,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2844,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: 1049 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[34]);}
+
+/* k2842 in k2836 in a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t6;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2844,2,t0,t1);}
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[5]))){
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2889,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: 1052 r */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[22]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2928,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)C_i_cddr(((C_word*)t0)[3]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}}
+
+/* k2926 in k2842 in k2836 in a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2928(C_word c,C_word t0,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_2928,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,t2,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,t3,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));}
+
+/* k2887 in k2842 in k2836 in a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2889(C_word c,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_2889,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2901,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_word)C_i_cddr(((C_word*)t0)[2]);
+/* ##sys#append */
+t5=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_END_OF_LIST);}
+
+/* k2899 in k2887 in k2842 in k2836 in a2833 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_2901,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,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,t5,C_SCHEME_END_OF_LIST);
+t7=(C_word)C_i_car(((C_word*)t0)[4]);
+t8=(C_word)C_a_i_cons(&a,2,t7,C_SCHEME_END_OF_LIST);
+t9=(C_word)C_a_i_cons(&a,2,t6,t8);
+t10=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+
+/* k2830 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1043 ##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);}
+
+/* k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2388(C_word c,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_2388,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2391,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_2795,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2797,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1062 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2796 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2797(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_2797,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2801,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* chicken-syntax.scm: 1064 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[28],t2,lf[32]);}
+
+/* k2799 in a2796 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2801(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_2801,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2808,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: 1065 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[31]);}
+
+/* k2806 in k2799 in a2796 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2808,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2820,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: 1066 r */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[30]);}
+
+/* k2818 in k2806 in k2799 in a2796 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2820(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_2820,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2824,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[29]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k2822 in k2818 in k2806 in k2799 in a2796 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2824,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,t2,C_SCHEME_END_OF_LIST);
+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));}
+
+/* k2793 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2795(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1060 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[28],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2391(C_word c,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_2391,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2394,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_2770,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2772,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1073 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2771 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2772(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_2772,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2776,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* chicken-syntax.scm: 1075 ##sys#check-syntax */
+t6=*((C_word*)lf[26]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[24],t2,lf[27]);}
+
+/* k2774 in a2771 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2776,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
+t3=(C_word)C_a_i_cons(&a,2,C_SCHEME_TRUE,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,t2,t3);
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[25],t4));}
+
+/* k2768 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2770(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1071 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[24],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2394(C_word c,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_2394,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2397,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_2638,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2640,a[2]=((C_word)li6),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1083 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2640(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_2640,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2650,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_i_pairp(t5))){
+t7=(C_word)C_i_car(t5);
+if(C_truep((C_word)C_i_pairp(t7))){
+t8=(C_word)C_i_cdr(t5);
+/* ##sys#list? */
+t9=*((C_word*)lf[19]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t6,t8);}
+else{
+t8=t6;
+f_2650(2,t8,C_SCHEME_FALSE);}}
+else{
+t7=t6;
+f_2650(2,t7,C_SCHEME_FALSE);}}
+
+/* k2648 in a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 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_2650,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(((C_word*)t0)[5]);
+t5=(C_word)C_i_cdr(t4);
+t6=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2666,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);
+/* rename20922097 */
+t8=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[21]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2700,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_i_pairp(((C_word*)t0)[5]))){
+t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(C_word)C_i_cdr(t3);
+t5=t2;
+f_2700(t5,(C_word)C_eqp(t4,C_SCHEME_END_OF_LIST));}
+else{
+t4=t2;
+f_2700(t4,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_2700(t3,C_SCHEME_FALSE);}}}
+
+/* k2698 in k2648 in a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_2700,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[5]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t4=(C_word)C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2713,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* rename20922097 */
+t6=((C_word*)t0)[3];
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,lf[23]);}
+else{
+/* ##sys#syntax-rules-mismatch */
+t2=*((C_word*)lf[18]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* k2711 in k2698 in k2648 in a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2713,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],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,t1,t3));}
+
+/* k2664 in k2648 in a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2666(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_2666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2682,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);
+/* rename20922097 */
+t3=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[22]);}
+
+/* k2680 in k2664 in k2648 in a2639 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2682(C_word c,C_word t0,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_2682,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[5]);
+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)[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));}
+
+/* k2636 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2638(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1081 ##sys#extend-macro-environment */
+t2=*((C_word*)lf[10]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[21],C_SCHEME_END_OF_LIST,t1);}
+
+/* k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2397(C_word c,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_2397,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2400,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_2423,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2425,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1092 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2425(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[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_2425,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2435,a[2]=t2,a[3]=t3,a[4]=t1,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_i_pairp(t5))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2573,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_car(t5);
+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|3,a[1]=(C_word)f_2586,a[2]=t10,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp));
+t12=((C_word*)t10)[1];
+f_2586(t12,t7,t8);}
+else{
+t7=t6;
+f_2435(2,t7,C_SCHEME_FALSE);}}
+
+/* loop2136 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_2586(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_2586,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2590,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* ##sys#null? */
+t4=*((C_word*)lf[20]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k2588 in loop2136 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t5;
+C_word t6;
+C_word t7;
+C_word t8;
+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{
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
+t2=(C_word)C_i_car(((C_word*)t0)[3]);
+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_cdr(t3);
+t5=(C_word)C_eqp(t4,C_SCHEME_END_OF_LIST);
+if(C_truep(t5)){
+t6=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* loop21362158 */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_2586(t7,((C_word*)t0)[4],t6);}
+else{
+t6=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+else{
+t4=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+else{
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}}
+
+/* k2571 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2573(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_cdr(((C_word*)t0)[3]);
+/* ##sys#list? */
+t3=*((C_word*)lf[19]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
+else{
+t2=((C_word*)t0)[2];
+f_2435(2,t2,C_SCHEME_FALSE);}}
+
+/* k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2435(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_2435,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|4,a[1]=(C_word)f_2438,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);
+t7=(C_word)C_i_car(((C_word*)t0)[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|5,a[1]=(C_word)f_2523,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word)li3),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_2523(t11,t6,t7);}
+else{
+/* ##sys#syntax-rules-mismatch */
+t2=*((C_word*)lf[18]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* loop2180 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_2523(C_word t0,C_word 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_2523,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));
+/* loop21802193 */
+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));
+/* loop21802193 */
+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);}}
+
+/* k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2438(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_2438,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_2441,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_word)C_i_car(((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_2475,a[2]=t3,a[3]=t9,a[4]=t5,a[5]=((C_word)li2),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_2475(t11,t6,t7);}
+
+/* loop2205 in k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_fcall f_2475(C_word t0,C_word 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(3);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_2475,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(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));
+/* loop22052218 */
+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));
+/* loop22052218 */
+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);}}
+
+/* k2439 in k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2441(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_2441,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2451,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);
+/* rename21392144 */
+t4=((C_word*)t0)[2];
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[17]);}
+
+/* k2449 in k2439 in k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+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 t4;
+C_word ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2451,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2459,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_2461,a[2]=((C_word)li1),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#map-n */
+t4=*((C_word*)lf[16]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a2460 in k2449 in k2439 in k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2461(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_2461,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,t2,t4));}
+
+/* k2457 in k2449 in k2439 in k2436 in k2433 in a2424 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2459(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_2459,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+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));}
+
+/* k2421 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2423(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1090 ##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);}
+
+/* k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2400(C_word c,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_2400,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2403,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_2413,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2415,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1102 ##sys#er-transformer */
+t5=*((C_word*)lf[14]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a2414 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2415(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_2415,5,t0,t1,t2,t3,t4);}
+/* chicken-syntax.scm: 1104 syntax-error */
+t5=*((C_word*)lf[12]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,lf[11],lf[13]);}
+
+/* k2411 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* chicken-syntax.scm: 1100 ##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);}
+
+/* k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2403(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2403,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2406,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1107 ##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));}
+
+/* k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2406(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_2406,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_2409,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* chicken-syntax.scm: 1112 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]);}
+
+/* k2407 in k2404 in k2401 in k2398 in k2395 in k2392 in k2389 in k2386 in k2383 in k2380 in k2377 in k2374 in k2371 in k2368 in k2365 in k2362 in k2359 in k2356 in k2353 in k2350 in k2347 in k2344 in k2341 in k2338 in k2335 in k2332 in k2329 in k2326 in k2323 in k2320 in k2317 in k2314 in k2311 in k2308 in k2305 in k2302 in k2299 in k2296 in k2293 in k2290 in k2287 in k2283 */
+static void C_ccall f_2409(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[691] = {
+{"toplevel:chicken_syntax_scm",(void*)C_chicken_syntax_toplevel},
+{"f_2285:chicken_syntax_scm",(void*)f_2285},
+{"f_2289:chicken_syntax_scm",(void*)f_2289},
+{"f_10320:chicken_syntax_scm",(void*)f_10320},
+{"f_10324:chicken_syntax_scm",(void*)f_10324},
+{"f_10333:chicken_syntax_scm",(void*)f_10333},
+{"f_10336:chicken_syntax_scm",(void*)f_10336},
+{"f_10342:chicken_syntax_scm",(void*)f_10342},
+{"f_10345:chicken_syntax_scm",(void*)f_10345},
+{"f_10348:chicken_syntax_scm",(void*)f_10348},
+{"f_10351:chicken_syntax_scm",(void*)f_10351},
+{"f_10761:chicken_syntax_scm",(void*)f_10761},
+{"f_10721:chicken_syntax_scm",(void*)f_10721},
+{"f_10753:chicken_syntax_scm",(void*)f_10753},
+{"f_10713:chicken_syntax_scm",(void*)f_10713},
+{"f_10669:chicken_syntax_scm",(void*)f_10669},
+{"f_10380:chicken_syntax_scm",(void*)f_10380},
+{"f_10390:chicken_syntax_scm",(void*)f_10390},
+{"f_10657:chicken_syntax_scm",(void*)f_10657},
+{"f_10393:chicken_syntax_scm",(void*)f_10393},
+{"f_10653:chicken_syntax_scm",(void*)f_10653},
+{"f_10396:chicken_syntax_scm",(void*)f_10396},
+{"f_10443:chicken_syntax_scm",(void*)f_10443},
+{"f_10407:chicken_syntax_scm",(void*)f_10407},
+{"f_10378:chicken_syntax_scm",(void*)f_10378},
+{"f_10374:chicken_syntax_scm",(void*)f_10374},
+{"f_10318:chicken_syntax_scm",(void*)f_10318},
+{"f_2292:chicken_syntax_scm",(void*)f_2292},
+{"f_10177:chicken_syntax_scm",(void*)f_10177},
+{"f_10181:chicken_syntax_scm",(void*)f_10181},
+{"f_10184:chicken_syntax_scm",(void*)f_10184},
+{"f_10187:chicken_syntax_scm",(void*)f_10187},
+{"f_10223:chicken_syntax_scm",(void*)f_10223},
+{"f_10238:chicken_syntax_scm",(void*)f_10238},
+{"f_10292:chicken_syntax_scm",(void*)f_10292},
+{"f_10253:chicken_syntax_scm",(void*)f_10253},
+{"f_10216:chicken_syntax_scm",(void*)f_10216},
+{"f_10175:chicken_syntax_scm",(void*)f_10175},
+{"f_2295:chicken_syntax_scm",(void*)f_2295},
+{"f_10078:chicken_syntax_scm",(void*)f_10078},
+{"f_10082:chicken_syntax_scm",(void*)f_10082},
+{"f_10085:chicken_syntax_scm",(void*)f_10085},
+{"f_10088:chicken_syntax_scm",(void*)f_10088},
+{"f_10167:chicken_syntax_scm",(void*)f_10167},
+{"f_10076:chicken_syntax_scm",(void*)f_10076},
+{"f_2298:chicken_syntax_scm",(void*)f_2298},
+{"f_10060:chicken_syntax_scm",(void*)f_10060},
+{"f_10068:chicken_syntax_scm",(void*)f_10068},
+{"f_10058:chicken_syntax_scm",(void*)f_10058},
+{"f_2301:chicken_syntax_scm",(void*)f_2301},
+{"f_9971:chicken_syntax_scm",(void*)f_9971},
+{"f_9975:chicken_syntax_scm",(void*)f_9975},
+{"f_9978:chicken_syntax_scm",(void*)f_9978},
+{"f_9981:chicken_syntax_scm",(void*)f_9981},
+{"f_10047:chicken_syntax_scm",(void*)f_10047},
+{"f_9984:chicken_syntax_scm",(void*)f_9984},
+{"f_9997:chicken_syntax_scm",(void*)f_9997},
+{"f_10041:chicken_syntax_scm",(void*)f_10041},
+{"f_10008:chicken_syntax_scm",(void*)f_10008},
+{"f_10016:chicken_syntax_scm",(void*)f_10016},
+{"f_10018:chicken_syntax_scm",(void*)f_10018},
+{"f_10035:chicken_syntax_scm",(void*)f_10035},
+{"f_10003:chicken_syntax_scm",(void*)f_10003},
+{"f_9995:chicken_syntax_scm",(void*)f_9995},
+{"f_9991:chicken_syntax_scm",(void*)f_9991},
+{"f_9969:chicken_syntax_scm",(void*)f_9969},
+{"f_2304:chicken_syntax_scm",(void*)f_2304},
+{"f_9857:chicken_syntax_scm",(void*)f_9857},
+{"f_9861:chicken_syntax_scm",(void*)f_9861},
+{"f_9870:chicken_syntax_scm",(void*)f_9870},
+{"f_9873:chicken_syntax_scm",(void*)f_9873},
+{"f_9876:chicken_syntax_scm",(void*)f_9876},
+{"f_9936:chicken_syntax_scm",(void*)f_9936},
+{"f_9911:chicken_syntax_scm",(void*)f_9911},
+{"f_9855:chicken_syntax_scm",(void*)f_9855},
+{"f_2307:chicken_syntax_scm",(void*)f_2307},
+{"f_9720:chicken_syntax_scm",(void*)f_9720},
+{"f_9724:chicken_syntax_scm",(void*)f_9724},
+{"f_9736:chicken_syntax_scm",(void*)f_9736},
+{"f_9739:chicken_syntax_scm",(void*)f_9739},
+{"f_9742:chicken_syntax_scm",(void*)f_9742},
+{"f_9789:chicken_syntax_scm",(void*)f_9789},
+{"f_9718:chicken_syntax_scm",(void*)f_9718},
+{"f_2310:chicken_syntax_scm",(void*)f_2310},
+{"f_9034:chicken_syntax_scm",(void*)f_9034},
+{"f_9038:chicken_syntax_scm",(void*)f_9038},
+{"f_9681:chicken_syntax_scm",(void*)f_9681},
+{"f_9710:chicken_syntax_scm",(void*)f_9710},
+{"f_9047:chicken_syntax_scm",(void*)f_9047},
+{"f_9637:chicken_syntax_scm",(void*)f_9637},
+{"f_9675:chicken_syntax_scm",(void*)f_9675},
+{"f_9664:chicken_syntax_scm",(void*)f_9664},
+{"f_9672:chicken_syntax_scm",(void*)f_9672},
+{"f_9050:chicken_syntax_scm",(void*)f_9050},
+{"f_9593:chicken_syntax_scm",(void*)f_9593},
+{"f_9631:chicken_syntax_scm",(void*)f_9631},
+{"f_9620:chicken_syntax_scm",(void*)f_9620},
+{"f_9628:chicken_syntax_scm",(void*)f_9628},
+{"f_9053:chicken_syntax_scm",(void*)f_9053},
+{"f_9056:chicken_syntax_scm",(void*)f_9056},
+{"f_9059:chicken_syntax_scm",(void*)f_9059},
+{"f_9558:chicken_syntax_scm",(void*)f_9558},
+{"f_9587:chicken_syntax_scm",(void*)f_9587},
+{"f_9507:chicken_syntax_scm",(void*)f_9507},
+{"f_9509:chicken_syntax_scm",(void*)f_9509},
+{"f_9542:chicken_syntax_scm",(void*)f_9542},
+{"f_9522:chicken_syntax_scm",(void*)f_9522},
+{"f_9418:chicken_syntax_scm",(void*)f_9418},
+{"f_9485:chicken_syntax_scm",(void*)f_9485},
+{"f_9499:chicken_syntax_scm",(void*)f_9499},
+{"f_9430:chicken_syntax_scm",(void*)f_9430},
+{"f_9432:chicken_syntax_scm",(void*)f_9432},
+{"f_9465:chicken_syntax_scm",(void*)f_9465},
+{"f_9445:chicken_syntax_scm",(void*)f_9445},
+{"f_9426:chicken_syntax_scm",(void*)f_9426},
+{"f_9422:chicken_syntax_scm",(void*)f_9422},
+{"f_9070:chicken_syntax_scm",(void*)f_9070},
+{"f_9354:chicken_syntax_scm",(void*)f_9354},
+{"f_9367:chicken_syntax_scm",(void*)f_9367},
+{"f_9274:chicken_syntax_scm",(void*)f_9274},
+{"f_9292:chicken_syntax_scm",(void*)f_9292},
+{"f_9305:chicken_syntax_scm",(void*)f_9305},
+{"f_9282:chicken_syntax_scm",(void*)f_9282},
+{"f_9278:chicken_syntax_scm",(void*)f_9278},
+{"f_9270:chicken_syntax_scm",(void*)f_9270},
+{"f_9262:chicken_syntax_scm",(void*)f_9262},
+{"f_9194:chicken_syntax_scm",(void*)f_9194},
+{"f_9207:chicken_syntax_scm",(void*)f_9207},
+{"f_9114:chicken_syntax_scm",(void*)f_9114},
+{"f_9132:chicken_syntax_scm",(void*)f_9132},
+{"f_9145:chicken_syntax_scm",(void*)f_9145},
+{"f_9122:chicken_syntax_scm",(void*)f_9122},
+{"f_9118:chicken_syntax_scm",(void*)f_9118},
+{"f_9110:chicken_syntax_scm",(void*)f_9110},
+{"f_9032:chicken_syntax_scm",(void*)f_9032},
+{"f_2313:chicken_syntax_scm",(void*)f_2313},
+{"f_8913:chicken_syntax_scm",(void*)f_8913},
+{"f_8917:chicken_syntax_scm",(void*)f_8917},
+{"f_8923:chicken_syntax_scm",(void*)f_8923},
+{"f_9024:chicken_syntax_scm",(void*)f_9024},
+{"f_8929:chicken_syntax_scm",(void*)f_8929},
+{"f_8932:chicken_syntax_scm",(void*)f_8932},
+{"f_8935:chicken_syntax_scm",(void*)f_8935},
+{"f_8975:chicken_syntax_scm",(void*)f_8975},
+{"f_8998:chicken_syntax_scm",(void*)f_8998},
+{"f_9005:chicken_syntax_scm",(void*)f_9005},
+{"f_9012:chicken_syntax_scm",(void*)f_9012},
+{"f_8988:chicken_syntax_scm",(void*)f_8988},
+{"f_8938:chicken_syntax_scm",(void*)f_8938},
+{"f_8911:chicken_syntax_scm",(void*)f_8911},
+{"f_2316:chicken_syntax_scm",(void*)f_2316},
+{"f_8427:chicken_syntax_scm",(void*)f_8427},
+{"f_8431:chicken_syntax_scm",(void*)f_8431},
+{"f_8440:chicken_syntax_scm",(void*)f_8440},
+{"f_8443:chicken_syntax_scm",(void*)f_8443},
+{"f_8446:chicken_syntax_scm",(void*)f_8446},
+{"f_8874:chicken_syntax_scm",(void*)f_8874},
+{"f_8903:chicken_syntax_scm",(void*)f_8903},
+{"f_8449:chicken_syntax_scm",(void*)f_8449},
+{"f_8839:chicken_syntax_scm",(void*)f_8839},
+{"f_8868:chicken_syntax_scm",(void*)f_8868},
+{"f_8452:chicken_syntax_scm",(void*)f_8452},
+{"f_8795:chicken_syntax_scm",(void*)f_8795},
+{"f_8833:chicken_syntax_scm",(void*)f_8833},
+{"f_8822:chicken_syntax_scm",(void*)f_8822},
+{"f_8830:chicken_syntax_scm",(void*)f_8830},
+{"f_8455:chicken_syntax_scm",(void*)f_8455},
+{"f_8751:chicken_syntax_scm",(void*)f_8751},
+{"f_8789:chicken_syntax_scm",(void*)f_8789},
+{"f_8778:chicken_syntax_scm",(void*)f_8778},
+{"f_8786:chicken_syntax_scm",(void*)f_8786},
+{"f_8458:chicken_syntax_scm",(void*)f_8458},
+{"f_8702:chicken_syntax_scm",(void*)f_8702},
+{"f_8735:chicken_syntax_scm",(void*)f_8735},
+{"f_8715:chicken_syntax_scm",(void*)f_8715},
+{"f_8647:chicken_syntax_scm",(void*)f_8647},
+{"f_8653:chicken_syntax_scm",(void*)f_8653},
+{"f_8686:chicken_syntax_scm",(void*)f_8686},
+{"f_8666:chicken_syntax_scm",(void*)f_8666},
+{"f_8651:chicken_syntax_scm",(void*)f_8651},
+{"f_8469:chicken_syntax_scm",(void*)f_8469},
+{"f_8543:chicken_syntax_scm",(void*)f_8543},
+{"f_8556:chicken_syntax_scm",(void*)f_8556},
+{"f_8574:chicken_syntax_scm",(void*)f_8574},
+{"f_8541:chicken_syntax_scm",(void*)f_8541},
+{"f_8537:chicken_syntax_scm",(void*)f_8537},
+{"f_8517:chicken_syntax_scm",(void*)f_8517},
+{"f_8425:chicken_syntax_scm",(void*)f_8425},
+{"f_2319:chicken_syntax_scm",(void*)f_2319},
+{"f_8382:chicken_syntax_scm",(void*)f_8382},
+{"f_8386:chicken_syntax_scm",(void*)f_8386},
+{"f_8393:chicken_syntax_scm",(void*)f_8393},
+{"f_8413:chicken_syntax_scm",(void*)f_8413},
+{"f_8417:chicken_syntax_scm",(void*)f_8417},
+{"f_8380:chicken_syntax_scm",(void*)f_8380},
+{"f_2322:chicken_syntax_scm",(void*)f_2322},
+{"f_8329:chicken_syntax_scm",(void*)f_8329},
+{"f_8333:chicken_syntax_scm",(void*)f_8333},
+{"f_8340:chicken_syntax_scm",(void*)f_8340},
+{"f_8368:chicken_syntax_scm",(void*)f_8368},
+{"f_8372:chicken_syntax_scm",(void*)f_8372},
+{"f_8327:chicken_syntax_scm",(void*)f_8327},
+{"f_2325:chicken_syntax_scm",(void*)f_2325},
+{"f_8101:chicken_syntax_scm",(void*)f_8101},
+{"f_8105:chicken_syntax_scm",(void*)f_8105},
+{"f_8114:chicken_syntax_scm",(void*)f_8114},
+{"f_8286:chicken_syntax_scm",(void*)f_8286},
+{"f_8315:chicken_syntax_scm",(void*)f_8315},
+{"f_8183:chicken_syntax_scm",(void*)f_8183},
+{"f_8216:chicken_syntax_scm",(void*)f_8216},
+{"f_8229:chicken_syntax_scm",(void*)f_8229},
+{"f_8214:chicken_syntax_scm",(void*)f_8214},
+{"f_8210:chicken_syntax_scm",(void*)f_8210},
+{"f_8099:chicken_syntax_scm",(void*)f_8099},
+{"f_2328:chicken_syntax_scm",(void*)f_2328},
+{"f_8059:chicken_syntax_scm",(void*)f_8059},
+{"f_8063:chicken_syntax_scm",(void*)f_8063},
+{"f_8083:chicken_syntax_scm",(void*)f_8083},
+{"f_8091:chicken_syntax_scm",(void*)f_8091},
+{"f_8066:chicken_syntax_scm",(void*)f_8066},
+{"f_8073:chicken_syntax_scm",(void*)f_8073},
+{"f_8077:chicken_syntax_scm",(void*)f_8077},
+{"f_8057:chicken_syntax_scm",(void*)f_8057},
+{"f_2331:chicken_syntax_scm",(void*)f_2331},
+{"f_7534:chicken_syntax_scm",(void*)f_7534},
+{"f_7538:chicken_syntax_scm",(void*)f_7538},
+{"f_7547:chicken_syntax_scm",(void*)f_7547},
+{"f_7550:chicken_syntax_scm",(void*)f_7550},
+{"f_8020:chicken_syntax_scm",(void*)f_8020},
+{"f_8049:chicken_syntax_scm",(void*)f_8049},
+{"f_7625:chicken_syntax_scm",(void*)f_7625},
+{"f_7980:chicken_syntax_scm",(void*)f_7980},
+{"f_7993:chicken_syntax_scm",(void*)f_7993},
+{"f_7628:chicken_syntax_scm",(void*)f_7628},
+{"f_7932:chicken_syntax_scm",(void*)f_7932},
+{"f_7974:chicken_syntax_scm",(void*)f_7974},
+{"f_7959:chicken_syntax_scm",(void*)f_7959},
+{"f_7971:chicken_syntax_scm",(void*)f_7971},
+{"f_7967:chicken_syntax_scm",(void*)f_7967},
+{"f_7631:chicken_syntax_scm",(void*)f_7631},
+{"f_7886:chicken_syntax_scm",(void*)f_7886},
+{"f_7919:chicken_syntax_scm",(void*)f_7919},
+{"f_7926:chicken_syntax_scm",(void*)f_7926},
+{"f_7643:chicken_syntax_scm",(void*)f_7643},
+{"f_7846:chicken_syntax_scm",(void*)f_7846},
+{"f_7650:chicken_syntax_scm",(void*)f_7650},
+{"f_7652:chicken_syntax_scm",(void*)f_7652},
+{"f_7840:chicken_syntax_scm",(void*)f_7840},
+{"f_7724:chicken_syntax_scm",(void*)f_7724},
+{"f_7806:chicken_syntax_scm",(void*)f_7806},
+{"f_7763:chicken_syntax_scm",(void*)f_7763},
+{"f_7743:chicken_syntax_scm",(void*)f_7743},
+{"f_7676:chicken_syntax_scm",(void*)f_7676},
+{"f_7714:chicken_syntax_scm",(void*)f_7714},
+{"f_7703:chicken_syntax_scm",(void*)f_7703},
+{"f_7711:chicken_syntax_scm",(void*)f_7711},
+{"f_7670:chicken_syntax_scm",(void*)f_7670},
+{"f_7674:chicken_syntax_scm",(void*)f_7674},
+{"f_7632:chicken_syntax_scm",(void*)f_7632},
+{"f_7583:chicken_syntax_scm",(void*)f_7583},
+{"f_7606:chicken_syntax_scm",(void*)f_7606},
+{"f_7610:chicken_syntax_scm",(void*)f_7610},
+{"f_7552:chicken_syntax_scm",(void*)f_7552},
+{"f_7573:chicken_syntax_scm",(void*)f_7573},
+{"f_7532:chicken_syntax_scm",(void*)f_7532},
+{"f_2334:chicken_syntax_scm",(void*)f_2334},
+{"f_7462:chicken_syntax_scm",(void*)f_7462},
+{"f_7466:chicken_syntax_scm",(void*)f_7466},
+{"f_7475:chicken_syntax_scm",(void*)f_7475},
+{"f_7478:chicken_syntax_scm",(void*)f_7478},
+{"f_7483:chicken_syntax_scm",(void*)f_7483},
+{"f_7520:chicken_syntax_scm",(void*)f_7520},
+{"f_7501:chicken_syntax_scm",(void*)f_7501},
+{"f_7460:chicken_syntax_scm",(void*)f_7460},
+{"f_2337:chicken_syntax_scm",(void*)f_2337},
+{"f_7091:chicken_syntax_scm",(void*)f_7091},
+{"f_7095:chicken_syntax_scm",(void*)f_7095},
+{"f_7104:chicken_syntax_scm",(void*)f_7104},
+{"f_7107:chicken_syntax_scm",(void*)f_7107},
+{"f_7418:chicken_syntax_scm",(void*)f_7418},
+{"f_7416:chicken_syntax_scm",(void*)f_7416},
+{"f_7110:chicken_syntax_scm",(void*)f_7110},
+{"f_7366:chicken_syntax_scm",(void*)f_7366},
+{"f_7408:chicken_syntax_scm",(void*)f_7408},
+{"f_7393:chicken_syntax_scm",(void*)f_7393},
+{"f_7405:chicken_syntax_scm",(void*)f_7405},
+{"f_7401:chicken_syntax_scm",(void*)f_7401},
+{"f_7113:chicken_syntax_scm",(void*)f_7113},
+{"f_7326:chicken_syntax_scm",(void*)f_7326},
+{"f_7133:chicken_syntax_scm",(void*)f_7133},
+{"f_7147:chicken_syntax_scm",(void*)f_7147},
+{"f_7320:chicken_syntax_scm",(void*)f_7320},
+{"f_7174:chicken_syntax_scm",(void*)f_7174},
+{"f_7272:chicken_syntax_scm",(void*)f_7272},
+{"f_7202:chicken_syntax_scm",(void*)f_7202},
+{"f_7216:chicken_syntax_scm",(void*)f_7216},
+{"f_7243:chicken_syntax_scm",(void*)f_7243},
+{"f_7210:chicken_syntax_scm",(void*)f_7210},
+{"f_7206:chicken_syntax_scm",(void*)f_7206},
+{"f_7141:chicken_syntax_scm",(void*)f_7141},
+{"f_7145:chicken_syntax_scm",(void*)f_7145},
+{"f_7137:chicken_syntax_scm",(void*)f_7137},
+{"f_7114:chicken_syntax_scm",(void*)f_7114},
+{"f_7089:chicken_syntax_scm",(void*)f_7089},
+{"f_2340:chicken_syntax_scm",(void*)f_2340},
+{"f_7085:chicken_syntax_scm",(void*)f_7085},
+{"f_7008:chicken_syntax_scm",(void*)f_7008},
+{"f_7012:chicken_syntax_scm",(void*)f_7012},
+{"f_7015:chicken_syntax_scm",(void*)f_7015},
+{"f_7018:chicken_syntax_scm",(void*)f_7018},
+{"f_7053:chicken_syntax_scm",(void*)f_7053},
+{"f_7006:chicken_syntax_scm",(void*)f_7006},
+{"f_2343:chicken_syntax_scm",(void*)f_2343},
+{"f_6903:chicken_syntax_scm",(void*)f_6903},
+{"f_6907:chicken_syntax_scm",(void*)f_6907},
+{"f_6994:chicken_syntax_scm",(void*)f_6994},
+{"f_6990:chicken_syntax_scm",(void*)f_6990},
+{"f_6909:chicken_syntax_scm",(void*)f_6909},
+{"f_6913:chicken_syntax_scm",(void*)f_6913},
+{"f_6970:chicken_syntax_scm",(void*)f_6970},
+{"f_6922:chicken_syntax_scm",(void*)f_6922},
+{"f_6944:chicken_syntax_scm",(void*)f_6944},
+{"f_6934:chicken_syntax_scm",(void*)f_6934},
+{"f_6925:chicken_syntax_scm",(void*)f_6925},
+{"f_6901:chicken_syntax_scm",(void*)f_6901},
+{"f_2346:chicken_syntax_scm",(void*)f_2346},
+{"f_6740:chicken_syntax_scm",(void*)f_6740},
+{"f_6744:chicken_syntax_scm",(void*)f_6744},
+{"f_6753:chicken_syntax_scm",(void*)f_6753},
+{"f_6756:chicken_syntax_scm",(void*)f_6756},
+{"f_6761:chicken_syntax_scm",(void*)f_6761},
+{"f_6806:chicken_syntax_scm",(void*)f_6806},
+{"f_6873:chicken_syntax_scm",(void*)f_6873},
+{"f_6835:chicken_syntax_scm",(void*)f_6835},
+{"f_6775:chicken_syntax_scm",(void*)f_6775},
+{"f_6779:chicken_syntax_scm",(void*)f_6779},
+{"f_6738:chicken_syntax_scm",(void*)f_6738},
+{"f_2349:chicken_syntax_scm",(void*)f_2349},
+{"f_6540:chicken_syntax_scm",(void*)f_6540},
+{"f_6544:chicken_syntax_scm",(void*)f_6544},
+{"f_6553:chicken_syntax_scm",(void*)f_6553},
+{"f_6556:chicken_syntax_scm",(void*)f_6556},
+{"f_6559:chicken_syntax_scm",(void*)f_6559},
+{"f_6562:chicken_syntax_scm",(void*)f_6562},
+{"f_6565:chicken_syntax_scm",(void*)f_6565},
+{"f_6572:chicken_syntax_scm",(void*)f_6572},
+{"f_6590:chicken_syntax_scm",(void*)f_6590},
+{"f_6606:chicken_syntax_scm",(void*)f_6606},
+{"f_6612:chicken_syntax_scm",(void*)f_6612},
+{"f_6672:chicken_syntax_scm",(void*)f_6672},
+{"f_6699:chicken_syntax_scm",(void*)f_6699},
+{"f_6666:chicken_syntax_scm",(void*)f_6666},
+{"f_6662:chicken_syntax_scm",(void*)f_6662},
+{"f_6654:chicken_syntax_scm",(void*)f_6654},
+{"f_6650:chicken_syntax_scm",(void*)f_6650},
+{"f_6619:chicken_syntax_scm",(void*)f_6619},
+{"f_6588:chicken_syntax_scm",(void*)f_6588},
+{"f_6538:chicken_syntax_scm",(void*)f_6538},
+{"f_2352:chicken_syntax_scm",(void*)f_2352},
+{"f_6534:chicken_syntax_scm",(void*)f_6534},
+{"f_6530:chicken_syntax_scm",(void*)f_6530},
+{"f_5947:chicken_syntax_scm",(void*)f_5947},
+{"f_5951:chicken_syntax_scm",(void*)f_5951},
+{"f_5963:chicken_syntax_scm",(void*)f_5963},
+{"f_5966:chicken_syntax_scm",(void*)f_5966},
+{"f_5969:chicken_syntax_scm",(void*)f_5969},
+{"f_6269:chicken_syntax_scm",(void*)f_6269},
+{"f_6272:chicken_syntax_scm",(void*)f_6272},
+{"f_6481:chicken_syntax_scm",(void*)f_6481},
+{"f_6510:chicken_syntax_scm",(void*)f_6510},
+{"f_6275:chicken_syntax_scm",(void*)f_6275},
+{"f_6437:chicken_syntax_scm",(void*)f_6437},
+{"f_6475:chicken_syntax_scm",(void*)f_6475},
+{"f_6464:chicken_syntax_scm",(void*)f_6464},
+{"f_6472:chicken_syntax_scm",(void*)f_6472},
+{"f_6291:chicken_syntax_scm",(void*)f_6291},
+{"f_6402:chicken_syntax_scm",(void*)f_6402},
+{"f_6431:chicken_syntax_scm",(void*)f_6431},
+{"f_6294:chicken_syntax_scm",(void*)f_6294},
+{"f_6297:chicken_syntax_scm",(void*)f_6297},
+{"f_6300:chicken_syntax_scm",(void*)f_6300},
+{"f_6358:chicken_syntax_scm",(void*)f_6358},
+{"f_6396:chicken_syntax_scm",(void*)f_6396},
+{"f_6385:chicken_syntax_scm",(void*)f_6385},
+{"f_6393:chicken_syntax_scm",(void*)f_6393},
+{"f_6303:chicken_syntax_scm",(void*)f_6303},
+{"f_6306:chicken_syntax_scm",(void*)f_6306},
+{"f_6309:chicken_syntax_scm",(void*)f_6309},
+{"f_6316:chicken_syntax_scm",(void*)f_6316},
+{"f_6276:chicken_syntax_scm",(void*)f_6276},
+{"f_6288:chicken_syntax_scm",(void*)f_6288},
+{"f_6284:chicken_syntax_scm",(void*)f_6284},
+{"f_6068:chicken_syntax_scm",(void*)f_6068},
+{"f_6074:chicken_syntax_scm",(void*)f_6074},
+{"f_6262:chicken_syntax_scm",(void*)f_6262},
+{"f_6250:chicken_syntax_scm",(void*)f_6250},
+{"f_6234:chicken_syntax_scm",(void*)f_6234},
+{"f_6198:chicken_syntax_scm",(void*)f_6198},
+{"f_6148:chicken_syntax_scm",(void*)f_6148},
+{"f_6136:chicken_syntax_scm",(void*)f_6136},
+{"f_5971:chicken_syntax_scm",(void*)f_5971},
+{"f_5979:chicken_syntax_scm",(void*)f_5979},
+{"f_5983:chicken_syntax_scm",(void*)f_5983},
+{"f_5987:chicken_syntax_scm",(void*)f_5987},
+{"f_5989:chicken_syntax_scm",(void*)f_5989},
+{"f_6042:chicken_syntax_scm",(void*)f_6042},
+{"f_6058:chicken_syntax_scm",(void*)f_6058},
+{"f_6054:chicken_syntax_scm",(void*)f_6054},
+{"f_6010:chicken_syntax_scm",(void*)f_6010},
+{"f_5945:chicken_syntax_scm",(void*)f_5945},
+{"f_2355:chicken_syntax_scm",(void*)f_2355},
+{"f_5937:chicken_syntax_scm",(void*)f_5937},
+{"f_5933:chicken_syntax_scm",(void*)f_5933},
+{"f_5929:chicken_syntax_scm",(void*)f_5929},
+{"f_5722:chicken_syntax_scm",(void*)f_5722},
+{"f_5726:chicken_syntax_scm",(void*)f_5726},
+{"f_5729:chicken_syntax_scm",(void*)f_5729},
+{"f_5732:chicken_syntax_scm",(void*)f_5732},
+{"f_5739:chicken_syntax_scm",(void*)f_5739},
+{"f_5889:chicken_syntax_scm",(void*)f_5889},
+{"f_5774:chicken_syntax_scm",(void*)f_5774},
+{"f_5850:chicken_syntax_scm",(void*)f_5850},
+{"f_5862:chicken_syntax_scm",(void*)f_5862},
+{"f_5834:chicken_syntax_scm",(void*)f_5834},
+{"f_5720:chicken_syntax_scm",(void*)f_5720},
+{"f_2358:chicken_syntax_scm",(void*)f_2358},
+{"f_5712:chicken_syntax_scm",(void*)f_5712},
+{"f_5408:chicken_syntax_scm",(void*)f_5408},
+{"f_5412:chicken_syntax_scm",(void*)f_5412},
+{"f_5424:chicken_syntax_scm",(void*)f_5424},
+{"f_5427:chicken_syntax_scm",(void*)f_5427},
+{"f_5430:chicken_syntax_scm",(void*)f_5430},
+{"f_5433:chicken_syntax_scm",(void*)f_5433},
+{"f_5436:chicken_syntax_scm",(void*)f_5436},
+{"f_5439:chicken_syntax_scm",(void*)f_5439},
+{"f_5460:chicken_syntax_scm",(void*)f_5460},
+{"f_5688:chicken_syntax_scm",(void*)f_5688},
+{"f_5550:chicken_syntax_scm",(void*)f_5550},
+{"f_5569:chicken_syntax_scm",(void*)f_5569},
+{"f_5526:chicken_syntax_scm",(void*)f_5526},
+{"f_5458:chicken_syntax_scm",(void*)f_5458},
+{"f_5406:chicken_syntax_scm",(void*)f_5406},
+{"f_2361:chicken_syntax_scm",(void*)f_2361},
+{"f_5398:chicken_syntax_scm",(void*)f_5398},
+{"f_5394:chicken_syntax_scm",(void*)f_5394},
+{"f_5390:chicken_syntax_scm",(void*)f_5390},
+{"f_5386:chicken_syntax_scm",(void*)f_5386},
+{"f_4860:chicken_syntax_scm",(void*)f_4860},
+{"f_4864:chicken_syntax_scm",(void*)f_4864},
+{"f_4901:chicken_syntax_scm",(void*)f_4901},
+{"f_5309:chicken_syntax_scm",(void*)f_5309},
+{"f_5346:chicken_syntax_scm",(void*)f_5346},
+{"f_5350:chicken_syntax_scm",(void*)f_5350},
+{"f_5303:chicken_syntax_scm",(void*)f_5303},
+{"f_4904:chicken_syntax_scm",(void*)f_4904},
+{"f_4907:chicken_syntax_scm",(void*)f_4907},
+{"f_4910:chicken_syntax_scm",(void*)f_4910},
+{"f_4913:chicken_syntax_scm",(void*)f_4913},
+{"f_4916:chicken_syntax_scm",(void*)f_4916},
+{"f_4919:chicken_syntax_scm",(void*)f_4919},
+{"f_4922:chicken_syntax_scm",(void*)f_4922},
+{"f_4925:chicken_syntax_scm",(void*)f_4925},
+{"f_4928:chicken_syntax_scm",(void*)f_4928},
+{"f_4931:chicken_syntax_scm",(void*)f_4931},
+{"f_4934:chicken_syntax_scm",(void*)f_4934},
+{"f_4945:chicken_syntax_scm",(void*)f_4945},
+{"f_4971:chicken_syntax_scm",(void*)f_4971},
+{"f_4981:chicken_syntax_scm",(void*)f_4981},
+{"f_4985:chicken_syntax_scm",(void*)f_4985},
+{"f_4999:chicken_syntax_scm",(void*)f_4999},
+{"f_5023:chicken_syntax_scm",(void*)f_5023},
+{"f_5099:chicken_syntax_scm",(void*)f_5099},
+{"f_5247:chicken_syntax_scm",(void*)f_5247},
+{"f_5167:chicken_syntax_scm",(void*)f_5167},
+{"f_5186:chicken_syntax_scm",(void*)f_5186},
+{"f_5156:chicken_syntax_scm",(void*)f_5156},
+{"f_5124:chicken_syntax_scm",(void*)f_5124},
+{"f_5027:chicken_syntax_scm",(void*)f_5027},
+{"f_5050:chicken_syntax_scm",(void*)f_5050},
+{"f_5083:chicken_syntax_scm",(void*)f_5083},
+{"f_5063:chicken_syntax_scm",(void*)f_5063},
+{"f_5044:chicken_syntax_scm",(void*)f_5044},
+{"f_5013:chicken_syntax_scm",(void*)f_5013},
+{"f_5021:chicken_syntax_scm",(void*)f_5021},
+{"f_5007:chicken_syntax_scm",(void*)f_5007},
+{"f_4969:chicken_syntax_scm",(void*)f_4969},
+{"f_4866:chicken_syntax_scm",(void*)f_4866},
+{"f_4872:chicken_syntax_scm",(void*)f_4872},
+{"f_4898:chicken_syntax_scm",(void*)f_4898},
+{"f_4886:chicken_syntax_scm",(void*)f_4886},
+{"f_4890:chicken_syntax_scm",(void*)f_4890},
+{"f_4858:chicken_syntax_scm",(void*)f_4858},
+{"f_2364:chicken_syntax_scm",(void*)f_2364},
+{"f_4758:chicken_syntax_scm",(void*)f_4758},
+{"f_4762:chicken_syntax_scm",(void*)f_4762},
+{"f_4827:chicken_syntax_scm",(void*)f_4827},
+{"f_4842:chicken_syntax_scm",(void*)f_4842},
+{"f_4777:chicken_syntax_scm",(void*)f_4777},
+{"f_4800:chicken_syntax_scm",(void*)f_4800},
+{"f_4812:chicken_syntax_scm",(void*)f_4812},
+{"f_4756:chicken_syntax_scm",(void*)f_4756},
+{"f_2367:chicken_syntax_scm",(void*)f_2367},
+{"f_4752:chicken_syntax_scm",(void*)f_4752},
+{"f_4748:chicken_syntax_scm",(void*)f_4748},
+{"f_4544:chicken_syntax_scm",(void*)f_4544},
+{"f_4548:chicken_syntax_scm",(void*)f_4548},
+{"f_4551:chicken_syntax_scm",(void*)f_4551},
+{"f_4554:chicken_syntax_scm",(void*)f_4554},
+{"f_4557:chicken_syntax_scm",(void*)f_4557},
+{"f_4568:chicken_syntax_scm",(void*)f_4568},
+{"f_4596:chicken_syntax_scm",(void*)f_4596},
+{"f_4688:chicken_syntax_scm",(void*)f_4688},
+{"f_4542:chicken_syntax_scm",(void*)f_4542},
+{"f_2370:chicken_syntax_scm",(void*)f_2370},
+{"f_4534:chicken_syntax_scm",(void*)f_4534},
+{"f_4530:chicken_syntax_scm",(void*)f_4530},
+{"f_4121:chicken_syntax_scm",(void*)f_4121},
+{"f_4125:chicken_syntax_scm",(void*)f_4125},
+{"f_4128:chicken_syntax_scm",(void*)f_4128},
+{"f_4131:chicken_syntax_scm",(void*)f_4131},
+{"f_4134:chicken_syntax_scm",(void*)f_4134},
+{"f_4137:chicken_syntax_scm",(void*)f_4137},
+{"f_4140:chicken_syntax_scm",(void*)f_4140},
+{"f_4143:chicken_syntax_scm",(void*)f_4143},
+{"f_4146:chicken_syntax_scm",(void*)f_4146},
+{"f_4355:chicken_syntax_scm",(void*)f_4355},
+{"f_4395:chicken_syntax_scm",(void*)f_4395},
+{"f_4429:chicken_syntax_scm",(void*)f_4429},
+{"f_4458:chicken_syntax_scm",(void*)f_4458},
+{"f_4403:chicken_syntax_scm",(void*)f_4403},
+{"f_4399:chicken_syntax_scm",(void*)f_4399},
+{"f_4148:chicken_syntax_scm",(void*)f_4148},
+{"f_4272:chicken_syntax_scm",(void*)f_4272},
+{"f_4299:chicken_syntax_scm",(void*)f_4299},
+{"f_4270:chicken_syntax_scm",(void*)f_4270},
+{"f_4266:chicken_syntax_scm",(void*)f_4266},
+{"f_4258:chicken_syntax_scm",(void*)f_4258},
+{"f_4239:chicken_syntax_scm",(void*)f_4239},
+{"f_4209:chicken_syntax_scm",(void*)f_4209},
+{"f_4190:chicken_syntax_scm",(void*)f_4190},
+{"f_4119:chicken_syntax_scm",(void*)f_4119},
+{"f_2373:chicken_syntax_scm",(void*)f_2373},
+{"f_3650:chicken_syntax_scm",(void*)f_3650},
+{"f_3654:chicken_syntax_scm",(void*)f_3654},
+{"f_3669:chicken_syntax_scm",(void*)f_3669},
+{"f_3672:chicken_syntax_scm",(void*)f_3672},
+{"f_3675:chicken_syntax_scm",(void*)f_3675},
+{"f_3678:chicken_syntax_scm",(void*)f_3678},
+{"f_3681:chicken_syntax_scm",(void*)f_3681},
+{"f_3687:chicken_syntax_scm",(void*)f_3687},
+{"f_3690:chicken_syntax_scm",(void*)f_3690},
+{"f_4058:chicken_syntax_scm",(void*)f_4058},
+{"f_4087:chicken_syntax_scm",(void*)f_4087},
+{"f_3693:chicken_syntax_scm",(void*)f_3693},
+{"f_4011:chicken_syntax_scm",(void*)f_4011},
+{"f_4038:chicken_syntax_scm",(void*)f_4038},
+{"f_4009:chicken_syntax_scm",(void*)f_4009},
+{"f_4005:chicken_syntax_scm",(void*)f_4005},
+{"f_3722:chicken_syntax_scm",(void*)f_3722},
+{"f_3748:chicken_syntax_scm",(void*)f_3748},
+{"f_3784:chicken_syntax_scm",(void*)f_3784},
+{"f_3764:chicken_syntax_scm",(void*)f_3764},
+{"f_3760:chicken_syntax_scm",(void*)f_3760},
+{"f_3720:chicken_syntax_scm",(void*)f_3720},
+{"f_3716:chicken_syntax_scm",(void*)f_3716},
+{"f_3648:chicken_syntax_scm",(void*)f_3648},
+{"f_2376:chicken_syntax_scm",(void*)f_2376},
+{"f_3640:chicken_syntax_scm",(void*)f_3640},
+{"f_3450:chicken_syntax_scm",(void*)f_3450},
+{"f_3454:chicken_syntax_scm",(void*)f_3454},
+{"f_3457:chicken_syntax_scm",(void*)f_3457},
+{"f_3460:chicken_syntax_scm",(void*)f_3460},
+{"f_3463:chicken_syntax_scm",(void*)f_3463},
+{"f_3466:chicken_syntax_scm",(void*)f_3466},
+{"f_3475:chicken_syntax_scm",(void*)f_3475},
+{"f_3578:chicken_syntax_scm",(void*)f_3578},
+{"f_3606:chicken_syntax_scm",(void*)f_3606},
+{"f_3600:chicken_syntax_scm",(void*)f_3600},
+{"f_3581:chicken_syntax_scm",(void*)f_3581},
+{"f_3485:chicken_syntax_scm",(void*)f_3485},
+{"f_3488:chicken_syntax_scm",(void*)f_3488},
+{"f_3560:chicken_syntax_scm",(void*)f_3560},
+{"f_3537:chicken_syntax_scm",(void*)f_3537},
+{"f_3494:chicken_syntax_scm",(void*)f_3494},
+{"f_3505:chicken_syntax_scm",(void*)f_3505},
+{"f_3525:chicken_syntax_scm",(void*)f_3525},
+{"f_3448:chicken_syntax_scm",(void*)f_3448},
+{"f_2379:chicken_syntax_scm",(void*)f_2379},
+{"f_3440:chicken_syntax_scm",(void*)f_3440},
+{"f_3219:chicken_syntax_scm",(void*)f_3219},
+{"f_3223:chicken_syntax_scm",(void*)f_3223},
+{"f_3226:chicken_syntax_scm",(void*)f_3226},
+{"f_3229:chicken_syntax_scm",(void*)f_3229},
+{"f_3232:chicken_syntax_scm",(void*)f_3232},
+{"f_3235:chicken_syntax_scm",(void*)f_3235},
+{"f_3244:chicken_syntax_scm",(void*)f_3244},
+{"f_3363:chicken_syntax_scm",(void*)f_3363},
+{"f_3391:chicken_syntax_scm",(void*)f_3391},
+{"f_3424:chicken_syntax_scm",(void*)f_3424},
+{"f_3397:chicken_syntax_scm",(void*)f_3397},
+{"f_3385:chicken_syntax_scm",(void*)f_3385},
+{"f_3366:chicken_syntax_scm",(void*)f_3366},
+{"f_3254:chicken_syntax_scm",(void*)f_3254},
+{"f_3257:chicken_syntax_scm",(void*)f_3257},
+{"f_3353:chicken_syntax_scm",(void*)f_3353},
+{"f_3318:chicken_syntax_scm",(void*)f_3318},
+{"f_3263:chicken_syntax_scm",(void*)f_3263},
+{"f_3286:chicken_syntax_scm",(void*)f_3286},
+{"f_3306:chicken_syntax_scm",(void*)f_3306},
+{"f_3217:chicken_syntax_scm",(void*)f_3217},
+{"f_2382:chicken_syntax_scm",(void*)f_2382},
+{"f_2938:chicken_syntax_scm",(void*)f_2938},
+{"f_2942:chicken_syntax_scm",(void*)f_2942},
+{"f_2945:chicken_syntax_scm",(void*)f_2945},
+{"f_2948:chicken_syntax_scm",(void*)f_2948},
+{"f_2951:chicken_syntax_scm",(void*)f_2951},
+{"f_2954:chicken_syntax_scm",(void*)f_2954},
+{"f_2957:chicken_syntax_scm",(void*)f_2957},
+{"f_2966:chicken_syntax_scm",(void*)f_2966},
+{"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_3149:chicken_syntax_scm",(void*)f_3149},
+{"f_3174:chicken_syntax_scm",(void*)f_3174},
+{"f_3196:chicken_syntax_scm",(void*)f_3196},
+{"f11165:chicken_syntax_scm",(void*)f11165},
+{"f11161:chicken_syntax_scm",(void*)f11161},
+{"f_3181:chicken_syntax_scm",(void*)f_3181},
+{"f_3168:chicken_syntax_scm",(void*)f_3168},
+{"f_3164:chicken_syntax_scm",(void*)f_3164},
+{"f_3143:chicken_syntax_scm",(void*)f_3143},
+{"f_3139:chicken_syntax_scm",(void*)f_3139},
+{"f_3106:chicken_syntax_scm",(void*)f_3106},
+{"f_2976:chicken_syntax_scm",(void*)f_2976},
+{"f_2983:chicken_syntax_scm",(void*)f_2983},
+{"f_3091:chicken_syntax_scm",(void*)f_3091},
+{"f_3079:chicken_syntax_scm",(void*)f_3079},
+{"f_3075:chicken_syntax_scm",(void*)f_3075},
+{"f_3011:chicken_syntax_scm",(void*)f_3011},
+{"f_3039:chicken_syntax_scm",(void*)f_3039},
+{"f_3051:chicken_syntax_scm",(void*)f_3051},
+{"f_3035:chicken_syntax_scm",(void*)f_3035},
+{"f_2936:chicken_syntax_scm",(void*)f_2936},
+{"f_2385:chicken_syntax_scm",(void*)f_2385},
+{"f_2834:chicken_syntax_scm",(void*)f_2834},
+{"f_2838:chicken_syntax_scm",(void*)f_2838},
+{"f_2844:chicken_syntax_scm",(void*)f_2844},
+{"f_2928:chicken_syntax_scm",(void*)f_2928},
+{"f_2889:chicken_syntax_scm",(void*)f_2889},
+{"f_2901:chicken_syntax_scm",(void*)f_2901},
+{"f_2832:chicken_syntax_scm",(void*)f_2832},
+{"f_2388:chicken_syntax_scm",(void*)f_2388},
+{"f_2797:chicken_syntax_scm",(void*)f_2797},
+{"f_2801:chicken_syntax_scm",(void*)f_2801},
+{"f_2808:chicken_syntax_scm",(void*)f_2808},
+{"f_2820:chicken_syntax_scm",(void*)f_2820},
+{"f_2824:chicken_syntax_scm",(void*)f_2824},
+{"f_2795:chicken_syntax_scm",(void*)f_2795},
+{"f_2391:chicken_syntax_scm",(void*)f_2391},
+{"f_2772:chicken_syntax_scm",(void*)f_2772},
+{"f_2776:chicken_syntax_scm",(void*)f_2776},
+{"f_2770:chicken_syntax_scm",(void*)f_2770},
+{"f_2394:chicken_syntax_scm",(void*)f_2394},
+{"f_2640:chicken_syntax_scm",(void*)f_2640},
+{"f_2650:chicken_syntax_scm",(void*)f_2650},
+{"f_2700:chicken_syntax_scm",(void*)f_2700},
+{"f_2713:chicken_syntax_scm",(void*)f_2713},
+{"f_2666:chicken_syntax_scm",(void*)f_2666},
+{"f_2682:chicken_syntax_scm",(void*)f_2682},
+{"f_2638:chicken_syntax_scm",(void*)f_2638},
+{"f_2397:chicken_syntax_scm",(void*)f_2397},
+{"f_2425:chicken_syntax_scm",(void*)f_2425},
+{"f_2586:chicken_syntax_scm",(void*)f_2586},
+{"f_2590:chicken_syntax_scm",(void*)f_2590},
+{"f_2573:chicken_syntax_scm",(void*)f_2573},
+{"f_2435:chicken_syntax_scm",(void*)f_2435},
+{"f_2523:chicken_syntax_scm",(void*)f_2523},
+{"f_2438:chicken_syntax_scm",(void*)f_2438},
+{"f_2475:chicken_syntax_scm",(void*)f_2475},
+{"f_2441:chicken_syntax_scm",(void*)f_2441},
+{"f_2451:chicken_syntax_scm",(void*)f_2451},
+{"f_2461:chicken_syntax_scm",(void*)f_2461},
+{"f_2459:chicken_syntax_scm",(void*)f_2459},
+{"f_2423:chicken_syntax_scm",(void*)f_2423},
+{"f_2400:chicken_syntax_scm",(void*)f_2400},
+{"f_2415:chicken_syntax_scm",(void*)f_2415},
+{"f_2413:chicken_syntax_scm",(void*)f_2413},
+{"f_2403:chicken_syntax_scm",(void*)f_2403},
+{"f_2406:chicken_syntax_scm",(void*)f_2406},
+{"f_2409:chicken_syntax_scm",(void*)f_2409},
+{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
new file mode 100644
index 00000000..9e57db15
--- /dev/null
+++ b/bootstrap/chicken.c
@@ -0,0 +1,2828 @@
+/* Generated from chicken.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:29
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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 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_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[91];
+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_340)
+static void C_ccall f_340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_343)
+static void C_ccall f_343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_346)
+static void C_ccall f_346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_349)
+static void C_ccall f_349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_352)
+static void C_ccall f_352(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_355)
+static void C_ccall f_355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_358)
+static void C_ccall f_358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_361)
+static void C_ccall f_361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_364)
+static void C_ccall f_364(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_367)
+static void C_ccall f_367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_370)
+static void C_ccall f_370(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_373)
+static void C_ccall f_373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_376)
+static void C_ccall f_376(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_379)
+static void C_ccall f_379(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_382)
+static void C_ccall f_382(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_385)
+static void C_ccall f_385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_388)
+static void C_ccall f_388(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_391)
+static void C_ccall f_391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_395)
+static void C_ccall f_395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1299)
+static void C_ccall f_1299(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1306)
+static void C_ccall f_1306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1309)
+static void C_fcall f_1309(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1312)
+static void C_fcall f_1312(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1417)
+static void C_ccall f_1417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1430)
+static void C_ccall f_1430(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1562)
+static void C_fcall f_1562(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1560)
+static void C_ccall f_1560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1490)
+static void C_ccall f_1490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1514)
+static void C_fcall f_1514(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1498)
+static void C_ccall f_1498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1502)
+static void C_ccall f_1502(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1318)
+static void C_ccall f_1318(C_word c,C_word t0,C_word t1) 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_1402)
+static void C_ccall f_1402(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1382)
+static void C_ccall f_1382(C_word c,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_1297)
+static void C_ccall f_1297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_398)
+static void C_ccall f_398(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1158)
+static void C_ccall f_1158(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1162)
+static void C_ccall f_1162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1174)
+static void C_ccall f_1174(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_1177)
+static void C_ccall f_1177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1184)
+static void C_ccall f_1184(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1254)
+static void C_ccall f_1254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1270)
+static void C_ccall f_1270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1234)
+static void C_ccall f_1234(C_word c,C_word t0,C_word t1) 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_1156)
+static void C_ccall f_1156(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_401)
+static void C_ccall f_401(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_978)
+static void C_ccall f_978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_987)
+static void C_ccall f_987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1110)
+static void C_fcall f_1110(C_word t0,C_word t1,C_word t2) 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_1137)
+static void C_fcall f_1137(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_990)
+static void C_ccall f_990(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1086)
+static void C_ccall f_1086(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1001)
+static void C_ccall f_1001(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1084)
+static void C_ccall f_1084(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1009)
+static void C_ccall f_1009(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_404)
+static void C_ccall f_404(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_888)
+static void C_ccall f_888(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_895)
+static void C_ccall f_895(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_926)
+static void C_ccall f_926(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_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_951)
+static void C_ccall f_951(C_word c,C_word t0,C_word t1) 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_957)
+static void C_ccall f_957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_960)
+static void C_ccall f_960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_886)
+static void C_ccall f_886(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_407)
+static void C_ccall f_407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_814)
+static void C_ccall f_814(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_821)
+static void C_ccall f_821(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_831)
+static void C_ccall f_831(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_847)
+static void C_ccall f_847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_867)
+static void C_ccall f_867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_863)
+static void C_fcall f_863(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_812)
+static void C_ccall f_812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_410)
+static void C_ccall f_410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_785)
+static void C_ccall f_785(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_789)
+static void C_ccall f_789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_804)
+static void C_ccall f_804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_783)
+static void C_ccall f_783(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_413)
+static void C_ccall f_413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_416)
+static void C_ccall f_416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_776)
+static void C_ccall f_776(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_772)
+static void C_ccall f_772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_764)
+static void C_ccall f_764(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_754)
+static void C_ccall f_754(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_762)
+static void C_ccall f_762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_420)
+static void C_ccall f_420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_549)
+static void C_ccall f_549(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_561)
+static void C_fcall f_561(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_744)
+static void C_ccall f_744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_737)
+static void C_ccall f_737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_659)
+static void C_ccall f_659(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_676)
+static void C_ccall f_676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_662)
+static void C_ccall f_662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_583)
+static void C_ccall f_583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_646)
+static void C_ccall f_646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_636)
+static void C_ccall f_636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_626)
+static void C_ccall f_626(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_553)
+static void C_ccall f_553(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_556)
+static void C_ccall f_556(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_537)
+static void C_ccall f_537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_541)
+static void C_ccall f_541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_529)
+static void C_ccall f_529(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_535)
+static void C_ccall f_535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_532)
+static void C_ccall f_532(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_422)
+static void C_ccall f_422(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_428)
+static void C_fcall f_428(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_463)
+static void C_fcall f_463(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_489)
+static void C_ccall f_489(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_442)
+static void C_ccall f_442(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_1309)
+static void C_fcall trf_1309(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1309(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1309(t0,t1);}
+
+C_noret_decl(trf_1312)
+static void C_fcall trf_1312(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1312(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1312(t0,t1);}
+
+C_noret_decl(trf_1562)
+static void C_fcall trf_1562(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1562(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1562(t0,t1,t2);}
+
+C_noret_decl(trf_1514)
+static void C_fcall trf_1514(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1514(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1514(t0,t1,t2);}
+
+C_noret_decl(trf_1110)
+static void C_fcall trf_1110(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1110(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1110(t0,t1,t2);}
+
+C_noret_decl(trf_1137)
+static void C_fcall trf_1137(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1137(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1137(t0,t1);}
+
+C_noret_decl(trf_863)
+static void C_fcall trf_863(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_863(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_863(t0,t1);}
+
+C_noret_decl(trf_561)
+static void C_fcall trf_561(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_561(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_561(t0,t1,t2);}
+
+C_noret_decl(trf_428)
+static void C_fcall trf_428(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_428(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_428(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_463)
+static void C_fcall trf_463(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_463(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_463(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(1098)){
+C_save(t1);
+C_rereclaim2(1098*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,91);
+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],6,"unsafe");
+lf[16]=C_h_intern(&lf[16],18,"disable-interrupts");
+lf[17]=C_h_intern(&lf[17],8,"no-trace");
+lf[18]=C_h_intern(&lf[18],5,"block");
+lf[19]=C_h_intern(&lf[19],11,"lambda-lift");
+lf[20]=C_h_intern(&lf[20],14,"no-lambda-info");
+lf[21]=C_h_intern(&lf[21],11,"debug-level");
+lf[22]=C_h_intern(&lf[22],25,"\010compilercompiler-warning");
+lf[23]=C_h_intern(&lf[23],5,"usage");
+lf[24]=C_decode_literal(C_heaptop,"\376B\000\000 invalid debug level ~S - ignored");
+lf[25]=C_h_intern(&lf[25],31,"\010compilervalid-compiler-options");
+lf[26]=C_h_intern(&lf[26],45,"\010compilervalid-compiler-options-with-argument");
+lf[27]=C_h_intern(&lf[27],4,"quit");
+lf[28]=C_decode_literal(C_heaptop,"\376B\000\000 missing argument to `-~s\047 option");
+lf[29]=C_decode_literal(C_heaptop,"\376B\000\000&invalid compiler option `~a\047 - ignored");
+lf[30]=C_h_intern(&lf[30],4,"conc");
+lf[31]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
+lf[32]=C_h_intern(&lf[32],6,"append");
+lf[33]=C_h_intern(&lf[33],4,"argv");
+lf[34]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[35]=C_h_intern(&lf[35],6,"remove");
+lf[36]=C_h_intern(&lf[36],12,"string-split");
+lf[37]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[38]=C_h_intern(&lf[38],24,"get-environment-variable");
+lf[39]=C_decode_literal(C_heaptop,"\376B\000\000\017CHICKEN_OPTIONS");
+lf[40]=C_h_intern(&lf[40],16,"\003sysmacro-subset");
+lf[41]=C_h_intern(&lf[41],28,"\003sysextend-macro-environment");
+lf[42]=C_h_intern(&lf[42],15,"foreign-declare");
+lf[43]=C_h_intern(&lf[43],12,"\004coredeclare");
+lf[44]=C_h_intern(&lf[44],10,"\003sysappend");
+lf[45]=C_h_intern(&lf[45],16,"\003syscheck-syntax");
+lf[46]=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[47]=C_h_intern(&lf[47],18,"\003syser-transformer");
+lf[48]=C_h_intern(&lf[48],13,"foreign-value");
+lf[49]=C_h_intern(&lf[49],14,"symbol->string");
+lf[50]=C_h_intern(&lf[50],12,"syntax-error");
+lf[51]=C_decode_literal(C_heaptop,"\376B\000\000*bad argument type - not a string or symbol");
+lf[52]=C_h_intern(&lf[52],23,"define-foreign-variable");
+lf[53]=C_h_intern(&lf[53],5,"begin");
+lf[54]=C_h_intern(&lf[54],6,"gensym");
+lf[55]=C_h_intern(&lf[55],5,"code_");
+lf[56]=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[57]=C_h_intern(&lf[57],12,"foreign-code");
+lf[58]=C_h_intern(&lf[58],11,"\004coreinline");
+lf[59]=C_h_intern(&lf[59],17,"get-output-string");
+lf[60]=C_h_intern(&lf[60],7,"display");
+lf[61]=C_decode_literal(C_heaptop,"\376B\000\000 \012; return C_SCHEME_UNDEFINED; }\012");
+lf[62]=C_h_intern(&lf[62],18,"string-intersperse");
+lf[63]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[64]=C_decode_literal(C_heaptop,"\376B\000\000\005() { ");
+lf[65]=C_decode_literal(C_heaptop,"\376B\000\000\016static C_word ");
+lf[66]=C_h_intern(&lf[66],18,"open-output-string");
+lf[67]=C_h_intern(&lf[67],7,"declare");
+lf[68]=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[69]=C_h_intern(&lf[69],12,"let-location");
+lf[70]=C_h_intern(&lf[70],17,"\004corelet-location");
+lf[71]=C_h_intern(&lf[71],10,"fold-right");
+lf[72]=C_h_intern(&lf[72],10,"append-map");
+lf[73]=C_h_intern(&lf[73],3,"let");
+lf[74]=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[75]=C_h_intern(&lf[75],15,"define-location");
+lf[76]=C_h_intern(&lf[76],9,"\004coreset!");
+lf[77]=C_h_intern(&lf[77],24,"define-external-variable");
+lf[78]=C_h_intern(&lf[78],9,"\003syserror");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[80]=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[81]=C_h_intern(&lf[81],15,"define-external");
+lf[82]=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[83]=C_h_intern(&lf[83],5,"quote");
+lf[84]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[85]=C_h_intern(&lf[85],29,"\004coreforeign-callback-wrapper");
+lf[86]=C_h_intern(&lf[86],6,"lambda");
+lf[87]=C_h_intern(&lf[87],6,"define");
+lf[88]=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[89]=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[90]=C_h_intern(&lf[90],21,"\003sysmacro-environment");
+C_register_lf2(lf,91,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_340,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k338 */
+static void C_ccall f_340(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_340,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_343,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k341 in k338 */
+static void C_ccall f_343(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_346,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_chicken_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k344 in k341 in k338 */
+static void C_ccall f_346(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_346,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_349,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_srfi_1_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k347 in k344 in k341 in k338 */
+static void C_ccall f_349(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_352,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_srfi_4_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_352(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_355,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_utils_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_355(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_358,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_files_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_358(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_361,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_extras_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_364,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_364(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_364,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_367,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_support_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_367(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_367,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_370,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_compiler_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_370(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_370,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_373,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_optimizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_373(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_373,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_376,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_compiler_syntax_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_376(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_376,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_379,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_scrutinizer_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_379(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_379,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_382,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_driver_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_382(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_385,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_platform_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_385(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_385,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_388,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_backend_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_388(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_388,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_391,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_srfi_69_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_391(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_391,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_395,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[90]))(2,*((C_word*)lf[90]+1),t2);}
+
+/* k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_395(C_word c,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_395,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_398,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_1297,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1299,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1299(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_1299,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1306,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[83]);}
+
+/* k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1306(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_1306,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1309,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)C_i_pairp(((C_word*)t0)[4]))){
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=t2;
+f_1309(t4,(C_word)C_i_stringp(t3));}
+else{
+t3=t2;
+f_1309(t3,C_SCHEME_FALSE);}}
+
+/* k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1309(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_1309,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1312,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_1312(t4,C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+t5=t2;
+f_1312(t5,(C_word)C_i_symbolp(t4));}
+else{
+t4=t2;
+f_1312(t4,C_SCHEME_FALSE);}}}
+
+/* k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1312(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_1312,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1318,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[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[82]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1417,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[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[88]);}
+else{
+C_trace("##sys#check-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[45]))(5,*((C_word*)lf[45]+1),t2,lf[81],((C_word*)t0)[5],lf[89]);}}}
+
+/* k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1417(C_word c,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_1417,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[5])?(C_word)C_i_cadr(((C_word*)t0)[4]):(C_word)C_i_car(((C_word*)t0)[4]));
+t3=(C_word)C_i_cdr(t2);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1430,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[87]);}
+
+/* k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1430(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_1430,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[7]);
+t3=(C_word)C_i_car(((C_word*)t0)[7]);
+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[83],t4);
+t6=(C_truep(((C_word*)t0)[6])?(C_word)C_i_car(((C_word*)t0)[5]):lf[84]);
+t7=(C_truep(((C_word*)t0)[6])?(C_word)C_i_caddr(((C_word*)t0)[5]):(C_word)C_i_cadr(((C_word*)t0)[5]));
+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[83],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_1560,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_1562,a[2]=t11,a[3]=t16,a[4]=t13,tmp=(C_word)a,a+=5,tmp));
+t18=((C_word*)t16)[1];
+f_1562(t18,t14,((C_word*)t0)[3]);}
+
+/* loop75 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1562(C_word t0,C_word 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_1562,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));
+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_word)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);}}
+
+/* k1558 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1560(C_word c,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_1560,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[83],t2);
+t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_1490,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[86]);}
+
+/* k1488 in k1558 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1490(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_1490,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_1498,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_1514,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_1514(t10,t6,((C_word*)t0)[2]);}
+
+/* loop99 in k1488 in k1558 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1514(C_word t0,C_word 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_1514,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_cadr(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));
+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_word)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);}}
+
+/* k1496 in k1488 in k1558 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1498(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_1498,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1502,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_word)C_i_cdddr(((C_word*)t0)[2]):(C_word)C_i_cddr(((C_word*)t0)[2]));
+C_trace("##sys#append");
+t4=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k1500 in k1496 in k1488 in k1558 in k1428 in k1415 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1502(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_1502,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,((C_word*)t0)[9],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,((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,lf[85],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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t11));}
+
+/* k1316 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1318(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_1318,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1328,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);
+C_trace("r37");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[53]);}
+
+/* k1326 in k1316 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1402,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("r37");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[52]);}
+
+/* k1400 in k1326 in k1316 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1402(C_word c,C_word t0,C_word 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_1402,2,t0,t1);}
+t2=(C_word)C_i_cadr(((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_word*)t0)[5],t3);
+t5=(C_word)C_a_i_cons(&a,2,t1,t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1382,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);
+C_trace("r37");
+t7=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[77]);}
+
+/* k1380 in k1400 in k1326 in k1316 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1382(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_1382,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[6]);
+t3=(C_word)C_a_i_cons(&a,2,C_SCHEME_TRUE,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)[5],t4);
+t6=(C_word)C_a_i_cons(&a,2,t1,t5);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1348,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t6,tmp=(C_word)a,a+=6,tmp);
+t8=(C_word)C_i_cddr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_pairp(t8))){
+t9=(C_word)C_i_caddr(((C_word*)t0)[6]);
+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)[5],t10);
+t12=(C_word)C_a_i_cons(&a,2,lf[76],t11);
+t13=(C_word)C_a_i_cons(&a,2,t12,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t14=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t7,t13,C_SCHEME_END_OF_LIST);}
+else{
+C_trace("##sys#append");
+t9=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t7,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
+
+/* k1346 in k1380 in k1400 in k1326 in k1316 in k1310 in k1307 in k1304 in a1298 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1348(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_1348,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k1295 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1297(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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[81],C_SCHEME_END_OF_LIST,t1);}
+
+/* k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_398(C_word c,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_398,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_401,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_1156,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_1158,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1158(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_1158,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1162,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[45]))(5,*((C_word*)lf[45]+1),t5,lf[75],t2,lf[80]);}
+
+/* k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1162(C_word c,C_word t0,C_word 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_1162,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|5,a[1]=(C_word)f_1174,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_word)C_i_nullp(t4))){
+t6=t5;
+f_1174(2,t6,C_SCHEME_FALSE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=t5;
+f_1174(2,t7,(C_word)C_i_car(t4));}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[78]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[79],t4);}}}
+
+/* k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1174(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_1174,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1177,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_1274,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[54]))(2,*((C_word*)lf[54]+1),t3);}
+
+/* k1272 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1274(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);}
+
+/* k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1177(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_1177,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_1184,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("r123");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[53]);}
+
+/* k1182 in k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1184(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_1184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1254,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);
+C_trace("r123");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[52]);}
+
+/* k1252 in k1182 in k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1254(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_1254,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1270,a[2]=((C_word*)t0)[2],a[3]=((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);
+C_trace("symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[49]+1)))(3,*((C_word*)lf[49]+1),t2,((C_word*)t0)[6]);}
+
+/* k1268 in k1252 in k1182 in k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1270(C_word c,C_word t0,C_word 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_1270,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)[9],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t3);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t4);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1234,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t5,a[6]=((C_word*)t0)[8],a[7]=((C_word*)t0)[9],a[8]=((C_word*)t0)[6],tmp=(C_word)a,a+=9,tmp);
+C_trace("r123");
+t7=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[77]);}
+
+/* k1232 in k1268 in k1252 in k1182 in k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1234(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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[33],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1234,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_SCHEME_FALSE,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],t4);
+t6=(C_word)C_a_i_cons(&a,2,t1,t5);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1204,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);
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[2]))){
+t8=(C_word)C_i_car(((C_word*)t0)[2]);
+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)[6],t9);
+t11=(C_word)C_a_i_cons(&a,2,lf[76],t10);
+t12=(C_word)C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t13=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t13+1)))(4,t13,t7,t12,C_SCHEME_END_OF_LIST);}
+else{
+C_trace("##sys#append");
+t8=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t7,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
+
+/* k1202 in k1232 in k1268 in k1252 in k1182 in k1175 in k1172 in k1160 in a1157 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1204,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*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t3));}
+
+/* k1154 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1156(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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[75],C_SCHEME_END_OF_LIST,t1);}
+
+/* k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_401(C_word c,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_401,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_404,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[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 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_974,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_978,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[45]))(5,*((C_word*)lf[45]+1),t5,lf[69],t2,lf[74]);}
+
+/* k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_978(C_word c,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_978,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|5,a[1]=(C_word)f_987,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[73]);}
+
+/* k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_987(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_987,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_990,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_1110,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_1110(t10,t6,((C_word*)t0)[4]);}
+
+/* loop153 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1110(C_word t0,C_word 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_1110,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_1137,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1148,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));
+C_trace("g169170");
+t6=t3;
+f_1137(t6,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k1146 in loop153 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 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_1148,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));
+C_trace("loop153166");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_1110(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));
+C_trace("loop153166");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_1110(t6,((C_word*)t0)[3],t5);}}
+
+/* g169 in loop153 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_1137(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_1137,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1145,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[54]))(2,*((C_word*)lf[54]+1),t2);}
+
+/* k1143 in g169 in loop153 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1145(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);}
+
+/* k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_990(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_990,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1001,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_1086,tmp=(C_word)a,a+=2,tmp);
+C_trace("append-map");
+((C_proc5)C_retrieve_symbol_proc(lf[72]))(5,*((C_word*)lf[72]+1),t2,t3,((C_word*)t0)[3],t1);}
+
+/* a1085 in k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1086(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_1086,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cddr(t2);
+if(C_truep((C_word)C_i_pairp(t4))){
+t5=(C_word)C_i_cddr(t2);
+t6=(C_word)C_a_i_cons(&a,2,t3,t5);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_list(&a,1,t6));}
+else{
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_END_OF_LIST);}}
+
+/* k999 in k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1001(C_word c,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_1001,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1009,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_1011,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1084,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[44]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k1082 in k999 in k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1084(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_1084,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,((C_word*)t0)[6],t2);
+C_trace("fold-right");
+((C_proc6)C_retrieve_symbol_proc(lf[71]))(6,*((C_word*)lf[71]+1),((C_word*)t0)[5],((C_word*)t0)[4],t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a1010 in k999 in k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1011(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_1011,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_length(t2);
+t6=(C_word)C_eqp(C_fix(3),t5);
+if(C_truep(t6)){
+t7=(C_word)C_i_car(t2);
+t8=(C_word)C_i_cadr(t2);
+t9=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,t3,t9);
+t11=(C_word)C_a_i_cons(&a,2,t8,t10);
+t12=(C_word)C_a_i_cons(&a,2,t7,t11);
+t13=t1;
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,(C_word)C_a_i_cons(&a,2,lf[70],t12));}
+else{
+t7=(C_word)C_i_car(t2);
+t8=(C_word)C_i_cadr(t2);
+t9=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+t10=(C_word)C_a_i_cons(&a,2,t8,t9);
+t11=(C_word)C_a_i_cons(&a,2,t7,t10);
+t12=t1;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)C_a_i_cons(&a,2,lf[70],t11));}}
+
+/* k1007 in k999 in k988 in k985 in k976 in a973 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_1009(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_1009,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));}
+
+/* k970 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[69],C_SCHEME_END_OF_LIST,t1);}
+
+/* k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_404(C_word c,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_404,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_407,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_886,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_888,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_888(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_888,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_892,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[45]))(5,*((C_word*)lf[45]+1),t5,lf[57],t2,lf[68]);}
+
+/* k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_892,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_895,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[54]))(3,*((C_word*)lf[54]+1),t2,lf[55]);}
+
+/* k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_895,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,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]=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[53]);}
+
+/* k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[6],*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_926,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[67]);}
+
+/* k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_926(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_926,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_942,a[2]=((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[66]))(2,*((C_word*)lf[66]+1),t2);}
+
+/* k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_942,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_945,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[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[65],t1);}
+
+/* k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_945,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,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],tmp=(C_word)a,a+=8,tmp);
+C_trace("display");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t2,((C_word*)t0)[6],((C_word*)t0)[3]);}
+
+/* k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_948,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_951,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[64],((C_word*)t0)[3]);}
+
+/* k949 in k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_951(C_word c,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_951,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_954,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_964,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("string-intersperse");
+((C_proc4)C_retrieve_symbol_proc(lf[62]))(4,*((C_word*)lf[62]+1),t3,t4,lf[63]);}
+
+/* k962 in k949 in k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_964(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[60]+1)))(4,*((C_word*)lf[60]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k952 in k949 in k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_954(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_954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_957,a[2]=((C_word*)t0)[2],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[60]+1)))(4,*((C_word*)lf[60]+1),t2,lf[61],((C_word*)t0)[2]);}
+
+/* k955 in k952 in k949 in k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_957(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_957,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_960,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[59]))(3,*((C_word*)lf[59]+1),t2,((C_word*)t0)[2]);}
+
+/* k958 in k955 in k952 in k949 in k946 in k943 in k940 in k924 in k900 in k893 in k890 in a887 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_960(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_960,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[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*)t0)[5],t4);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,lf[58],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_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t9));}
+
+/* k884 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_886(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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[57],C_SCHEME_END_OF_LIST,t1);}
+
+/* k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_407(C_word c,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_407,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_410,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_812,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_814,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_814(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_814,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_818,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[45]))(5,*((C_word*)lf[45]+1),t5,lf[48],t2,lf[56]);}
+
+/* k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_818(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_818,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_821,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[54]))(3,*((C_word*)lf[54]+1),t2,lf[55]);}
+
+/* k819 in k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_821(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_821,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_831,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],a[5]=t1,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+C_trace("r217");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[53]);}
+
+/* k829 in k819 in k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_831(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_831,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_847,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);
+C_trace("r217");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[52]);}
+
+/* k845 in k829 in k819 in k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_847(C_word c,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_847,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_863,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=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_867,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_stringp(((C_word*)t0)[2]))){
+t5=t3;
+f_863(t5,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
+else{
+if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[2]))){
+C_trace("symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[49]+1)))(3,*((C_word*)lf[49]+1),t4,((C_word*)t0)[2]);}
+else{
+C_trace("syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[50]))(5,*((C_word*)lf[50]+1),t4,lf[48],lf[51],((C_word*)t0)[2]);}}}
+
+/* k865 in k845 in k829 in k819 in k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_867(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_867,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_863(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
+
+/* k861 in k845 in k829 in k819 in k816 in a813 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_863(C_word t0,C_word 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_863,NULL,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_cons(&a,2,((C_word*)t0)[4],t3);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,t4,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));}
+
+/* k810 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_812(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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[48],C_SCHEME_END_OF_LIST,t1);}
+
+/* k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_410(C_word c,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_410,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_413,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_783,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_785,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t3,t4);}
+
+/* a784 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_785(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_785,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_789,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[45]))(5,*((C_word*)lf[45]+1),t5,lf[42],t2,lf[46]);}
+
+/* k787 in a784 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_789(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_789,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_804,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("##sys#append");
+t4=*((C_word*)lf[44]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k802 in k787 in a784 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_804(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_804,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[42],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[43],t3));}
+
+/* k781 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_783(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[41]))(5,*((C_word*)lf[41]+1),((C_word*)t0)[2],lf[42],C_SCHEME_END_OF_LIST,t1);}
+
+/* k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_413,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_416,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[40]))(3,*((C_word*)lf[40]+1),t2,((C_word*)t0)[2]);}
+
+/* k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_416(C_word c,C_word t0,C_word t1){
+C_word 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_416,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_420,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_754,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_764,tmp=(C_word)a,a+=2,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_772,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_776,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[38]))(3,*((C_word*)lf[38]+1),t7,lf[39]);}
+
+/* k774 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_776(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[36]))(3,*((C_word*)lf[36]+1),((C_word*)t0)[2],t2);}
+else{
+C_trace("chicken.scm: 48 string-split");
+((C_proc3)C_retrieve_symbol_proc(lf[36]))(3,*((C_word*)lf[36]+1),((C_word*)t0)[2],lf[37]);}}
+
+/* k770 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_772(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[35]))(4,*((C_word*)lf[35]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a763 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_764(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_764,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_string_equal_p(t2,lf[34]));}
+
+/* k752 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_754(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_754,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_762,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[33]))(2,*((C_word*)lf[33]+1),t2);}
+
+/* k760 in k752 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_762(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(t1);
+C_trace("chicken.scm: 45 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[32]+1)))(4,*((C_word*)lf[32]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_420(C_word c,C_word t0,C_word 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_420,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_422,tmp=(C_word)a,a+=2,tmp));
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_529,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_537,tmp=(C_word)a,a+=2,tmp);
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_549,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#call-with-values");
+C_call_with_values(4,0,t4,t5,t6);}
+
+/* a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_549(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_549,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_553,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_561,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
+t9=((C_word*)t7)[1];
+f_561(t9,t5,((C_word*)t4)[1]);}
+
+/* loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_561(C_word t0,C_word 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_561,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cdr(t2);
+t5=(C_word)C_eqp(lf[10],t3);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_583,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_word)C_i_car(t4);
+C_trace("chicken.scm: 82 string->number");
+C_string_to_number(3,0,t6,t7);}
+else{
+t6=(C_word)C_eqp(lf[21],t3);
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_659,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_word)C_i_car(t4);
+C_trace("chicken.scm: 105 string->number");
+C_string_to_number(3,0,t7,t8);}
+else{
+if(C_truep((C_word)C_i_memq(t3,C_retrieve(lf[25])))){
+C_trace("chicken.scm: 112 loop");
+t16=t1;
+t17=t4;
+t1=t16;
+t2=t17;
+goto loop;}
+else{
+if(C_truep((C_word)C_i_memq(t3,C_retrieve(lf[26])))){
+if(C_truep((C_word)C_i_pairp(t4))){
+t7=(C_word)C_i_cdr(t4);
+C_trace("chicken.scm: 115 loop");
+t16=t1;
+t17=t7;
+t1=t16;
+t2=t17;
+goto loop;}
+else{
+C_trace("chicken.scm: 116 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[27]))(4,*((C_word*)lf[27]+1),t1,lf[28],t3);}}
+else{
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_737,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_744,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_stringp(t3))){
+C_trace("chicken.scm: 118 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[22]))(5,*((C_word*)lf[22]+1),t7,lf[23],lf[29],t3);}
+else{
+C_trace("chicken.scm: 120 conc");
+((C_proc4)C_retrieve_symbol_proc(lf[30]))(4,*((C_word*)lf[30]+1),t8,lf[31],t3);}}}}}}}
+
+/* k742 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_744(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("chicken.scm: 118 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[22]))(5,*((C_word*)lf[22]+1),((C_word*)t0)[2],lf[23],lf[29],t1);}
+
+/* k735 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_737(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("chicken.scm: 121 loop");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_561(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k657 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_659(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_659,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_662,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_676,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: 107 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[12]))(5,*((C_word*)lf[12]+1),t3,lf[20],lf[17],((C_word*)((C_word*)t0)[2])[1]);
+case C_fix(1):
+t3=(C_word)C_a_i_cons(&a,2,lf[17],((C_word*)((C_word*)t0)[2])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
+t5=(C_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 111 loop");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_561(t6,((C_word*)t0)[3],t5);
+case C_fix(2):
+t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 111 loop");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_561(t4,((C_word*)t0)[3],t3);
+default:
+t3=(C_word)C_i_car(((C_word*)t0)[5]);
+C_trace("chicken.scm: 110 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[22]))(5,*((C_word*)lf[22]+1),t2,lf[23],lf[24],t3);}}
+
+/* k674 in k657 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_676(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_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 111 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_561(t4,((C_word*)t0)[2],t3);}
+
+/* k660 in k657 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_662(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]);
+C_trace("chicken.scm: 111 loop");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_561(t3,((C_word*)t0)[2],t2);}
+
+/* k581 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_583(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_583,2,t0,t1);}
+switch(t1){
+case C_fix(0):
+t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 103 loop");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_561(t3,((C_word*)t0)[3],t2);
+case C_fix(1):
+t2=(C_word)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_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 103 loop");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_561(t5,((C_word*)t0)[3],t4);
+case C_fix(2):
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_616,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: 89 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_626,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: 92 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_636,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: 95 cons*");
+((C_proc7)C_retrieve_symbol_proc(lf[12]))(7,*((C_word*)lf[12]+1),t2,lf[11],lf[13],lf[14],lf[15],((C_word*)((C_word*)t0)[2])[1]);
+default:
+t2=t1;
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,C_fix(5)))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_646,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: 99 cons*");
+((C_proc11)C_retrieve_symbol_proc(lf[12]))(11,*((C_word*)lf[12]+1),t3,lf[16],lf[17],lf[15],lf[18],lf[11],lf[19],lf[20],lf[13],((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t3=(C_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("chicken.scm: 103 loop");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_561(t4,((C_word*)t0)[3],t3);}}}
+
+/* k644 in k581 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_646(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_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 103 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_561(t4,((C_word*)t0)[2],t3);}
+
+/* k634 in k581 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_636(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_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 103 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_561(t4,((C_word*)t0)[2],t3);}
+
+/* k624 in k581 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_626(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_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 103 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_561(t4,((C_word*)t0)[2],t3);}
+
+/* k614 in k581 in loop in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_616(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_cdr(((C_word*)t0)[4]);
+C_trace("chicken.scm: 103 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_561(t4,((C_word*)t0)[2],t3);}
+
+/* k551 in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_553(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_553,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_556,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]);}
+
+/* k554 in k551 in a548 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_556(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("chicken.scm: 123 exit");
+((C_proc2)C_retrieve_symbol_proc(lf[8]))(2,*((C_word*)lf[8]+1),((C_word*)t0)[2]);}
+
+/* a536 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_537(C_word 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_537,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_541,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);}
+
+/* k539 in a536 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_541(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("g269270");
+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("g269270");
+t3=t2;
+((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_retrieve(lf[1]));}}
+
+/* k527 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_529(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_529,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_532,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_535,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);}
+
+/* k533 in k527 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_535(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]);}
+
+/* k530 in k527 in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_532(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 k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_422(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_422,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_428,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_428(t6,t1,t2,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* loop in ##compiler#process-command-line in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_428(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_428,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_442,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_word)C_i_car(t2);
+t6=(C_word)C_i_string_length(t5);
+t7=(C_word)C_i_string_ref(t5,C_fix(0));
+t8=(C_word)C_eqp(C_make_character(45),t7);
+t9=(C_truep(t8)?(C_word)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_463,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_word)C_fixnum_greaterp(t6,C_fix(1)))){
+t11=(C_word)C_i_string_ref(t5,C_fix(1));
+t12=t10;
+f_463(t12,(C_word)C_eqp(C_make_character(58),t11));}
+else{
+t11=t10;
+f_463(t11,C_SCHEME_FALSE);}}
+else{
+if(C_truep(t4)){
+t10=(C_word)C_i_cdr(t2);
+t11=(C_word)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_word)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;}}}}
+
+/* k461 in loop in ##compiler#process-command-line in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_fcall f_463(C_word t0,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_463,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[8]);
+C_trace("chicken.scm: 67 loop");
+t3=((C_word*)((C_word*)t0)[7])[1];
+f_428(t3,((C_word*)t0)[6],t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_485,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_489,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]);}}
+
+/* k487 in k461 in loop in ##compiler#process-command-line in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_489(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);}
+
+/* k483 in k461 in loop in ##compiler#process-command-line in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_485,2,t0,t1);}
+t2=(C_word)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_428(t3,((C_word*)t0)[4],((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* k440 in loop in ##compiler#process-command-line in k418 in k414 in k411 in k408 in k405 in k402 in k399 in k396 in k393 in k389 in k386 in k383 in k380 in k377 in k374 in k371 in k368 in k365 in k362 in k359 in k356 in k353 in k350 in k347 in k344 in k341 in k338 */
+static void C_ccall f_442(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[128] = {
+{"toplevel:chicken_scm",(void*)C_toplevel},
+{"f_340:chicken_scm",(void*)f_340},
+{"f_343:chicken_scm",(void*)f_343},
+{"f_346:chicken_scm",(void*)f_346},
+{"f_349:chicken_scm",(void*)f_349},
+{"f_352:chicken_scm",(void*)f_352},
+{"f_355:chicken_scm",(void*)f_355},
+{"f_358:chicken_scm",(void*)f_358},
+{"f_361:chicken_scm",(void*)f_361},
+{"f_364:chicken_scm",(void*)f_364},
+{"f_367:chicken_scm",(void*)f_367},
+{"f_370:chicken_scm",(void*)f_370},
+{"f_373:chicken_scm",(void*)f_373},
+{"f_376:chicken_scm",(void*)f_376},
+{"f_379:chicken_scm",(void*)f_379},
+{"f_382:chicken_scm",(void*)f_382},
+{"f_385:chicken_scm",(void*)f_385},
+{"f_388:chicken_scm",(void*)f_388},
+{"f_391:chicken_scm",(void*)f_391},
+{"f_395:chicken_scm",(void*)f_395},
+{"f_1299:chicken_scm",(void*)f_1299},
+{"f_1306:chicken_scm",(void*)f_1306},
+{"f_1309:chicken_scm",(void*)f_1309},
+{"f_1312:chicken_scm",(void*)f_1312},
+{"f_1417:chicken_scm",(void*)f_1417},
+{"f_1430:chicken_scm",(void*)f_1430},
+{"f_1562:chicken_scm",(void*)f_1562},
+{"f_1560:chicken_scm",(void*)f_1560},
+{"f_1490:chicken_scm",(void*)f_1490},
+{"f_1514:chicken_scm",(void*)f_1514},
+{"f_1498:chicken_scm",(void*)f_1498},
+{"f_1502:chicken_scm",(void*)f_1502},
+{"f_1318:chicken_scm",(void*)f_1318},
+{"f_1328:chicken_scm",(void*)f_1328},
+{"f_1402:chicken_scm",(void*)f_1402},
+{"f_1382:chicken_scm",(void*)f_1382},
+{"f_1348:chicken_scm",(void*)f_1348},
+{"f_1297:chicken_scm",(void*)f_1297},
+{"f_398:chicken_scm",(void*)f_398},
+{"f_1158:chicken_scm",(void*)f_1158},
+{"f_1162:chicken_scm",(void*)f_1162},
+{"f_1174:chicken_scm",(void*)f_1174},
+{"f_1274:chicken_scm",(void*)f_1274},
+{"f_1177:chicken_scm",(void*)f_1177},
+{"f_1184:chicken_scm",(void*)f_1184},
+{"f_1254:chicken_scm",(void*)f_1254},
+{"f_1270:chicken_scm",(void*)f_1270},
+{"f_1234:chicken_scm",(void*)f_1234},
+{"f_1204:chicken_scm",(void*)f_1204},
+{"f_1156:chicken_scm",(void*)f_1156},
+{"f_401:chicken_scm",(void*)f_401},
+{"f_974:chicken_scm",(void*)f_974},
+{"f_978:chicken_scm",(void*)f_978},
+{"f_987:chicken_scm",(void*)f_987},
+{"f_1110:chicken_scm",(void*)f_1110},
+{"f_1148:chicken_scm",(void*)f_1148},
+{"f_1137:chicken_scm",(void*)f_1137},
+{"f_1145:chicken_scm",(void*)f_1145},
+{"f_990:chicken_scm",(void*)f_990},
+{"f_1086:chicken_scm",(void*)f_1086},
+{"f_1001:chicken_scm",(void*)f_1001},
+{"f_1084:chicken_scm",(void*)f_1084},
+{"f_1011:chicken_scm",(void*)f_1011},
+{"f_1009:chicken_scm",(void*)f_1009},
+{"f_972:chicken_scm",(void*)f_972},
+{"f_404:chicken_scm",(void*)f_404},
+{"f_888:chicken_scm",(void*)f_888},
+{"f_892:chicken_scm",(void*)f_892},
+{"f_895:chicken_scm",(void*)f_895},
+{"f_902:chicken_scm",(void*)f_902},
+{"f_926:chicken_scm",(void*)f_926},
+{"f_942:chicken_scm",(void*)f_942},
+{"f_945:chicken_scm",(void*)f_945},
+{"f_948:chicken_scm",(void*)f_948},
+{"f_951:chicken_scm",(void*)f_951},
+{"f_964:chicken_scm",(void*)f_964},
+{"f_954:chicken_scm",(void*)f_954},
+{"f_957:chicken_scm",(void*)f_957},
+{"f_960:chicken_scm",(void*)f_960},
+{"f_886:chicken_scm",(void*)f_886},
+{"f_407:chicken_scm",(void*)f_407},
+{"f_814:chicken_scm",(void*)f_814},
+{"f_818:chicken_scm",(void*)f_818},
+{"f_821:chicken_scm",(void*)f_821},
+{"f_831:chicken_scm",(void*)f_831},
+{"f_847:chicken_scm",(void*)f_847},
+{"f_867:chicken_scm",(void*)f_867},
+{"f_863:chicken_scm",(void*)f_863},
+{"f_812:chicken_scm",(void*)f_812},
+{"f_410:chicken_scm",(void*)f_410},
+{"f_785:chicken_scm",(void*)f_785},
+{"f_789:chicken_scm",(void*)f_789},
+{"f_804:chicken_scm",(void*)f_804},
+{"f_783:chicken_scm",(void*)f_783},
+{"f_413:chicken_scm",(void*)f_413},
+{"f_416:chicken_scm",(void*)f_416},
+{"f_776:chicken_scm",(void*)f_776},
+{"f_772:chicken_scm",(void*)f_772},
+{"f_764:chicken_scm",(void*)f_764},
+{"f_754:chicken_scm",(void*)f_754},
+{"f_762:chicken_scm",(void*)f_762},
+{"f_420:chicken_scm",(void*)f_420},
+{"f_549:chicken_scm",(void*)f_549},
+{"f_561:chicken_scm",(void*)f_561},
+{"f_744:chicken_scm",(void*)f_744},
+{"f_737:chicken_scm",(void*)f_737},
+{"f_659:chicken_scm",(void*)f_659},
+{"f_676:chicken_scm",(void*)f_676},
+{"f_662:chicken_scm",(void*)f_662},
+{"f_583:chicken_scm",(void*)f_583},
+{"f_646:chicken_scm",(void*)f_646},
+{"f_636:chicken_scm",(void*)f_636},
+{"f_626:chicken_scm",(void*)f_626},
+{"f_616:chicken_scm",(void*)f_616},
+{"f_553:chicken_scm",(void*)f_553},
+{"f_556:chicken_scm",(void*)f_556},
+{"f_537:chicken_scm",(void*)f_537},
+{"f_541:chicken_scm",(void*)f_541},
+{"f_529:chicken_scm",(void*)f_529},
+{"f_535:chicken_scm",(void*)f_535},
+{"f_532:chicken_scm",(void*)f_532},
+{"f_422:chicken_scm",(void*)f_422},
+{"f_428:chicken_scm",(void*)f_428},
+{"f_463:chicken_scm",(void*)f_463},
+{"f_489:chicken_scm",(void*)f_489},
+{"f_485:chicken_scm",(void*)f_485},
+{"f_442:chicken_scm",(void*)f_442},
+{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
new file mode 100644
index 00000000..126e728f
--- /dev/null
+++ b/bootstrap/compiler-syntax.c
@@ -0,0 +1,4075 @@
+/* Generated from compiler-syntax.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:30
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: compiler-syntax.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-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);
+C_trace("##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);
+C_trace("##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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("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);
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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;
+C_trace("##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));
+C_trace("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));
+C_trace("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;
+C_trace("##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));
+C_trace("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));
+C_trace("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;
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("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);
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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));
+C_trace("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;
+C_trace("##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));
+C_trace("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));
+C_trace("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;
+C_trace("##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));
+C_trace("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));
+C_trace("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;
+C_trace("##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);
+C_trace("##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);
+C_trace("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);
+C_trace("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]);
+C_trace("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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("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]);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("##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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("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);
+C_trace("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{
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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{
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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{
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("##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);
+C_trace("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);
+C_trace("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);
+C_trace("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]))){
+C_trace("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);
+C_trace("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);
+C_trace("open-output-string");
+((C_proc2)C_retrieve_symbol_proc(lf[19]))(2,*((C_word*)lf[19]+1),t4);}
+else{
+C_trace("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);
+C_trace("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);
+C_trace("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;
+C_trace("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;
+C_trace("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])){
+C_trace("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{
+C_trace("##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);
+C_trace("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));
+C_trace("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);}
+C_trace("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);
+C_trace("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);
+C_trace("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
new file mode 100644
index 00000000..bacde3c5
--- /dev/null
+++ b/bootstrap/compiler.c
@@ -0,0 +1,27263 @@
+/* Generated from compiler.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:29
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[684];
+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_5137)
+static void C_ccall f_5137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5140)
+static void C_ccall f_5140(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_19181)
+static void C_ccall f_19181(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19184)
+static void C_ccall f_19184(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_19190)
+static void C_ccall f_19190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19193)
+static void C_ccall f_19193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19096)
+static void C_fcall f_19096(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19123)
+static void C_ccall f_19123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19064)
+static void C_fcall f_19064(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19080)
+static void C_ccall f_19080(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19087)
+static void C_ccall f_19087(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19094)
+static void C_ccall f_19094(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_19078)
+static void C_ccall f_19078(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19050)
+static void C_fcall f_19050(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_18970)
+static void C_fcall f_18970(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18977)
+static void C_ccall f_18977(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19039)
+static void C_ccall f_19039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19029)
+static void C_ccall f_19029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19003)
+static void C_ccall f_19003(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18989)
+static void C_ccall f_18989(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_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_18930)
+static void C_fcall f_18930(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18964)
+static void C_ccall f_18964(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18957)
+static void C_fcall f_18957(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17838)
+static void C_fcall f_17838(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_18913)
+static void C_ccall f_18913(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18804)
+static void C_ccall f_18804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18830)
+static void C_fcall f_18830(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18863)
+static void C_ccall f_18863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18866)
+static void C_ccall f_18866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18885)
+static void C_ccall f_18885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18873)
+static void C_ccall f_18873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18841)
+static void C_ccall f_18841(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18852)
+static void C_ccall f_18852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18820)
+static void C_ccall f_18820(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18749)
+static void C_ccall f_18749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18752)
+static void C_ccall f_18752(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18755)
+static void C_ccall f_18755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18775)
+static void C_ccall f_18775(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18737)
+static void C_ccall f_18737(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18638)
+static void C_fcall f_18638(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18708)
+static void C_ccall f_18708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18727)
+static void C_ccall f_18727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18702)
+static void C_ccall f_18702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18686)
+static void C_ccall f_18686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18659)
+static void C_fcall f_18659(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18662)
+static void C_ccall f_18662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18604)
+static void C_fcall f_18604(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_18555)
+static void C_ccall f_18555(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18573)
+static void C_fcall f_18573(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18558)
+static void C_fcall f_18558(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18570)
+static void C_ccall f_18570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18397)
+static void C_ccall f_18397(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_noret;
+C_noret_decl(f_18520)
+static void C_ccall f_18520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18436)
+static void C_fcall f_18436(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18516)
+static void C_ccall f_18516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18442)
+static void C_ccall f_18442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18448)
+static void C_fcall f_18448(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18480)
+static void C_ccall f_18480(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18472)
+static void C_ccall f_18472(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_word t2) C_noret;
+C_noret_decl(f_18422)
+static void C_ccall f_18422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18351)
+static void C_ccall f_18351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18363)
+static void C_ccall f_18363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18367)
+static void C_ccall f_18367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18355)
+static void C_ccall f_18355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18154)
+static void C_ccall f_18154(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18281)
+static void C_ccall f_18281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18287)
+static void C_ccall f_18287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18312)
+static void C_ccall f_18312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18161)
+static void C_ccall f_18161(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18272)
+static void C_ccall f_18272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18164)
+static void C_ccall f_18164(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18167)
+static void C_ccall f_18167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18170)
+static void C_ccall f_18170(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18214)
+static void C_ccall f_18214(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18240)
+static void C_ccall f_18240(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18221)
+static void C_fcall f_18221(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_18198)
+static void C_ccall f_18198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18082)
+static void C_ccall f_18082(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18097)
+static void C_fcall f_18097(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18066)
+static void C_ccall f_18066(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18036)
+static void C_ccall f_18036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18010)
+static void C_ccall f_18010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18006)
+static void C_ccall f_18006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18002)
+static void C_ccall f_18002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17976)
+static void C_ccall f_17976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17972)
+static void C_ccall f_17972(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_noret;
+C_noret_decl(f_17920)
+static void C_ccall f_17920(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17765)
+static void C_fcall f_17765(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17825)
+static void C_ccall f_17825(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17769)
+static void C_ccall f_17769(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17804)
+static void C_ccall f_17804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17811)
+static void C_ccall f_17811(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17772)
+static void C_fcall f_17772(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17775)
+static void C_fcall f_17775(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17791)
+static void C_ccall f_17791(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17714)
+static void C_fcall f_17714(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17718)
+static void C_ccall f_17718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17744)
+static void C_ccall f_17744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17760)
+static void C_ccall f_17760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17702)
+static void C_ccall f_17702(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17693)
+static void C_ccall f_17693(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17684)
+static void C_ccall f_17684(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17675)
+static void C_ccall f_17675(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17666)
+static void C_ccall f_17666(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17657)
+static void C_ccall f_17657(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17648)
+static void C_ccall f_17648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17639)
+static void C_ccall f_17639(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17630)
+static void C_ccall f_17630(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17621)
+static void C_ccall f_17621(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17612)
+static void C_ccall f_17612(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17603)
+static void C_ccall f_17603(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17594)
+static void C_ccall f_17594(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17585)
+static void C_ccall f_17585(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17576)
+static void C_ccall f_17576(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17570)
+static void C_ccall f_17570(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17564)
+static void C_ccall f_17564(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_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_noret;
+C_noret_decl(f_17531)
+static void C_ccall f_17531(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17534)
+static void C_ccall f_17534(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17537)
+static void C_ccall f_17537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17540)
+static void C_ccall f_17540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17543)
+static void C_ccall f_17543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17558)
+static void C_ccall f_17558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17556)
+static void C_ccall f_17556(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17546)
+static void C_ccall f_17546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17340)
+static void C_fcall f_17340(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17347)
+static void C_ccall f_17347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17351)
+static void C_fcall f_17351(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17372)
+static void C_ccall f_17372(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17294)
+static void C_fcall f_17294(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17300)
+static void C_fcall f_17300(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17334)
+static void C_ccall f_17334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17327)
+static void C_fcall f_17327(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16269)
+static void C_fcall f_16269(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16303)
+static void C_fcall f_16303(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16342)
+static void C_fcall f_16342(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17180)
+static void C_ccall f_17180(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_16965)
+static void C_ccall f_16965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16971)
+static void C_ccall f_16971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17068)
+static void C_ccall f_17068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17112)
+static void C_ccall f_17112(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17088)
+static void C_ccall f_17088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17092)
+static void C_ccall f_17092(C_word c,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_16982)
+static void C_ccall f_16982(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17051)
+static void C_ccall f_17051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17055)
+static void C_ccall f_17055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17023)
+static void C_ccall f_17023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17011)
+static void C_ccall f_17011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16476)
+static void C_ccall f_16476(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16938)
+static void C_ccall f_16938(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16480)
+static void C_ccall f_16480(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16903)
+static void C_fcall f_16903(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16932)
+static void C_ccall f_16932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16852)
+static void C_ccall f_16852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16854)
+static void C_fcall f_16854(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16887)
+static void C_ccall f_16887(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16867)
+static void C_fcall f_16867(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16483)
+static void C_ccall f_16483(C_word c,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_16492)
+static void C_ccall f_16492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16498)
+static void C_ccall f_16498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16504)
+static void C_fcall f_16504(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16819)
+static void C_ccall f_16819(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16822)
+static void C_ccall f_16822(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16507)
+static void C_ccall f_16507(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_16788)
+static C_word C_fcall f_16788(C_word t0,C_word t1);
+C_noret_decl(f_16746)
+static void C_ccall f_16746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16742)
+static void C_ccall f_16742(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_noret;
+C_noret_decl(f_16661)
+static void C_ccall f_16661(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16667)
+static void C_fcall f_16667(C_word t0,C_word t1,C_word t2) 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_16665)
+static void C_ccall f_16665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16640)
+static void C_ccall f_16640(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_16632)
+static void C_ccall f_16632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16625)
+static void C_fcall f_16625(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16575)
+static void C_fcall f_16575(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16613)
+static void C_ccall f_16613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16602)
+static void C_fcall f_16602(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16610)
+static void C_ccall f_16610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16536)
+static void C_ccall f_16536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16566)
+static void C_ccall f_16566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16558)
+static void C_ccall f_16558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16554)
+static void C_ccall f_16554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16550)
+static void C_ccall f_16550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16539)
+static void C_ccall f_16539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16375)
+static void C_ccall f_16375(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16378)
+static void C_ccall f_16378(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16459)
+static void C_ccall f_16459(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16401)
+static void C_ccall f_16401(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_16431)
+static void C_ccall f_16431(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_16315)
+static void C_ccall f_16315(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_15834)
+static void C_fcall f_15834(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15868)
+static void C_fcall f_15868(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16211)
+static void C_fcall f_16211(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16226)
+static void C_ccall f_16226(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16219)
+static void C_fcall f_16219(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16172)
+static void C_ccall f_16172(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17396)
+static void C_fcall f_17396(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17449)
+static void C_fcall f_17449(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17480)
+static void C_fcall f_17480(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17490)
+static void C_ccall f_17490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17475)
+static void C_ccall f_17475(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17440)
+static void C_ccall f_17440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17394)
+static void C_ccall f_17394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16185)
+static void C_ccall f_16185(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16188)
+static void C_ccall f_16188(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16199)
+static void C_ccall f_16199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16126)
+static void C_ccall f_16126(C_word c,C_word t0,C_word t1) 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_16014)
+static void C_fcall f_16014(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16031)
+static void C_ccall f_16031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16034)
+static void C_ccall f_16034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16037)
+static void C_fcall f_16037(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16076)
+static void C_ccall f_16076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16055)
+static void C_fcall f_16055(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16062)
+static void C_ccall f_16062(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16040)
+static void C_ccall f_16040(C_word c,C_word t0,C_word t1) 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_16046)
+static void C_ccall f_16046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15953)
+static void C_ccall f_15953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15958)
+static void C_fcall f_15958(C_word t0,C_word t1,C_word t2) 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_15966)
+static void C_fcall f_15966(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15889)
+static void C_ccall f_15889(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15906)
+static void C_fcall f_15906(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15921)
+static void C_ccall f_15921(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15914)
+static void C_fcall f_15914(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15893)
+static void C_ccall f_15893(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15904)
+static void C_ccall f_15904(C_word c,C_word t0,C_word t1) 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_15823)
+static void C_fcall f_15823(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15832)
+static void C_ccall f_15832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15813)
+static void C_fcall f_15813(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15818)
+static void C_ccall f_15818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15807)
+static void C_fcall f_15807(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13727)
+static void C_ccall f_13727(C_word c,C_word t0,C_word t1,C_word t2) 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_14691)
+static void C_ccall f_14691(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14695)
+static void C_ccall f_14695(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14698)
+static void C_ccall f_14698(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14711)
+static void C_ccall f_14711(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15659)
+static void C_fcall f_15659(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15667)
+static C_word C_fcall f_15667(C_word t0,C_word t1);
+C_noret_decl(f_14715)
+static void C_ccall f_14715(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15637)
+static void C_fcall f_15637(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15610)
+static void C_fcall f_15610(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_noret;
+C_noret_decl(f_15607)
+static void C_ccall f_15607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15552)
+static void C_fcall f_15552(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_15583)
+static void C_ccall f_15583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15561)
+static void C_ccall f_15561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14729)
+static void C_ccall f_14729(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_noret;
+C_noret_decl(f_15474)
+static void C_ccall f_15474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15478)
+static void C_fcall f_15478(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15537)
+static void C_ccall f_15537(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15496)
+static void C_ccall f_15496(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15501)
+static void C_ccall f_15501(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_noret;
+C_noret_decl(f_15454)
+static void C_ccall f_15454(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15420)
+static void C_ccall f_15420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15437)
+static void C_ccall f_15437(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15429)
+static void C_ccall f_15429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15410)
+static void C_ccall f_15410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15371)
+static void C_ccall f_15371(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_15371)
+static void C_ccall f_15371r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_15365)
+static void C_ccall f_15365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15363)
+static void C_ccall f_15363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15355)
+static void C_ccall f_15355(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15323)
+static void C_ccall f_15323(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15329)
+static void C_fcall f_15329(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14735)
+static void C_ccall f_14735(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_noret;
+C_noret_decl(f_15279)
+static void C_ccall f_15279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14738)
+static void C_ccall f_14738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15139)
+static void C_fcall f_15139(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15162)
+static void C_ccall f_15162(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15205)
+static void C_fcall f_15205(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15241)
+static void C_ccall f_15241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15213)
+static void C_fcall f_15213(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15238)
+static void C_ccall f_15238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15234)
+static void C_ccall f_15234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15220)
+static void C_fcall f_15220(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15223)
+static void C_ccall f_15223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15166)
+static void C_ccall f_15166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15172)
+static void C_fcall f_15172(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14741)
+static void C_ccall f_14741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15107)
+static void C_ccall f_15107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15093)
+static void C_fcall f_15093(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15100)
+static void C_ccall f_15100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15081)
+static void C_fcall f_15081(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_noret;
+C_noret_decl(f_14961)
+static void C_ccall f_14961(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15042)
+static void C_ccall f_15042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14967)
+static void C_ccall f_14967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15032)
+static void C_ccall f_15032(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15024)
+static void C_ccall f_15024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15020)
+static void C_ccall f_15020(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15016)
+static void C_ccall f_15016(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14970)
+static void C_fcall f_14970(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14973)
+static void C_ccall f_14973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14747)
+static void C_ccall f_14747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14775)
+static void C_fcall f_14775(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14801)
+static void C_fcall f_14801(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14827)
+static void C_fcall f_14827(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14833)
+static void C_ccall f_14833(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14750)
+static void C_ccall f_14750(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14756)
+static void C_fcall f_14756(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14760)
+static void C_ccall f_14760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14701)
+static void C_ccall f_14701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14705)
+static void C_ccall f_14705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14666)
+static void C_fcall f_14666(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14676)
+static void C_ccall f_14676(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14684)
+static void C_ccall f_14684(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14652)
+static void C_fcall f_14652(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14660)
+static void C_ccall f_14660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14646)
+static void C_fcall f_14646(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14468)
+static void C_fcall f_14468(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_14481)
+static void C_fcall f_14481(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14597)
+static void C_ccall f_14597(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14607)
+static void C_ccall f_14607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14493)
+static void C_fcall f_14493(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14574)
+static void C_ccall f_14574(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14581)
+static void C_ccall f_14581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14538)
+static void C_fcall f_14538(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14541)
+static void C_ccall f_14541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14547)
+static void C_ccall f_14547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14496)
+static void C_ccall f_14496(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14499)
+static void C_ccall f_14499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14434)
+static void C_fcall f_14434(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_14440)
+static void C_fcall f_14440(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14455)
+static void C_ccall f_14455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14448)
+static void C_fcall f_14448(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13740)
+static void C_fcall f_13740(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13777)
+static void C_fcall f_13777(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14390)
+static void C_ccall f_14390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14384)
+static void C_ccall f_14384(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14348)
+static void C_ccall f_14348(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14351)
+static void C_ccall f_14351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14286)
+static void C_ccall f_14286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14340)
+static void C_ccall f_14340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14289)
+static void C_ccall f_14289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14312)
+static void C_ccall f_14312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14292)
+static void C_ccall f_14292(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_14298)
+static void C_ccall f_14298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14146)
+static void C_ccall f_14146(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14265)
+static void C_ccall f_14265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14153)
+static void C_ccall f_14153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14233)
+static void C_fcall f_14233(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14251)
+static void C_ccall f_14251(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14241)
+static void C_fcall f_14241(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14245)
+static void C_ccall f_14245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14156)
+static void C_ccall f_14156(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_14218)
+static void C_ccall f_14218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14162)
+static void C_ccall f_14162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14165)
+static void C_fcall f_14165(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14168)
+static void C_fcall f_14168(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14200)
+static void C_ccall f_14200(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14171)
+static void C_ccall f_14171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14080)
+static void C_ccall f_14080(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14099)
+static void C_fcall f_14099(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14114)
+static void C_ccall f_14114(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14107)
+static void C_fcall f_14107(C_word t0,C_word t1,C_word t2) 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_14097)
+static void C_ccall f_14097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14088)
+static void C_ccall f_14088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14013)
+static void C_ccall f_14013(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14018)
+static void C_fcall f_14018(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14045)
+static void C_ccall f_14045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14048)
+static void C_ccall f_14048(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14051)
+static void C_ccall f_14051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14036)
+static void C_ccall f_14036(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_13976)
+static void C_ccall f_13976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13906)
+static void C_fcall f_13906(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13957)
+static void C_ccall f_13957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13914)
+static void C_fcall f_13914(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13933)
+static void C_ccall f_13933(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13868)
+static void C_ccall f_13868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13871)
+static void C_ccall f_13871(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_13789)
+static void C_ccall f_13789(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_13718)
+static void C_ccall f_13718(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13709)
+static void C_ccall f_13709(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13700)
+static void C_ccall f_13700(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13691)
+static void C_ccall f_13691(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13682)
+static void C_ccall f_13682(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13676)
+static void C_ccall f_13676(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13670)
+static void C_ccall f_13670(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_12811)
+static void C_ccall f_12811(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13632)
+static void C_ccall f_13632(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13540)
+static void C_fcall f_13540(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13546)
+static void C_fcall f_13546(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13566)
+static void C_ccall f_13566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13584)
+static void C_ccall f_13584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13593)
+static void C_ccall f_13593(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13626)
+static void C_ccall f_13626(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13614)
+static void C_ccall f_13614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13560)
+static void C_ccall f_13560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13519)
+static void C_fcall f_13519(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13525)
+static void C_ccall f_13525(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13343)
+static void C_fcall f_13343(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_13347)
+static void C_ccall f_13347(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13350)
+static void C_ccall f_13350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13429)
+static void C_ccall f_13429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13420)
+static void C_ccall f_13420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13416)
+static void C_ccall f_13416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13381)
+static void C_ccall f_13381(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13387)
+static void C_ccall f_13387(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13404)
+static void C_ccall f_13404(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13400)
+static void C_ccall f_13400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13379)
+static void C_ccall f_13379(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12871)
+static void C_fcall f_12871(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12913)
+static void C_fcall f_12913(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13254)
+static void C_fcall f_13254(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13439)
+static void C_ccall f_13439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13442)
+static void C_ccall f_13442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13513)
+static void C_ccall f_13513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13504)
+static void C_ccall f_13504(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_13488)
+static void C_ccall f_13488(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_13245)
+static void C_ccall f_13245(C_word c,C_word t0,C_word t1) 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_13149)
+static void C_ccall f_13149(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13183)
+static void C_ccall f_13183(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_13127)
+static void C_ccall f_13127(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_13073)
+static void C_ccall f_13073(C_word c,C_word t0,C_word t1,C_word t2) 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_12925)
+static void C_ccall f_12925(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12928)
+static void C_ccall f_12928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13035)
+static void C_ccall f_13035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13026)
+static void C_ccall f_13026(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13022)
+static void C_ccall f_13022(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_word t2) C_noret;
+C_noret_decl(f_12998)
+static void C_ccall f_12998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13002)
+static void C_ccall f_13002(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_12929)
+static void C_ccall f_12929(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12946)
+static void C_ccall f_12946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12814)
+static void C_fcall f_12814(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_12818)
+static void C_ccall f_12818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12848)
+static void C_ccall f_12848(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12865)
+static void C_ccall f_12865(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_noret;
+C_noret_decl(f_12721)
+static void C_ccall f_12721(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12753)
+static void C_fcall f_12753(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12772)
+static void C_ccall f_12772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12795)
+static void C_ccall f_12795(C_word c,C_word t0,C_word t1) 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_12724)
+static void C_fcall f_12724(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12730)
+static void C_fcall f_12730(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12740)
+static void C_ccall f_12740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12582)
+static void C_ccall f_12582(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12586)
+static void C_fcall f_12586(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12592)
+static void C_ccall f_12592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12595)
+static void C_ccall f_12595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12645)
+static void C_fcall f_12645(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12674)
+static void C_ccall f_12674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12598)
+static void C_ccall f_12598(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_12610)
+static void C_fcall f_12610(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12639)
+static void C_ccall f_12639(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12601)
+static void C_ccall f_12601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12483)
+static void C_ccall f_12483(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12493)
+static void C_ccall f_12493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12543)
+static void C_fcall f_12543(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12572)
+static void C_ccall f_12572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12496)
+static void C_ccall f_12496(C_word c,C_word t0,C_word t1) 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_12508)
+static void C_fcall f_12508(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_12499)
+static void C_ccall f_12499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12446)
+static void C_ccall f_12446(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12472)
+static void C_ccall f_12472(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12453)
+static void C_ccall f_12453(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12202)
+static void C_ccall f_12202(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_12206)
+static void C_ccall f_12206(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_12440)
+static void C_ccall f_12440(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12212)
+static void C_ccall f_12212(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_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_12221)
+static void C_ccall f_12221(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12224)
+static void C_ccall f_12224(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12234)
+static void C_fcall f_12234(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12353)
+static void C_fcall f_12353(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12392)
+static void C_ccall f_12392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12395)
+static void C_ccall f_12395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12366)
+static void C_fcall f_12366(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12237)
+static void C_ccall f_12237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12277)
+static void C_ccall f_12277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12280)
+static void C_ccall f_12280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12307)
+static void C_ccall f_12307(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_12299)
+static void C_ccall f_12299(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12270)
+static void C_ccall f_12270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12260)
+static void C_ccall f_12260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12248)
+static void C_ccall f_12248(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12193)
+static void C_ccall f_12193(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12184)
+static void C_ccall f_12184(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12175)
+static void C_ccall f_12175(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12166)
+static void C_ccall f_12166(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12157)
+static void C_ccall f_12157(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12148)
+static void C_ccall f_12148(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12139)
+static void C_ccall f_12139(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12130)
+static void C_ccall f_12130(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12124)
+static void C_ccall f_12124(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_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_10418)
+static void C_ccall f_10418(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10485)
+static void C_fcall f_10485(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_10492)
+static void C_ccall f_10492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12017)
+static void C_fcall f_12017(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12032)
+static void C_fcall f_12032(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12035)
+static void C_ccall f_12035(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12076)
+static void C_ccall f_12076(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11994)
+static void C_ccall f_11994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11959)
+static void C_ccall f_11959(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11965)
+static void C_ccall f_11965(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_11896)
+static void C_ccall f_11896(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11902)
+static void C_ccall f_11902(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11870)
+static void C_ccall f_11870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11835)
+static void C_ccall f_11835(C_word c,C_word t0,C_word t1,C_word t2) 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_11707)
+static void C_ccall f_11707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11709)
+static void C_fcall f_11709(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11760)
+static void C_fcall f_11760(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11754)
+static void C_ccall f_11754(C_word c,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_11807)
+static void C_ccall f_11807(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11703)
+static void C_ccall f_11703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11699)
+static void C_ccall f_11699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11682)
+static void C_ccall f_11682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11686)
+static void C_ccall f_11686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11654)
+static void C_ccall f_11654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11637)
+static void C_ccall f_11637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11602)
+static void C_ccall f_11602(C_word c,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_11540)
+static void C_ccall f_11540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11545)
+static void C_fcall f_11545(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11555)
+static void C_ccall f_11555(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11493)
+static void C_ccall f_11493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11505)
+static void C_fcall f_11505(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11515)
+static void C_ccall f_11515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11223)
+static void C_ccall f_11223(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11226)
+static void C_ccall f_11226(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11443)
+static void C_ccall f_11443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11446)
+static void C_ccall f_11446(C_word c,C_word t0,C_word t1) 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_11397)
+static void C_ccall f_11397(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11403)
+static void C_ccall f_11403(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_11366)
+static void C_ccall f_11366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11370)
+static void C_ccall f_11370(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11337)
+static void C_ccall f_11337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11302)
+static void C_ccall f_11302(C_word c,C_word t0,C_word t1,C_word t2) 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_11276)
+static void C_ccall f_11276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11272)
+static void C_ccall f_11272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11247)
+static void C_ccall f_11247(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11243)
+static void C_ccall f_11243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11210)
+static void C_ccall f_11210(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11175)
+static void C_ccall f_11175(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11181)
+static void C_ccall f_11181(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_11135)
+static void C_ccall f_11135(C_word c,C_word t0,C_word t1,C_word t2) 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_11129)
+static void C_ccall f_11129(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11105)
+static void C_ccall f_11105(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11101)
+static void C_ccall f_11101(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11080)
+static void C_ccall f_11080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11076)
+static void C_ccall f_11076(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_11056)
+static void C_ccall f_11056(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10961)
+static void C_ccall f_10961(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_word t2) C_noret;
+C_noret_decl(f_11008)
+static void C_ccall f_11008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10964)
+static void C_ccall f_10964(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10969)
+static void C_ccall f_10969(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10975)
+static void C_ccall f_10975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10952)
+static void C_ccall f_10952(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10917)
+static void C_ccall f_10917(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_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_10915)
+static void C_ccall f_10915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10880)
+static void C_ccall f_10880(C_word c,C_word t0,C_word t1,C_word t2) 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_10855)
+static void C_ccall f_10855(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10820)
+static void C_ccall f_10820(C_word c,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_10805)
+static void C_ccall f_10805(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_10717)
+static void C_ccall f_10717(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10721)
+static void C_ccall f_10721(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_10700)
+static void C_ccall f_10700(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_10663)
+static void C_ccall f_10663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10638)
+static void C_ccall f_10638(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_10586)
+static void C_ccall f_10586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10589)
+static void C_ccall f_10589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10613)
+static void C_ccall f_10613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10592)
+static void C_ccall f_10592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10599)
+static void C_fcall f_10599(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10595)
+static void C_ccall f_10595(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_10504)
+static void C_ccall f_10504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10572)
+static void C_ccall f_10572(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10566)
+static void C_ccall f_10566(C_word c,C_word t0,C_word t1,C_word t2) 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_10522)
+static void C_fcall f_10522(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10557)
+static void C_ccall f_10557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10560)
+static void C_ccall f_10560(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_10520)
+static void C_ccall f_10520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10495)
+static void C_ccall f_10495(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10475)
+static void C_fcall f_10475(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10469)
+static void C_fcall f_10469(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10421)
+static void C_fcall f_10421(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10444)
+static void C_ccall f_10444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5298)
+static void C_ccall f_5298(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10413)
+static void C_ccall f_10413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10375)
+static void C_ccall f_10375(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_10397)
+static void C_ccall f_10397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10407)
+static void C_ccall f_10407(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_10389)
+static void C_ccall f_10389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10328)
+static void C_fcall f_10328(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10334)
+static void C_fcall f_10334(C_word t0,C_word t1,C_word t2) 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_10361)
+static void C_fcall f_10361(C_word t0,C_word t1,C_word t2) 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_word t4,C_word t5) C_noret;
+C_noret_decl(f_10256)
+static void C_ccall f_10256(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10268)
+static void C_ccall f_10268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10271)
+static void C_ccall f_10271(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_10259)
+static void C_ccall f_10259(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10262)
+static void C_ccall f_10262(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_5840)
+static void C_ccall f_5840(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_10229)
+static void C_ccall f_10229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10232)
+static void C_ccall f_10232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10235)
+static void C_ccall f_10235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10238)
+static void C_ccall f_10238(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_5847)
+static void C_ccall f_5847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5850)
+static void C_ccall f_5850(C_word c,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_5868)
+static void C_ccall f_5868(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_5957)
+static void C_fcall f_5957(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6058)
+static void C_fcall f_6058(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9984)
+static void C_ccall f_9984(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10117)
+static void C_ccall f_10117(C_word c,C_word t0,C_word t1) 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_10046)
+static void C_fcall f_10046(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10000)
+static void C_fcall f_10000(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9944)
+static void C_fcall f_9944(C_word t0,C_word t1) 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_9954)
+static void C_ccall f_9954(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_9957)
+static void C_ccall f_9957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9633)
+static void C_ccall f_9633(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9924)
+static void C_ccall f_9924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9652)
+static void C_ccall f_9652(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9655)
+static void C_ccall f_9655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9666)
+static void C_ccall f_9666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9839)
+static void C_fcall f_9839(C_word t0,C_word t1,C_word t2,C_word t3) 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_9879)
+static void C_ccall f_9879(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_9863)
+static void C_ccall f_9863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9698)
+static void C_ccall f_9698(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9830)
+static void C_ccall f_9830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9794)
+static void C_ccall f_9794(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_9722)
+static void C_ccall f_9722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9718)
+static void C_ccall f_9718(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_9674)
+static void C_ccall f_9674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9662)
+static void C_ccall f_9662(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_9574)
+static void C_fcall f_9574(C_word t0,C_word t1,C_word t2) 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_9601)
+static void C_fcall f_9601(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9568)
+static void C_ccall f_9568(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9564)
+static void C_ccall f_9564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9489)
+static void C_ccall f_9489(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9507)
+static void C_ccall f_9507(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_9537)
+static void C_ccall f_9537r(C_word t0,C_word t1,C_word t3) 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_9513)
+static void C_ccall f_9513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9520)
+static void C_ccall f_9520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9495)
+static void C_ccall f_9495(C_word c,C_word t0,C_word t1,C_word t2) 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_9358)
+static void C_ccall f_9358(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_noret;
+C_noret_decl(f_9372)
+static void C_ccall f_9372(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9382)
+static void C_ccall f_9382(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9385)
+static void C_ccall f_9385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9388)
+static void C_ccall f_9388(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_noret;
+C_noret_decl(f_9418)
+static void C_ccall f_9418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9423)
+static void C_ccall f_9423(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9448)
+static void C_ccall f_9448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9375)
+static void C_ccall f_9375(C_word c,C_word t0,C_word t1) 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_9339)
+static void C_ccall f_9339(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_9178)
+static void C_ccall f_9178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9181)
+static void C_ccall f_9181(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_9190)
+static void C_ccall f_9190(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9301)
+static void C_ccall f_9301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9262)
+static void C_ccall f_9262(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9229)
+static void C_fcall f_9229(C_word t0,C_word t1) 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_9225)
+static void C_ccall f_9225(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9205)
+static void C_ccall f_9205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9122)
+static void C_ccall f_9122(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9131)
+static void C_ccall f_9131(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_9162)
+static void C_ccall f_9162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9134)
+static void C_fcall f_9134(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_9146)
+static void C_ccall f_9146(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8958)
+static void C_ccall f_8958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9106)
+static void C_ccall f_9106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8970)
+static void C_ccall f_8970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8973)
+static void C_ccall f_8973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8976)
+static void C_ccall f_8976(C_word c,C_word t0,C_word t1) 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_9006)
+static void C_ccall f_9006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9011)
+static void C_ccall f_9011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9036)
+static void C_ccall f_9036(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_9042)
+static void C_ccall f_9042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9073)
+static void C_fcall f_9073(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8901)
+static void C_ccall f_8901(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_8907)
+static void C_ccall f_8907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8919)
+static void C_ccall f_8919(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_8879)
+static void C_ccall f_8879(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8866)
+static void C_ccall f_8866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8853)
+static void C_ccall f_8853(C_word c,C_word t0,C_word t1) 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_8773)
+static void C_ccall f_8773(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8792)
+static void C_fcall f_8792(C_word t0,C_word t1,C_word t2) 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_8823)
+static void C_ccall f_8823(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_8786)
+static void C_ccall f_8786(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_8742)
+static void C_ccall f_8742(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8711)
+static void C_ccall f_8711(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8719)
+static void C_ccall f_8719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8682)
+static void C_ccall f_8682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8649)
+static void C_ccall f_8649(C_word c,C_word t0,C_word t1,C_word t2) 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_8643)
+static void C_ccall f_8643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8639)
+static void C_ccall f_8639(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_8610)
+static void C_ccall f_8610(C_word c,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_8269)
+static void C_ccall f_8269(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8275)
+static void C_ccall f_8275(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8278)
+static void C_ccall f_8278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8284)
+static void C_ccall f_8284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8510)
+static void C_ccall f_8510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8513)
+static void C_ccall f_8513(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_8546)
+static void C_ccall f_8546(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_8439)
+static void C_ccall f_8439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8478)
+static void C_ccall f_8478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8494)
+static void C_ccall f_8494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8497)
+static void C_ccall f_8497(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8500)
+static void C_ccall f_8500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8491)
+static void C_ccall f_8491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8481)
+static void C_ccall f_8481(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8442)
+static void C_ccall f_8442(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_8445)
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8448)
+static void C_ccall f_8448(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8463)
+static void C_ccall f_8463(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_8374)
+static void C_ccall f_8374(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_8421)
+static void C_ccall f_8421(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8291)
+static void C_fcall f_8291(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_8357)
+static void C_ccall f_8357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8337)
+static void C_ccall f_8337(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8224)
+static void C_fcall f_8224(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8253)
+static void C_ccall f_8253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8141)
+static void C_ccall f_8141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8175)
+static void C_fcall f_8175(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8208)
+static void C_ccall f_8208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8188)
+static void C_fcall f_8188(C_word t0,C_word t1) 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_8144)
+static void C_ccall f_8144(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8165)
+static void C_ccall f_8165(C_word c,C_word t0,C_word t1) 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_8147)
+static void C_ccall f_8147(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8150)
+static void C_ccall f_8150(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8122)
+static void C_ccall f_8122(C_word c,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_8005)
+static void C_ccall f_8005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8007)
+static void C_fcall f_8007(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8085)
+static void C_ccall f_8085(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8034)
+static void C_fcall f_8034(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8058)
+static C_word C_fcall f_8058(C_word t0);
+C_noret_decl(f_8047)
+static void C_fcall f_8047(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7634)
+static void C_ccall f_7634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7995)
+static void C_ccall f_7995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7637)
+static void C_ccall f_7637(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_word t2,C_word t3) 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_7944)
+static void C_ccall f_7944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7950)
+static void C_fcall f_7950(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7988)
+static void C_ccall f_7988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7977)
+static void C_fcall f_7977(C_word t0,C_word t1,C_word t2) 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_7942)
+static void C_ccall f_7942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7924)
+static void C_ccall f_7924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7928)
+static void C_ccall f_7928(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_noret;
+C_noret_decl(f_7935)
+static void C_ccall f_7935(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7938)
+static void C_ccall f_7938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7919)
+static void C_ccall f_7919(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_7674)
+static void C_ccall f_7674(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7684)
+static void C_fcall f_7684(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7905)
+static void C_ccall f_7905(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7901)
+static void C_ccall f_7901(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_7851)
+static void C_ccall f_7851(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_7818)
+static void C_ccall f_7818(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_noret;
+C_noret_decl(f_7741)
+static void C_ccall f_7741(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7766)
+static void C_ccall f_7766(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7782)
+static void C_ccall f_7782(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7782)
+static void C_ccall f_7782r(C_word t0,C_word t1,C_word t3) 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_7772)
+static void C_ccall f_7772(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_7747)
+static void C_ccall f_7747(C_word c,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_7764)
+static void C_ccall f_7764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7757)
+static void C_ccall f_7757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7694)
+static void C_ccall f_7694(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_7725)
+static void C_ccall f_7725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7736)
+static void C_ccall f_7736(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7729)
+static void C_ccall f_7729(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7704)
+static void C_fcall f_7704(C_word t0,C_word t1,C_word t2) 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_5686)
+static void C_ccall f_5686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5762)
+static void C_ccall f_5762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5689)
+static void C_ccall f_5689(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_5692)
+static void C_ccall f_5692(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_5712)
+static void C_ccall f_5712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5749)
+static void C_ccall f_5749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5716)
+static void C_ccall f_5716(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5724)
+static void C_fcall f_5724(C_word t0,C_word t1,C_word t2) 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_5719)
+static void C_ccall f_5719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f20258)
+static void C_ccall f20258(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7708)
+static void C_ccall f_7708(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_noret;
+C_noret_decl(f_7647)
+static void C_ccall f_7647(C_word c,C_word t0,C_word t1) 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_7654)
+static void C_ccall f_7654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7658)
+static void C_ccall f_7658(C_word c,C_word t0,C_word t1) C_noret;
+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_7665)
+static void C_ccall f_7665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7668)
+static void C_ccall f_7668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7551)
+static void C_fcall f_7551(C_word t0,C_word t1,C_word t2) 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_7578)
+static void C_fcall f_7578(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7582)
+static void C_ccall f_7582(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_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_7600)
+static void C_ccall f_7600(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_7444)
+static void C_ccall f_7444(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_7511)
+static void C_fcall f_7511(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7534)
+static void C_ccall f_7534(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7491)
+static void C_ccall f_7491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7499)
+static void C_ccall f_7499(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_7455)
+static void C_fcall f_7455(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7478)
+static void C_ccall f_7478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7354)
+static void C_ccall f_7354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7435)
+static void C_ccall f_7435(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_7431)
+static void C_ccall f_7431(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7357)
+static void C_ccall f_7357(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_7296)
+static void C_ccall f_7296(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7300)
+static void C_ccall f_7300(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7205)
+static void C_fcall f_7205(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_7282)
+static void C_ccall f_7282(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_7270)
+static void C_ccall f_7270(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_7274)
+static void C_ccall f_7274(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_7224)
+static void C_fcall f_7224(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7075)
+static void C_ccall f_7075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7133)
+static void C_fcall f_7133(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_7160)
+static void C_fcall f_7160(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7176)
+static void C_ccall f_7176(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_7078)
+static void C_ccall f_7078(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7081)
+static void C_ccall f_7081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7097)
+static void C_fcall f_7097(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7105)
+static C_word C_fcall f_7105(C_word t0,C_word t1);
+C_noret_decl(f_7084)
+static void C_ccall f_7084(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_noret;
+C_noret_decl(f_6988)
+static void C_ccall f_6988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7012)
+static void C_fcall f_7012(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7062)
+static void C_ccall f_7062(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7039)
+static void C_fcall f_7039(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_7051)
+static void C_ccall f_7051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7006)
+static void C_ccall f_7006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6991)
+static void C_ccall f_6991(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6998)
+static void C_ccall f_6998(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_6965)
+static void C_ccall f_6965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6976)
+static void C_ccall f_6976(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6970)
+static void C_ccall f_6970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6668)
+static void C_ccall f_6668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6673)
+static void C_ccall f_6673(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6929)
+static void C_fcall f_6929(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6958)
+static void C_ccall f_6958(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6677)
+static void C_ccall f_6677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6880)
+static void C_fcall f_6880(C_word t0,C_word t1,C_word t2,C_word t3) 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_6893)
+static void C_fcall f_6893(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6878)
+static void C_ccall f_6878(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6680)
+static void C_ccall f_6680(C_word c,C_word t0,C_word t1) 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_6874)
+static void C_ccall f_6874(C_word c,C_word t0,C_word t1) 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_6870)
+static void C_ccall f_6870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6689)
+static void C_ccall f_6689(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6695)
+static void C_ccall f_6695(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_6818)
+static void C_fcall f_6818(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6710)
+static void C_ccall f_6710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6797)
+static void C_ccall f_6797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6741)
+static void C_fcall f_6741(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6775)
+static void C_ccall f_6775(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_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_6605)
+static void C_fcall f_6605(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6523)
+static void C_ccall f_6523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6549)
+static void C_fcall f_6549(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6531)
+static void C_ccall f_6531(C_word c,C_word t0,C_word t1) 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_6527)
+static void C_ccall f_6527(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6290)
+static void C_ccall f_6290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6296)
+static void C_ccall f_6296(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_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_6299)
+static void C_ccall f_6299(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6408)
+static void C_fcall f_6408(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6441)
+static void C_ccall f_6441(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6421)
+static void C_fcall f_6421(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6406)
+static void C_ccall f_6406(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6302)
+static void C_ccall f_6302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6305)
+static void C_ccall f_6305(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6338)
+static void C_fcall f_6338(C_word t0,C_word t1,C_word t2,C_word t3) 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_6351)
+static void C_fcall f_6351(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6369)
+static void C_fcall f_6369(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6377)
+static void C_ccall f_6377(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6316)
+static void C_ccall f_6316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6328)
+static void C_ccall f_6328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6332)
+static void C_ccall f_6332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6324)
+static void C_ccall f_6324(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6209)
+static void C_fcall f_6209(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6230)
+static void C_ccall f_6230(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6268)
+static void C_ccall f_6268(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_6256)
+static void C_ccall f_6256(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6234)
+static void C_ccall f_6234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6249)
+static void C_ccall f_6249(C_word c,C_word t0,C_word t1) 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_6203)
+static void C_ccall f_6203(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6154)
+static void C_fcall f_6154(C_word t0,C_word t1,C_word t2) 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_6133)
+static void C_ccall f_6133(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_6147)
+static void C_ccall f_6147(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6141)
+static void C_ccall f_6141(C_word c,C_word t0,C_word t1,C_word t2) 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_6108)
+static void C_ccall f_6108(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_6079)
+static void C_ccall f_6079(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_noret;
+C_noret_decl(f_6087)
+static void C_ccall f_6087(C_word c,C_word t0,C_word t1) 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_6012)
+static void C_ccall f_6012(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_6021)
+static void C_ccall f_6021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6046)
+static void C_ccall f_6046(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_5960)
+static void C_ccall f_5960(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_5899)
+static void C_ccall f_5899(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_5918)
+static void C_ccall f_5918(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_5872)
+static void C_fcall f_5872(C_word t0,C_word t1,C_word t2) 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_5790)
+static void C_ccall f_5790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5784)
+static void C_ccall f_5784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5644)
+static void C_fcall f_5644(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5648)
+static void C_ccall f_5648(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(f_5680)
+static void C_ccall f_5680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5673)
+static void C_ccall f_5673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5649)
+static void C_ccall f_5649(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5653)
+static void C_ccall f_5653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5656)
+static void C_ccall f_5656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5660)
+static void C_ccall f_5660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5663)
+static void C_ccall f_5663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5474)
+static void C_fcall f_5474(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) 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_5490)
+static void C_ccall f_5490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5508)
+static void C_ccall f_5508(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5616)
+static void C_ccall f_5616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5573)
+static void C_fcall f_5573(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5580)
+static void C_ccall f_5580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5594)
+static void C_ccall f_5594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5590)
+static void C_ccall f_5590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5526)
+static void C_fcall f_5526(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5533)
+static void C_ccall f_5533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5547)
+static void C_ccall f_5547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5543)
+static void C_ccall f_5543(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5512)
+static void C_fcall f_5512(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5494)
+static void C_fcall f_5494(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5428)
+static void C_fcall f_5428(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5460)
+static void C_ccall f_5460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5368)
+static void C_fcall f_5368(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5374)
+static void C_fcall f_5374(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5389)
+static void C_ccall f_5389(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5355)
+static void C_fcall f_5355(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5359)
+static void C_ccall f_5359(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5366)
+static void C_ccall f_5366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5362)
+static void C_ccall f_5362(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_5344)
+static void C_ccall f_5344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5350)
+static void C_ccall f_5350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5301)
+static void C_fcall f_5301(C_word t0,C_word t1,C_word t2,C_word t3) 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_5334)
+static void C_ccall f_5334(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5314)
+static void C_fcall f_5314(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5237)
+static void C_ccall f_5237(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_5241)
+static void C_ccall f_5241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5289)
+static void C_ccall f_5289(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5244)
+static void C_ccall f_5244(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5282)
+static void C_ccall f_5282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5247)
+static void C_ccall f_5247(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_5255)
+static void C_ccall f_5255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5275)
+static void C_ccall f_5275(C_word c,C_word t0,C_word t1) 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_5268)
+static void C_ccall f_5268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5142)
+static void C_ccall f_5142(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_5142)
+static void C_ccall f_5142r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+
+C_noret_decl(trf_19096)
+static void C_fcall trf_19096(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19096(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19096(t0,t1);}
+
+C_noret_decl(trf_19064)
+static void C_fcall trf_19064(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19064(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19064(t0,t1,t2);}
+
+C_noret_decl(trf_19050)
+static void C_fcall trf_19050(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19050(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19050(t0,t1,t2);}
+
+C_noret_decl(trf_18970)
+static void C_fcall trf_18970(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18970(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18970(t0,t1,t2);}
+
+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 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_18924(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_18930)
+static void C_fcall trf_18930(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18930(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18930(t0,t1,t2);}
+
+C_noret_decl(trf_18957)
+static void C_fcall trf_18957(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18957(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18957(t0,t1,t2);}
+
+C_noret_decl(trf_17838)
+static void C_fcall trf_17838(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17838(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_17838(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_18830)
+static void C_fcall trf_18830(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18830(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_18830(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_18638)
+static void C_fcall trf_18638(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18638(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18638(t0,t1);}
+
+C_noret_decl(trf_18659)
+static void C_fcall trf_18659(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18659(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18659(t0,t1);}
+
+C_noret_decl(trf_18604)
+static void C_fcall trf_18604(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18604(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18604(t0,t1);}
+
+C_noret_decl(trf_18573)
+static void C_fcall trf_18573(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18573(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18573(t0,t1);}
+
+C_noret_decl(trf_18558)
+static void C_fcall trf_18558(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18558(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18558(t0,t1);}
+
+C_noret_decl(trf_18436)
+static void C_fcall trf_18436(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18436(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18436(t0,t1);}
+
+C_noret_decl(trf_18448)
+static void C_fcall trf_18448(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18448(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18448(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18401(t0,t1,t2);}
+
+C_noret_decl(trf_18221)
+static void C_fcall trf_18221(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18221(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18221(t0,t1);}
+
+C_noret_decl(trf_18097)
+static void C_fcall trf_18097(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18097(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18097(t0,t1);}
+
+C_noret_decl(trf_17765)
+static void C_fcall trf_17765(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17765(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_17765(t0,t1,t2,t3);}
+
+C_noret_decl(trf_17772)
+static void C_fcall trf_17772(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17772(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17772(t0,t1);}
+
+C_noret_decl(trf_17775)
+static void C_fcall trf_17775(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17775(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17775(t0,t1);}
+
+C_noret_decl(trf_17714)
+static void C_fcall trf_17714(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17714(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_17714(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_17340)
+static void C_fcall trf_17340(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17340(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_17340(t0,t1,t2,t3);}
+
+C_noret_decl(trf_17351)
+static void C_fcall trf_17351(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17351(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17351(t0,t1,t2);}
+
+C_noret_decl(trf_17294)
+static void C_fcall trf_17294(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17294(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_17294(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_17300)
+static void C_fcall trf_17300(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17300(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17300(t0,t1,t2);}
+
+C_noret_decl(trf_17327)
+static void C_fcall trf_17327(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17327(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17327(t0,t1,t2);}
+
+C_noret_decl(trf_16269)
+static void C_fcall trf_16269(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16269(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_16269(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_16303)
+static void C_fcall trf_16303(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16303(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16303(t0,t1);}
+
+C_noret_decl(trf_16342)
+static void C_fcall trf_16342(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16342(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16342(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_16903)
+static void C_fcall trf_16903(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16903(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16903(t0,t1,t2);}
+
+C_noret_decl(trf_16854)
+static void C_fcall trf_16854(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16854(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_16854(t0,t1,t2,t3);}
+
+C_noret_decl(trf_16867)
+static void C_fcall trf_16867(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16867(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16867(t0,t1);}
+
+C_noret_decl(trf_16504)
+static void C_fcall trf_16504(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16504(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16504(t0,t1);}
+
+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_16667)
+static void C_fcall trf_16667(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16667(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16667(t0,t1,t2);}
+
+C_noret_decl(trf_16625)
+static void C_fcall trf_16625(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16625(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16625(t0,t1);}
+
+C_noret_decl(trf_16575)
+static void C_fcall trf_16575(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16575(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16575(t0,t1,t2);}
+
+C_noret_decl(trf_16602)
+static void C_fcall trf_16602(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16602(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16602(t0,t1,t2);}
+
+C_noret_decl(trf_15834)
+static void C_fcall trf_15834(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15834(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_15834(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_15868)
+static void C_fcall trf_15868(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15868(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15868(t0,t1);}
+
+C_noret_decl(trf_16211)
+static void C_fcall trf_16211(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16211(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16211(t0,t1,t2);}
+
+C_noret_decl(trf_16219)
+static void C_fcall trf_16219(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16219(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16219(t0,t1,t2);}
+
+C_noret_decl(trf_17396)
+static void C_fcall trf_17396(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17396(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17396(t0,t1,t2);}
+
+C_noret_decl(trf_17449)
+static void C_fcall trf_17449(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17449(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17449(t0,t1);}
+
+C_noret_decl(trf_17480)
+static void C_fcall trf_17480(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17480(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17480(t0,t1,t2);}
+
+C_noret_decl(trf_16014)
+static void C_fcall trf_16014(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16014(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16014(t0,t1);}
+
+C_noret_decl(trf_16037)
+static void C_fcall trf_16037(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16037(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16037(t0,t1);}
+
+C_noret_decl(trf_16055)
+static void C_fcall trf_16055(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16055(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16055(t0,t1);}
+
+C_noret_decl(trf_15958)
+static void C_fcall trf_15958(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15958(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15958(t0,t1,t2);}
+
+C_noret_decl(trf_15966)
+static void C_fcall trf_15966(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15966(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15966(t0,t1,t2);}
+
+C_noret_decl(trf_15906)
+static void C_fcall trf_15906(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15906(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15906(t0,t1,t2);}
+
+C_noret_decl(trf_15914)
+static void C_fcall trf_15914(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15914(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15914(t0,t1,t2);}
+
+C_noret_decl(trf_15823)
+static void C_fcall trf_15823(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15823(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15823(t0,t1,t2);}
+
+C_noret_decl(trf_15813)
+static void C_fcall trf_15813(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15813(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_15813(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15807)
+static void C_fcall trf_15807(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15807(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_15807(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15659)
+static void C_fcall trf_15659(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15659(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15659(t0,t1,t2);}
+
+C_noret_decl(trf_15637)
+static void C_fcall trf_15637(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15637(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15637(t0,t1);}
+
+C_noret_decl(trf_15610)
+static void C_fcall trf_15610(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15610(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15610(t0,t1);}
+
+C_noret_decl(trf_15552)
+static void C_fcall trf_15552(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15552(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15552(t0,t1);}
+
+C_noret_decl(trf_15478)
+static void C_fcall trf_15478(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15478(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15478(t0,t1,t2);}
+
+C_noret_decl(trf_15329)
+static void C_fcall trf_15329(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15329(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15329(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15270(t0,t1);}
+
+C_noret_decl(trf_15139)
+static void C_fcall trf_15139(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15139(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15139(t0,t1);}
+
+C_noret_decl(trf_15205)
+static void C_fcall trf_15205(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15205(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15205(t0,t1,t2);}
+
+C_noret_decl(trf_15213)
+static void C_fcall trf_15213(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15213(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15213(t0,t1,t2);}
+
+C_noret_decl(trf_15220)
+static void C_fcall trf_15220(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15220(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15220(t0,t1);}
+
+C_noret_decl(trf_15172)
+static void C_fcall trf_15172(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15172(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15172(t0,t1);}
+
+C_noret_decl(trf_15093)
+static void C_fcall trf_15093(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15093(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15093(t0,t1);}
+
+C_noret_decl(trf_15081)
+static void C_fcall trf_15081(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15081(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15081(t0,t1);}
+
+C_noret_decl(trf_14970)
+static void C_fcall trf_14970(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14970(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14970(t0,t1);}
+
+C_noret_decl(trf_14775)
+static void C_fcall trf_14775(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14775(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14775(t0,t1);}
+
+C_noret_decl(trf_14801)
+static void C_fcall trf_14801(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14801(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14801(t0,t1);}
+
+C_noret_decl(trf_14827)
+static void C_fcall trf_14827(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14827(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14827(t0,t1);}
+
+C_noret_decl(trf_14756)
+static void C_fcall trf_14756(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14756(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14756(t0,t1);}
+
+C_noret_decl(trf_14666)
+static void C_fcall trf_14666(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14666(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_14666(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14652)
+static void C_fcall trf_14652(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14652(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_14652(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14646)
+static void C_fcall trf_14646(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14646(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_14646(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14468)
+static void C_fcall trf_14468(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14468(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_14468(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_14481)
+static void C_fcall trf_14481(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14481(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14481(t0,t1);}
+
+C_noret_decl(trf_14493)
+static void C_fcall trf_14493(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14493(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14493(t0,t1);}
+
+C_noret_decl(trf_14538)
+static void C_fcall trf_14538(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14538(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14538(t0,t1);}
+
+C_noret_decl(trf_14434)
+static void C_fcall trf_14434(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14434(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_14434(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_14440)
+static void C_fcall trf_14440(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14440(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14440(t0,t1,t2);}
+
+C_noret_decl(trf_14448)
+static void C_fcall trf_14448(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14448(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14448(t0,t1,t2);}
+
+C_noret_decl(trf_13740)
+static void C_fcall trf_13740(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13740(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_13740(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_13777)
+static void C_fcall trf_13777(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13777(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13777(t0,t1);}
+
+C_noret_decl(trf_14233)
+static void C_fcall trf_14233(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14233(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14233(t0,t1,t2);}
+
+C_noret_decl(trf_14241)
+static void C_fcall trf_14241(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14241(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14241(t0,t1,t2);}
+
+C_noret_decl(trf_14165)
+static void C_fcall trf_14165(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14165(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14165(t0,t1);}
+
+C_noret_decl(trf_14168)
+static void C_fcall trf_14168(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14168(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14168(t0,t1);}
+
+C_noret_decl(trf_14099)
+static void C_fcall trf_14099(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14099(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14099(t0,t1,t2);}
+
+C_noret_decl(trf_14107)
+static void C_fcall trf_14107(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14107(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14107(t0,t1,t2);}
+
+C_noret_decl(trf_14018)
+static void C_fcall trf_14018(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14018(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_14018(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13906)
+static void C_fcall trf_13906(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13906(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13906(t0,t1,t2);}
+
+C_noret_decl(trf_13914)
+static void C_fcall trf_13914(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13914(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13914(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 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_13540(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13546)
+static void C_fcall trf_13546(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13546(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_13546(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13519)
+static void C_fcall trf_13519(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13519(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_13519(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_13343)
+static void C_fcall trf_13343(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13343(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_13343(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_12871)
+static void C_fcall trf_12871(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12871(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_12871(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12913)
+static void C_fcall trf_12913(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12913(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12913(t0,t1);}
+
+C_noret_decl(trf_13254)
+static void C_fcall trf_13254(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13254(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13254(t0,t1);}
+
+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 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_13050(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12814)
+static void C_fcall trf_12814(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12814(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_12814(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_12753)
+static void C_fcall trf_12753(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12753(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12753(t0,t1,t2);}
+
+C_noret_decl(trf_12724)
+static void C_fcall trf_12724(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12724(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12724(t0,t1,t2);}
+
+C_noret_decl(trf_12730)
+static void C_fcall trf_12730(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12730(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12730(t0,t1,t2);}
+
+C_noret_decl(trf_12586)
+static void C_fcall trf_12586(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12586(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12586(t0,t1);}
+
+C_noret_decl(trf_12645)
+static void C_fcall trf_12645(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12645(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12645(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_12543)
+static void C_fcall trf_12543(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12543(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12543(t0,t1,t2);}
+
+C_noret_decl(trf_12508)
+static void C_fcall trf_12508(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12508(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12508(t0,t1,t2);}
+
+C_noret_decl(trf_12234)
+static void C_fcall trf_12234(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12234(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12234(t0,t1);}
+
+C_noret_decl(trf_12353)
+static void C_fcall trf_12353(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12353(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_12353(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12366)
+static void C_fcall trf_12366(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12366(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12366(t0,t1);}
+
+C_noret_decl(trf_10485)
+static void C_fcall trf_10485(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10485(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10485(t0,t1);}
+
+C_noret_decl(trf_12017)
+static void C_fcall trf_12017(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12017(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12017(t0,t1,t2);}
+
+C_noret_decl(trf_12032)
+static void C_fcall trf_12032(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12032(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12032(t0,t1);}
+
+C_noret_decl(trf_11709)
+static void C_fcall trf_11709(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11709(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11709(t0,t1,t2);}
+
+C_noret_decl(trf_11760)
+static void C_fcall trf_11760(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11760(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11760(t0,t1);}
+
+C_noret_decl(trf_11545)
+static void C_fcall trf_11545(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11545(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11545(t0,t1,t2);}
+
+C_noret_decl(trf_11505)
+static void C_fcall trf_11505(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11505(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11505(t0,t1,t2);}
+
+C_noret_decl(trf_10599)
+static void C_fcall trf_10599(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10599(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10599(t0,t1);}
+
+C_noret_decl(trf_10522)
+static void C_fcall trf_10522(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10522(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10522(t0,t1,t2);}
+
+C_noret_decl(trf_10475)
+static void C_fcall trf_10475(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10475(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10475(t0,t1,t2);}
+
+C_noret_decl(trf_10469)
+static void C_fcall trf_10469(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10469(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10469(t0,t1,t2);}
+
+C_noret_decl(trf_10421)
+static void C_fcall trf_10421(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10421(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_10421(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10328)
+static void C_fcall trf_10328(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10328(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_10328(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_10334)
+static void C_fcall trf_10334(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10334(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10334(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_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 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_5774(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_5957)
+static void C_fcall trf_5957(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5957(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5957(t0,t1);}
+
+C_noret_decl(trf_6058)
+static void C_fcall trf_6058(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6058(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6058(t0,t1);}
+
+C_noret_decl(trf_10046)
+static void C_fcall trf_10046(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10046(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10046(t0,t1,t2);}
+
+C_noret_decl(trf_10000)
+static void C_fcall trf_10000(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10000(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10000(t0,t1,t2);}
+
+C_noret_decl(trf_9944)
+static void C_fcall trf_9944(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9944(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9944(t0,t1);}
+
+C_noret_decl(trf_9839)
+static void C_fcall trf_9839(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9839(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_9839(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9574)
+static void C_fcall trf_9574(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9574(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9574(t0,t1,t2);}
+
+C_noret_decl(trf_9601)
+static void C_fcall trf_9601(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9601(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9601(t0,t1,t2);}
+
+C_noret_decl(trf_9229)
+static void C_fcall trf_9229(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9229(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9229(t0,t1);}
+
+C_noret_decl(trf_9134)
+static void C_fcall trf_9134(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9134(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9134(t0,t1);}
+
+C_noret_decl(trf_9073)
+static void C_fcall trf_9073(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9073(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9073(t0,t1);}
+
+C_noret_decl(trf_8792)
+static void C_fcall trf_8792(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8792(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8792(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_8291)
+static void C_fcall trf_8291(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8291(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8291(t0,t1,t2);}
+
+C_noret_decl(trf_8224)
+static void C_fcall trf_8224(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8224(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8224(t0,t1,t2);}
+
+C_noret_decl(trf_8175)
+static void C_fcall trf_8175(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8175(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_8175(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8188)
+static void C_fcall trf_8188(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8188(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8188(t0,t1);}
+
+C_noret_decl(trf_8007)
+static void C_fcall trf_8007(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8007(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8007(t0,t1,t2);}
+
+C_noret_decl(trf_8034)
+static void C_fcall trf_8034(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8034(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8034(t0,t1,t2);}
+
+C_noret_decl(trf_8047)
+static void C_fcall trf_8047(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8047(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8047(t0,t1);}
+
+C_noret_decl(trf_7950)
+static void C_fcall trf_7950(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7950(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7950(t0,t1,t2);}
+
+C_noret_decl(trf_7977)
+static void C_fcall trf_7977(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7977(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7977(t0,t1,t2);}
+
+C_noret_decl(trf_7684)
+static void C_fcall trf_7684(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7684(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_7684(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7704)
+static void C_fcall trf_7704(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7704(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7704(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5724(t0,t1,t2);}
+
+C_noret_decl(trf_7551)
+static void C_fcall trf_7551(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7551(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7551(t0,t1,t2);}
+
+C_noret_decl(trf_7578)
+static void C_fcall trf_7578(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7578(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7578(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7511(t0,t1,t2);}
+
+C_noret_decl(trf_7455)
+static void C_fcall trf_7455(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7455(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7455(t0,t1,t2);}
+
+C_noret_decl(trf_7205)
+static void C_fcall trf_7205(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7205(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7205(t0,t1);}
+
+C_noret_decl(trf_7224)
+static void C_fcall trf_7224(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7224(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7224(t0,t1);}
+
+C_noret_decl(trf_7133)
+static void C_fcall trf_7133(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7133(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7133(t0,t1,t2);}
+
+C_noret_decl(trf_7160)
+static void C_fcall trf_7160(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7160(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7160(t0,t1,t2);}
+
+C_noret_decl(trf_7097)
+static void C_fcall trf_7097(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7097(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7097(t0,t1,t2);}
+
+C_noret_decl(trf_7012)
+static void C_fcall trf_7012(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7012(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7012(t0,t1,t2);}
+
+C_noret_decl(trf_7039)
+static void C_fcall trf_7039(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7039(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7039(t0,t1,t2);}
+
+C_noret_decl(trf_6929)
+static void C_fcall trf_6929(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6929(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6929(t0,t1,t2);}
+
+C_noret_decl(trf_6880)
+static void C_fcall trf_6880(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6880(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_6880(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6893)
+static void C_fcall trf_6893(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6893(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6893(t0,t1);}
+
+C_noret_decl(trf_6818)
+static void C_fcall trf_6818(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6818(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6818(t0,t1);}
+
+C_noret_decl(trf_6741)
+static void C_fcall trf_6741(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6741(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6741(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6719(t0,t1);}
+
+C_noret_decl(trf_6605)
+static void C_fcall trf_6605(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6605(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6605(t0,t1,t2);}
+
+C_noret_decl(trf_6549)
+static void C_fcall trf_6549(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6549(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6549(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6457(t0,t1,t2);}
+
+C_noret_decl(trf_6408)
+static void C_fcall trf_6408(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6408(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_6408(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6421)
+static void C_fcall trf_6421(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6421(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6421(t0,t1);}
+
+C_noret_decl(trf_6338)
+static void C_fcall trf_6338(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6338(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_6338(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6351)
+static void C_fcall trf_6351(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6351(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6351(t0,t1);}
+
+C_noret_decl(trf_6369)
+static void C_fcall trf_6369(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6369(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_6369(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6209)
+static void C_fcall trf_6209(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6209(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6209(t0,t1,t2);}
+
+C_noret_decl(trf_6154)
+static void C_fcall trf_6154(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6154(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6154(t0,t1,t2);}
+
+C_noret_decl(trf_5872)
+static void C_fcall trf_5872(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5872(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5872(t0,t1,t2);}
+
+C_noret_decl(trf_5644)
+static void C_fcall trf_5644(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5644(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5644(t0,t1);}
+
+C_noret_decl(trf_5474)
+static void C_fcall trf_5474(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5474(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_5474(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_5573)
+static void C_fcall trf_5573(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5573(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5573(t0,t1,t2);}
+
+C_noret_decl(trf_5526)
+static void C_fcall trf_5526(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5526(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5526(t0,t1,t2);}
+
+C_noret_decl(trf_5512)
+static void C_fcall trf_5512(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5512(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5512(t0,t1,t2);}
+
+C_noret_decl(trf_5494)
+static void C_fcall trf_5494(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5494(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5494(t0,t1,t2);}
+
+C_noret_decl(trf_5428)
+static void C_fcall trf_5428(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5428(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_5428(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5368)
+static void C_fcall trf_5368(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5368(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5368(t0,t1,t2);}
+
+C_noret_decl(trf_5374)
+static void C_fcall trf_5374(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5374(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_5374(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5355)
+static void C_fcall trf_5355(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5355(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_5355(t0,t1,t2,t3);}
+
+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_5301)
+static void C_fcall trf_5301(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5301(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_5301(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5314)
+static void C_fcall trf_5314(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5314(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5314(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(tr17)
+static void C_fcall tr17(C_proc17 k) C_regparm C_noret;
+C_regparm static void C_fcall tr17(C_proc17 k){
+C_word t16=C_pick(0);
+C_word t15=C_pick(1);
+C_word t14=C_pick(2);
+C_word t13=C_pick(3);
+C_word t12=C_pick(4);
+C_word t11=C_pick(5);
+C_word t10=C_pick(6);
+C_word t9=C_pick(7);
+C_word t8=C_pick(8);
+C_word t7=C_pick(9);
+C_word t6=C_pick(10);
+C_word t5=C_pick(11);
+C_word t4=C_pick(12);
+C_word t3=C_pick(13);
+C_word t2=C_pick(14);
+C_word t1=C_pick(15);
+C_word t0=C_pick(16);
+C_adjust_stack(-17);
+(k)(17,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16);}
+
+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);}
+
+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);}
+
+/* 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(6855)){
+C_save(t1);
+C_rereclaim2(6855*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,684);
+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],43,"\010compilerrest-parameters-promoted-to-vector");
+lf[56]=C_h_intern(&lf[56],21,"\010compilerinline-table");
+lf[57]=C_h_intern(&lf[57],26,"\010compilerinline-table-used");
+lf[58]=C_h_intern(&lf[58],23,"\010compilerconstant-table");
+lf[59]=C_h_intern(&lf[59],23,"\010compilerconstants-used");
+lf[60]=C_h_intern(&lf[60],30,"\010compilerbroken-constant-nodes");
+lf[61]=C_h_intern(&lf[61],37,"\010compilerinline-substitutions-enabled");
+lf[62]=C_h_intern(&lf[62],24,"\010compilerdirect-call-ids");
+lf[63]=C_h_intern(&lf[63],23,"\010compilerfirst-analysis");
+lf[64]=C_h_intern(&lf[64],27,"\010compilerforeign-type-table");
+lf[65]=C_h_intern(&lf[65],26,"\010compilerforeign-variables");
+lf[66]=C_h_intern(&lf[66],29,"\010compilerforeign-lambda-stubs");
+lf[67]=C_h_intern(&lf[67],22,"foreign-callback-stubs");
+lf[68]=C_h_intern(&lf[68],27,"\010compilerexternal-variables");
+lf[69]=C_h_intern(&lf[69],26,"\010compilerloop-lambda-names");
+lf[70]=C_h_intern(&lf[70],28,"\010compilerprofile-lambda-list");
+lf[71]=C_h_intern(&lf[71],29,"\010compilerprofile-lambda-index");
+lf[72]=C_h_intern(&lf[72],33,"\010compilerprofile-info-vector-name");
+lf[73]=C_h_intern(&lf[73],28,"\010compilerexternal-to-pointer");
+lf[74]=C_h_intern(&lf[74],34,"\010compilererror-is-extended-binding");
+lf[75]=C_h_intern(&lf[75],24,"\010compilerreal-name-table");
+lf[76]=C_h_intern(&lf[76],29,"\010compilerlocation-pointer-map");
+lf[77]=C_h_intern(&lf[77],34,"\010compilerpending-canonicalizations");
+lf[78]=C_h_intern(&lf[78],29,"\010compilerdefconstant-bindings");
+lf[79]=C_h_intern(&lf[79],23,"\010compilercallback-names");
+lf[80]=C_h_intern(&lf[80],23,"\010compilertoplevel-scope");
+lf[81]=C_h_intern(&lf[81],27,"\010compilertoplevel-lambda-id");
+lf[82]=C_h_intern(&lf[82],25,"\010compilercsc-control-file");
+lf[83]=C_h_intern(&lf[83],26,"\010compilerdata-declarations");
+lf[84]=C_h_intern(&lf[84],26,"\010compilerfile-requirements");
+lf[85]=C_h_intern(&lf[85],28,"\010compilerpostponed-initforms");
+lf[86]=C_h_intern(&lf[86],28,"\010compilerinitialize-compiler");
+lf[87]=C_h_intern(&lf[87],12,"vector-fill!");
+lf[88]=C_h_intern(&lf[88],11,"make-vector");
+lf[89]=C_h_intern(&lf[89],25,"\010compilermake-random-name");
+lf[90]=C_h_intern(&lf[90],12,"profile-info");
+lf[91]=C_h_intern(&lf[91],32,"\010compilercanonicalize-expression");
+lf[92]=C_h_intern(&lf[92],4,"cdar");
+lf[93]=C_h_intern(&lf[93],4,"caar");
+lf[94]=C_h_intern(&lf[94],7,"\003sysget");
+lf[95]=C_h_intern(&lf[95],16,"\004coremacro-alias");
+lf[96]=C_h_intern(&lf[96],8,"\003sysput!");
+lf[97]=C_h_intern(&lf[97],6,"gensym");
+lf[98]=C_h_intern(&lf[98],23,"\010compilerset-real-name!");
+lf[99]=C_h_intern(&lf[99],5,"quote");
+lf[100]=C_h_intern(&lf[100],19,"\003sysundefined-value");
+lf[101]=C_h_intern(&lf[101],15,"\004coreinline_ref");
+lf[102]=C_h_intern(&lf[102],36,"\010compilerforeign-type-convert-result");
+lf[103]=C_h_intern(&lf[103],30,"\010compilerfinish-foreign-result");
+lf[104]=C_h_intern(&lf[104],27,"\010compilerfinal-foreign-type");
+lf[105]=C_h_intern(&lf[105],19,"\004coreinline_loc_ref");
+lf[106]=C_h_intern(&lf[106],21,"\003sysalias-global-hook");
+lf[107]=C_h_intern(&lf[107],14,"\004coreprimitive");
+lf[108]=C_h_intern(&lf[108],18,"\003syshash-table-ref");
+lf[109]=C_h_intern(&lf[109],18,"\003syscurrent-module");
+lf[110]=C_h_intern(&lf[110],21,"\003sysmacro-environment");
+lf[111]=C_h_intern(&lf[111],22,"\003syscompile-to-closure");
+lf[112]=C_h_intern(&lf[112],28,"\003syscurrent-meta-environment");
+lf[113]=C_h_intern(&lf[113],16,"\003sysdynamic-wind");
+lf[114]=C_h_intern(&lf[114],26,"\003sysmeta-macro-environment");
+lf[115]=C_h_intern(&lf[115],27,"\010compilerunlikely-variables");
+lf[116]=C_h_intern(&lf[116],25,"\010compilercompiler-warning");
+lf[117]=C_h_intern(&lf[117],3,"var");
+lf[118]=C_decode_literal(C_heaptop,"\376B\000\000.reference to variable `~s\047 possibly unintended");
+lf[119]=C_h_intern(&lf[119],8,"keyword\077");
+lf[120]=C_h_intern(&lf[120],12,"syntax-error");
+lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\023illegal atomic form");
+lf[122]=C_h_intern(&lf[122],18,"\010compilerconstant\077");
+lf[123]=C_h_intern(&lf[123],24,"\003syssyntax-error-culprit");
+lf[124]=C_h_intern(&lf[124],2,"if");
+lf[125]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[126]=C_h_intern(&lf[126],16,"\003syscheck-syntax");
+lf[127]=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[128]=C_h_intern(&lf[128],16,"\003sysstrip-syntax");
+lf[129]=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[130]=C_h_intern(&lf[130],10,"\004corecheck");
+lf[131]=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[132]=C_h_intern(&lf[132],14,"\004coreimmutable");
+lf[133]=C_h_intern(&lf[133],22,"\010compilerhide-variable");
+lf[134]=C_h_intern(&lf[134],21,"\010compileralways-bound");
+lf[135]=C_h_intern(&lf[135],9,"\003syserror");
+lf[136]=C_h_intern(&lf[136],10,"alist-cons");
+lf[137]=C_h_intern(&lf[137],1,"c");
+lf[138]=C_h_intern(&lf[138],6,"cadadr");
+lf[139]=C_h_intern(&lf[139],14,"\004coreundefined");
+lf[140]=C_h_intern(&lf[140],5,"caadr");
+lf[141]=C_h_intern(&lf[141],23,"\004corerequire-for-syntax");
+lf[142]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[143]=C_h_intern(&lf[143],10,"lset-union");
+lf[144]=C_h_intern(&lf[144],3,"eq\077");
+lf[145]=C_h_intern(&lf[145],22,"\003syshash-table-update!");
+lf[146]=C_h_intern(&lf[146],14,"dynamic/syntax");
+lf[147]=C_h_intern(&lf[147],11,"\003sysrequire");
+lf[148]=C_h_intern(&lf[148],4,"eval");
+lf[149]=C_h_intern(&lf[149],22,"\004corerequire-extension");
+lf[150]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[151]=C_h_intern(&lf[151],22,"\003sysdo-the-right-thing");
+lf[152]=C_h_intern(&lf[152],10,"\004corebegin");
+lf[153]=C_h_intern(&lf[153],3,"ext");
+lf[154]=C_decode_literal(C_heaptop,"\376B\000\000)extension `~A\047 is currently not installed");
+lf[155]=C_h_intern(&lf[155],18,"\003sysfind-extension");
+lf[156]=C_h_intern(&lf[156],31,"\003syscanonicalize-extension-path");
+lf[157]=C_h_intern(&lf[157],17,"require-extension");
+lf[158]=C_h_intern(&lf[158],8,"feature\077");
+lf[159]=C_h_intern(&lf[159],3,"let");
+lf[160]=C_h_intern(&lf[160],8,"\004corelet");
+lf[161]=C_h_intern(&lf[161],6,"append");
+lf[162]=C_h_intern(&lf[162],21,"\003syscanonicalize-body");
+lf[163]=C_h_intern(&lf[163],4,"cons");
+lf[164]=C_h_intern(&lf[164],6,"unzip1");
+lf[165]=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[166]=C_h_intern(&lf[166],6,"letrec");
+lf[167]=C_h_intern(&lf[167],11,"\004coreletrec");
+lf[168]=C_h_intern(&lf[168],10,"\003sysappend");
+lf[169]=C_h_intern(&lf[169],9,"\004coreset!");
+lf[170]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[171]=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[172]=C_h_intern(&lf[172],6,"lambda");
+lf[173]=C_h_intern(&lf[173],11,"\004corelambda");
+lf[174]=C_h_intern(&lf[174],30,"\010compilerexpand-profile-lambda");
+lf[175]=C_h_intern(&lf[175],37,"\010compilerprocess-lambda-documentation");
+lf[176]=C_h_intern(&lf[176],5,"begin");
+lf[177]=C_h_intern(&lf[177],3,"all");
+lf[178]=C_h_intern(&lf[178],4,"some");
+lf[179]=C_h_intern(&lf[179],16,"\010compilerprofile");
+lf[180]=C_h_intern(&lf[180],26,"\010compilerbuild-lambda-list");
+lf[181]=C_h_intern(&lf[181],13,"\010compilerposq");
+lf[182]=C_h_intern(&lf[182],30,"\010compilerdecompose-lambda-list");
+lf[183]=C_h_intern(&lf[183],31,"\003sysexpand-extended-lambda-list");
+lf[184]=C_h_intern(&lf[184],25,"\003sysextended-lambda-list\077");
+lf[185]=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[186]=C_h_intern(&lf[186],10,"let-syntax");
+lf[187]=C_h_intern(&lf[187],18,"\003syser-transformer");
+lf[188]=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[189]=C_h_intern(&lf[189],13,"letrec-syntax");
+lf[190]=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[191]=C_h_intern(&lf[191],13,"define-syntax");
+lf[192]=C_h_intern(&lf[192],22,"define-compiled-syntax");
+lf[193]=C_h_intern(&lf[193],25,"\003sysenable-runtime-macros");
+lf[194]=C_h_intern(&lf[194],23,"\003syscurrent-environment");
+lf[195]=C_h_intern(&lf[195],28,"\003sysextend-macro-environment");
+lf[196]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[197]=C_h_intern(&lf[197],26,"\003sysregister-syntax-export");
+lf[198]=C_h_intern(&lf[198],5,"cdadr");
+lf[199]=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[200]=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[201]=C_h_intern(&lf[201],27,"\004coredefine-compiler-syntax");
+lf[202]=C_h_intern(&lf[202],11,"\004coresyntax");
+lf[203]=C_h_intern(&lf[203],24,"\010compilercompiler-syntax");
+lf[204]=C_h_intern(&lf[204],8,"\003syscons");
+lf[205]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[206]=C_h_intern(&lf[206],24,"\004corelet-compiler-syntax");
+lf[207]=C_h_intern(&lf[207],12,"dynamic-wind");
+lf[208]=C_h_intern(&lf[208],19,"let-compiler-syntax");
+lf[209]=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[210]=C_h_intern(&lf[210],11,"\004coremodule");
+lf[211]=C_h_intern(&lf[211],29,"\003sysinitial-macro-environment");
+lf[212]=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[213]=C_h_intern(&lf[213],7,"reverse");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\000\037not generating import library `");
+lf[215]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
+lf[216]=C_decode_literal(C_heaptop,"\376B\000\000 \047 because imports did not change");
+lf[217]=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[218]=C_decode_literal(C_heaptop,"\376B\000\000\017\012;; END OF FILE");
+lf[219]=C_h_intern(&lf[219],12,"pretty-print");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\005;;;; ");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\030 - GENERATED BY CHICKEN ");
+lf[222]=C_decode_literal(C_heaptop,"\376B\000\000\020 -*- Scheme -*-\012");
+lf[223]=C_h_intern(&lf[223],15,"chicken-version");
+lf[224]=C_h_intern(&lf[224],19,"with-output-to-file");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\033generating import library `");
+lf[226]=C_decode_literal(C_heaptop,"\376B\000\000\016\047 for module `");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\005\047 ...");
+lf[228]=C_h_intern(&lf[228],9,"read-file");
+lf[229]=C_h_intern(&lf[229],12,"file-exists\077");
+lf[230]=C_h_intern(&lf[230],32,"\003syscompiled-module-registration");
+lf[231]=C_h_intern(&lf[231],13,"string-append");
+lf[232]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[233]=C_h_intern(&lf[233],14,"symbol->string");
+lf[234]=C_h_intern(&lf[234],4,"exit");
+lf[235]=C_h_intern(&lf[235],19,"print-error-message");
+lf[236]=C_h_intern(&lf[236],18,"current-error-port");
+lf[237]=C_h_intern(&lf[237],19,"\003sysfinalize-module");
+lf[238]=C_h_intern(&lf[238],22,"with-exception-handler");
+lf[239]=C_h_intern(&lf[239],30,"call-with-current-continuation");
+lf[240]=C_h_intern(&lf[240],6,"import");
+lf[241]=C_h_intern(&lf[241],17,"import-for-syntax");
+lf[242]=C_h_intern(&lf[242],6,"syntax");
+lf[243]=C_decode_literal(C_heaptop,"\376B\000\000Imodule body of `~s\047 does not begin with `import\047 form - maybe unintended\077");
+lf[244]=C_h_intern(&lf[244],19,"\003sysregister-module");
+lf[245]=C_h_intern(&lf[245],32,"\010compilercanonicalize-begin-body");
+lf[246]=C_h_intern(&lf[246],21,"\003syssyntax-error-hook");
+lf[247]=C_h_intern(&lf[247],6,"module");
+lf[248]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
+lf[249]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
+lf[250]=C_h_intern(&lf[250],17,"\004corenamed-lambda");
+lf[251]=C_h_intern(&lf[251],16,"\004coreloop-lambda");
+lf[252]=C_h_intern(&lf[252],4,"set!");
+lf[253]=C_h_intern(&lf[253],18,"\004coreinline_update");
+lf[254]=C_h_intern(&lf[254],27,"\010compilerforeign-type-check");
+lf[255]=C_h_intern(&lf[255],38,"\010compilerforeign-type-convert-argument");
+lf[256]=C_h_intern(&lf[256],22,"\004coreinline_loc_update");
+lf[257]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment to syntactic identifier");
+lf[258]=C_decode_literal(C_heaptop,"\376B\000\000\032assignment to keyword `~S\047");
+lf[259]=C_h_intern(&lf[259],19,"\003sysundefine-macro!");
+lf[260]=C_decode_literal(C_heaptop,"\376B\000\000+assigned global variable `~S\047 is a macro ~A");
+lf[261]=C_h_intern(&lf[261],17,"get-output-string");
+lf[262]=C_h_intern(&lf[262],5,"write");
+lf[263]=C_h_intern(&lf[263],7,"display");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000\010in line ");
+lf[265]=C_h_intern(&lf[265],18,"open-output-string");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[267]=C_h_intern(&lf[267],10,"\003sysmacro\077");
+lf[268]=C_h_intern(&lf[268],34,"\010compileralways-bound-to-procedure");
+lf[269]=C_decode_literal(C_heaptop,"\376B\000\000/assignment to variable `~s\047 possibly unintended");
+lf[270]=C_h_intern(&lf[270],17,"\010compilerget-line");
+lf[271]=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[272]=C_h_intern(&lf[272],11,"\004coreinline");
+lf[273]=C_h_intern(&lf[273],20,"\004coreinline_allocate");
+lf[274]=C_h_intern(&lf[274],7,"\003sysmap");
+lf[275]=C_h_intern(&lf[275],19,"\004corecompiletimetoo");
+lf[276]=C_h_intern(&lf[276],23,"\004coreelaborationtimetoo");
+lf[277]=C_h_intern(&lf[277],20,"\004corecompiletimeonly");
+lf[278]=C_h_intern(&lf[278],24,"\004coreelaborationtimeonly");
+lf[279]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[280]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[281]=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[282]=C_h_intern(&lf[282],14,"foreign-lambda");
+lf[283]=C_h_intern(&lf[283],30,"\010compilerexpand-foreign-lambda");
+lf[284]=C_h_intern(&lf[284],19,"foreign-safe-lambda");
+lf[285]=C_h_intern(&lf[285],15,"foreign-lambda*");
+lf[286]=C_h_intern(&lf[286],31,"\010compilerexpand-foreign-lambda*");
+lf[287]=C_h_intern(&lf[287],20,"foreign-safe-lambda*");
+lf[288]=C_h_intern(&lf[288],17,"foreign-primitive");
+lf[289]=C_h_intern(&lf[289],33,"\010compilerexpand-foreign-primitive");
+lf[290]=C_h_intern(&lf[290],23,"define-foreign-variable");
+lf[291]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[292]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[293]=C_h_intern(&lf[293],19,"define-foreign-type");
+lf[294]=C_h_intern(&lf[294],6,"define");
+lf[295]=C_h_intern(&lf[295],10,"\003sysvalues");
+lf[296]=C_h_intern(&lf[296],19,"\003syshash-table-set!");
+lf[297]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[298]=C_h_intern(&lf[298],24,"define-external-variable");
+lf[299]=C_h_intern(&lf[299],9,"c-pointer");
+lf[300]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[301]=C_decode_literal(C_heaptop,"\376B\000\000\001&");
+lf[302]=C_h_intern(&lf[302],5,"fifth");
+lf[303]=C_h_intern(&lf[303],17,"\004corelet-location");
+lf[304]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
+lf[305]=C_h_intern(&lf[305],14,"\010compilerwords");
+lf[306]=C_h_intern(&lf[306],46,"\010compilerestimate-foreign-result-location-size");
+lf[307]=C_h_intern(&lf[307],18,"\004coredefine-inline");
+lf[308]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[309]=C_h_intern(&lf[309],6,"cdaddr");
+lf[310]=C_h_intern(&lf[310],15,"define-constant");
+lf[311]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[312]=C_h_intern(&lf[312],17,"\010compilerconstant");
+lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\010constant");
+lf[314]=C_h_intern(&lf[314],29,"\010compilercollapsable-literal\077");
+lf[315]=C_h_intern(&lf[315],4,"quit");
+lf[316]=C_decode_literal(C_heaptop,"\376B\000\0008error in constant evaluation of ~S for named constant ~S");
+lf[317]=C_h_intern(&lf[317],12,"\004coredeclare");
+lf[318]=C_h_intern(&lf[318],28,"\010compilerprocess-declaration");
+lf[319]=C_h_intern(&lf[319],29,"\004coreforeign-callback-wrapper");
+lf[320]=C_h_intern(&lf[320],8,"split-at");
+lf[321]=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[322]=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[323]=C_h_intern(&lf[323],25,"nonnull-unsigned-c-string");
+lf[324]=C_h_intern(&lf[324],16,"nonnull-c-string");
+lf[325]=C_h_intern(&lf[325],17,"\003sysmake-c-string");
+lf[326]=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[327]=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[328]=C_h_intern(&lf[328],18,"unsigned-c-string*");
+lf[329]=C_h_intern(&lf[329],9,"c-string*");
+lf[330]=C_h_intern(&lf[330],13,"c-string-list");
+lf[331]=C_h_intern(&lf[331],14,"c-string-list*");
+lf[332]=C_decode_literal(C_heaptop,"\376B\000\000/not a valid result type for callback procedures");
+lf[333]=C_h_intern(&lf[333],8,"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\021unsigned-c-string\376\377\016");
+lf[335]=C_h_intern(&lf[335],17,"unsigned-c-string");
+lf[336]=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[337]=C_h_intern(&lf[337],1,"r");
+lf[338]=C_h_intern(&lf[338],3,"and");
+lf[339]=C_decode_literal(C_heaptop,"\376B\000\000Anon-matching or invalid argument list to foreign callback-wrapper");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000<name `~S\047 of external definition is not a valid C identifier");
+lf[341]=C_h_intern(&lf[341],28,"\010compilervalid-c-identifier\077");
+lf[342]=C_h_intern(&lf[342],8,"location");
+lf[343]=C_h_intern(&lf[343],17,"\003sysmake-locative");
+lf[344]=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[345]=C_h_intern(&lf[345],13,"\004corecallunit");
+lf[346]=C_h_intern(&lf[346],37,"\010compilerupdate-line-number-database!");
+lf[347]=C_h_intern(&lf[347],10,"\003sysexpand");
+lf[348]=C_decode_literal(C_heaptop,"\376B\000\000\030) - malformed expression");
+lf[349]=C_decode_literal(C_heaptop,"\376B\000\000\011(in line ");
+lf[350]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[351]=C_h_intern(&lf[351],31,"\010compileremit-syntax-trace-info");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\000 literal in operator position: ~S");
+lf[353]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[354]=C_h_intern(&lf[354],26,"\010compilerinternal-bindings");
+lf[355]=C_h_intern(&lf[355],22,"\003sysclear-trace-buffer");
+lf[356]=C_h_intern(&lf[356],26,"\010compilerdebugging-chicken");
+lf[357]=C_h_intern(&lf[357],7,"newline");
+lf[358]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
+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],4,"uses");
+lf[361]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[362]=C_h_intern(&lf[362],29,"\010compilerstring->c-identifier");
+lf[363]=C_h_intern(&lf[363],18,"\010compilerstringify");
+lf[364]=C_h_intern(&lf[364],6,"static");
+lf[365]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[366]=C_h_intern(&lf[366],17,"register-feature!");
+lf[367]=C_h_intern(&lf[367],4,"unit");
+lf[368]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[369]=C_h_intern(&lf[369],5,"usage");
+lf[370]=C_decode_literal(C_heaptop,"\376B\000\0003unit was already given a name (new name is ignored)");
+lf[371]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[372]=C_h_intern(&lf[372],34,"\010compilerdefault-standard-bindings");
+lf[373]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[374]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[375]=C_h_intern(&lf[375],34,"\010compilerdefault-extended-bindings");
+lf[376]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[377]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[378]=C_h_intern(&lf[378],18,"usual-integrations");
+lf[379]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+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],17,"lset-intersection");
+lf[382]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[383]=C_h_intern(&lf[383],6,"fixnum");
+lf[384]=C_h_intern(&lf[384],17,"fixnum-arithmetic");
+lf[385]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[386]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+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],4,"safe");
+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],15,"no-bound-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],14,"no-argc-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],19,"no-procedure-checks");
+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,"interrupts-enabled");
+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],18,"disable-interrupts");
+lf[399]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[400]=C_h_intern(&lf[400],15,"disable-warning");
+lf[401]=C_h_intern(&lf[401],26,"\010compilerdisabled-warnings");
+lf[402]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[403]=C_h_intern(&lf[403],12,"always-bound");
+lf[404]=C_h_intern(&lf[404],12,"\003sysfor-each");
+lf[405]=C_h_intern(&lf[405],12,"safe-globals");
+lf[406]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[407]=C_h_intern(&lf[407],38,"no-procedure-checks-for-usual-bindings");
+lf[408]=C_h_intern(&lf[408],18,"bound-to-procedure");
+lf[409]=C_h_intern(&lf[409],15,"foreign-declare");
+lf[410]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[411]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid declaration");
+lf[412]=C_h_intern(&lf[412],5,"every");
+lf[413]=C_h_intern(&lf[413],7,"string\077");
+lf[414]=C_h_intern(&lf[414],9,"c-options");
+lf[415]=C_h_intern(&lf[415],31,"\010compileremit-control-file-item");
+lf[416]=C_h_intern(&lf[416],12,"link-options");
+lf[417]=C_h_intern(&lf[417],12,"post-process");
+lf[418]=C_h_intern(&lf[418],17,"string-substitute");
+lf[419]=C_decode_literal(C_heaptop,"\376B\000\000\003\134$@");
+lf[420]=C_h_intern(&lf[420],24,"pathname-strip-extension");
+lf[421]=C_h_intern(&lf[421],5,"block");
+lf[422]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[423]=C_h_intern(&lf[423],8,"separate");
+lf[424]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[425]=C_h_intern(&lf[425],20,"keep-shadowed-macros");
+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,"unused");
+lf[428]=C_h_intern(&lf[428],15,"\010compilerunused");
+lf[429]=C_h_intern(&lf[429],3,"not");
+lf[430]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[431]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[432]=C_h_intern(&lf[432],15,"lset-difference");
+lf[433]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+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],6,"inline");
+lf[436]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[437]=C_h_intern(&lf[437],2,"no");
+lf[438]=C_h_intern(&lf[438],15,"\010compilerinline");
+lf[439]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+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],13,"inline-global");
+lf[442]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[443]=C_h_intern(&lf[443],22,"\010compilerinline-global");
+lf[444]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[445]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
+lf[447]=C_h_intern(&lf[447],14,"compile-syntax");
+lf[448]=C_h_intern(&lf[448],15,"run-time-macros");
+lf[449]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[450]=C_h_intern(&lf[450],12,"block-global");
+lf[451]=C_h_intern(&lf[451],4,"hide");
+lf[452]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[453]=C_h_intern(&lf[453],6,"export");
+lf[454]=C_h_intern(&lf[454],24,"\010compilerexport-variable");
+lf[455]=C_h_intern(&lf[455],30,"emit-external-prototypes-first");
+lf[456]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[457]=C_h_intern(&lf[457],11,"lambda-lift");
+lf[458]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[459]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[460]=C_h_intern(&lf[460],3,"yes");
+lf[461]=C_h_intern(&lf[461],12,"inline-limit");
+lf[462]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[463]=C_decode_literal(C_heaptop,"\376B\000\0002invalid argument to `inline-limit\047 declaration: ~s");
+lf[464]=C_h_intern(&lf[464],8,"constant");
+lf[465]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000/invalid arguments to `constant\047 declaration: ~S");
+lf[467]=C_h_intern(&lf[467],7,"symbol\077");
+lf[468]=C_h_intern(&lf[468],19,"emit-import-library");
+lf[469]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[470]=C_decode_literal(C_heaptop,"\376B\000\000\013.import.scm");
+lf[471]=C_decode_literal(C_heaptop,"\376B\000\000(invalid import-library specification: ~s");
+lf[472]=C_h_intern(&lf[472],7,"profile");
+lf[473]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[474]=C_h_intern(&lf[474],20,"profiled-propcedures");
+lf[475]=C_h_intern(&lf[475],5,"local");
+lf[476]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[477]=C_h_intern(&lf[477],14,"\010compilerlocal");
+lf[478]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[479]=C_h_intern(&lf[479],4,"type");
+lf[480]=C_h_intern(&lf[480],18,"\004coredeclared-type");
+lf[481]=C_h_intern(&lf[481],9,"\004coretype");
+lf[482]=C_decode_literal(C_heaptop,"\376B\000\000$illegal `type\047 declaration item `~s\047");
+lf[483]=C_h_intern(&lf[483],10,"scrutinize");
+lf[484]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[485]=C_decode_literal(C_heaptop,"\376B\000\000\042illegal declaration specifier `~s\047");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000!invalid declaration specification");
+lf[487]=C_h_intern(&lf[487],17,"make-foreign-stub");
+lf[488]=C_h_intern(&lf[488],12,"foreign-stub");
+lf[489]=C_h_intern(&lf[489],13,"foreign-stub\077");
+lf[490]=C_h_intern(&lf[490],15,"foreign-stub-id");
+lf[491]=C_h_intern(&lf[491],24,"foreign-stub-return-type");
+lf[492]=C_h_intern(&lf[492],17,"foreign-stub-name");
+lf[493]=C_h_intern(&lf[493],27,"foreign-stub-argument-types");
+lf[494]=C_h_intern(&lf[494],27,"foreign-stub-argument-names");
+lf[495]=C_h_intern(&lf[495],17,"foreign-stub-body");
+lf[496]=C_h_intern(&lf[496],16,"foreign-stub-cps");
+lf[497]=C_h_intern(&lf[497],21,"foreign-stub-callback");
+lf[498]=C_h_intern(&lf[498],28,"\010compilercreate-foreign-stub");
+lf[499]=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[500]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[501]=C_decode_literal(C_heaptop,"\376B\000\000\020C_a_i_bytevector");
+lf[502]=C_h_intern(&lf[502],37,"\010compilerestimate-foreign-result-size");
+lf[503]=C_h_intern(&lf[503],4,"stub");
+lf[504]=C_h_intern(&lf[504],1,"a");
+lf[505]=C_h_intern(&lf[505],13,"list-tabulate");
+lf[506]=C_decode_literal(C_heaptop,"\376B\000\000-name `~s\047 of foreign procedure has wrong type");
+lf[507]=C_h_intern(&lf[507],4,"cadr");
+lf[508]=C_h_intern(&lf[508],3,"car");
+lf[509]=C_h_intern(&lf[509],4,"void");
+lf[510]=C_h_intern(&lf[510],24,"\003sysline-number-database");
+lf[511]=C_h_intern(&lf[511],31,"\010compilerperform-cps-conversion");
+lf[512]=C_h_intern(&lf[512],4,"node");
+lf[513]=C_h_intern(&lf[513],9,"\004corecall");
+lf[514]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[515]=C_h_intern(&lf[515],16,"\010compilervarnode");
+lf[516]=C_h_intern(&lf[516],1,"k");
+lf[517]=C_h_intern(&lf[517],13,"\004corevariable");
+lf[518]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[519]=C_h_intern(&lf[519],2,"f_");
+lf[520]=C_h_intern(&lf[520],1,"t");
+lf[521]=C_h_intern(&lf[521],26,"make-foreign-callback-stub");
+lf[522]=C_h_intern(&lf[522],13,"\010compilerbomb");
+lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\016bad node (cps)");
+lf[524]=C_h_intern(&lf[524],15,"\004coreglobal-ref");
+lf[525]=C_h_intern(&lf[525],5,"cons*");
+lf[526]=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[527]=C_h_intern(&lf[527],6,"values");
+lf[528]=C_h_intern(&lf[528],21,"foreign-callback-stub");
+lf[529]=C_h_intern(&lf[529],22,"foreign-callback-stub\077");
+lf[530]=C_h_intern(&lf[530],24,"foreign-callback-stub-id");
+lf[531]=C_h_intern(&lf[531],26,"foreign-callback-stub-name");
+lf[532]=C_h_intern(&lf[532],32,"foreign-callback-stub-qualifiers");
+lf[533]=C_h_intern(&lf[533],33,"foreign-callback-stub-return-type");
+lf[534]=C_h_intern(&lf[534],36,"foreign-callback-stub-argument-types");
+lf[535]=C_h_intern(&lf[535],27,"\010compileranalyze-expression");
+lf[536]=C_h_intern(&lf[536],13,"\010compilerput!");
+lf[537]=C_h_intern(&lf[537],8,"captured");
+lf[538]=C_h_intern(&lf[538],6,"global");
+lf[539]=C_h_intern(&lf[539],12,"\010compilerget");
+lf[540]=C_h_intern(&lf[540],12,"\004corerecurse");
+lf[541]=C_h_intern(&lf[541],44,"\010compileroptimizable-rest-argument-operators");
+lf[542]=C_h_intern(&lf[542],15,"\010compilercount!");
+lf[543]=C_h_intern(&lf[543],16,"o-r/access-count");
+lf[544]=C_h_intern(&lf[544],14,"rest-parameter");
+lf[545]=C_h_intern(&lf[545],18,"\010compilerintrinsic");
+lf[546]=C_h_intern(&lf[546],17,"\010compilercollect!");
+lf[547]=C_h_intern(&lf[547],10,"call-sites");
+lf[548]=C_h_intern(&lf[548],4,"home");
+lf[549]=C_h_intern(&lf[549],7,"unknown");
+lf[550]=C_h_intern(&lf[550],18,"\004coredirect_lambda");
+lf[551]=C_h_intern(&lf[551],6,"simple");
+lf[552]=C_h_intern(&lf[552],28,"\010compilersimple-lambda-node\077");
+lf[553]=C_h_intern(&lf[553],6,"vector");
+lf[554]=C_h_intern(&lf[554],4,"list");
+lf[555]=C_h_intern(&lf[555],12,"contained-in");
+lf[556]=C_h_intern(&lf[556],8,"contains");
+lf[557]=C_h_intern(&lf[557],8,"assigned");
+lf[558]=C_h_intern(&lf[558],16,"assigned-locally");
+lf[559]=C_h_intern(&lf[559],15,"potential-value");
+lf[560]=C_h_intern(&lf[560],8,"standard");
+lf[561]=C_h_intern(&lf[561],5,"redef");
+lf[562]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of standard binding `~S\047");
+lf[563]=C_h_intern(&lf[563],8,"extended");
+lf[564]=C_decode_literal(C_heaptop,"\376B\000\000%redefinition of extended binding `~S\047");
+lf[565]=C_h_intern(&lf[565],9,"\004coreproc");
+lf[566]=C_h_intern(&lf[566],9,"undefined");
+lf[567]=C_h_intern(&lf[567],5,"value");
+lf[568]=C_h_intern(&lf[568],16,"\010compilerget-all");
+lf[569]=C_h_intern(&lf[569],11,"local-value");
+lf[570]=C_h_intern(&lf[570],26,"\010compilervariable-visible\077");
+lf[571]=C_h_intern(&lf[571],10,"references");
+lf[572]=C_h_intern(&lf[572],3,"any");
+lf[573]=C_h_intern(&lf[573],11,"lset-adjoin");
+lf[574]=C_h_intern(&lf[574],9,"replacing");
+lf[575]=C_h_intern(&lf[575],10,"replacable");
+lf[576]=C_h_intern(&lf[576],9,"removable");
+lf[577]=C_h_intern(&lf[577],37,"\010compilerexpression-has-side-effects\077");
+lf[578]=C_h_intern(&lf[578],21,"has-unused-parameters");
+lf[579]=C_h_intern(&lf[579],13,"explicit-rest");
+lf[580]=C_h_intern(&lf[580],11,"collapsable");
+lf[581]=C_h_intern(&lf[581],12,"contractable");
+lf[582]=C_h_intern(&lf[582],9,"inlinable");
+lf[583]=C_h_intern(&lf[583],28,"\010compilerscan-free-variables");
+lf[584]=C_h_intern(&lf[584],11,"hidden-refs");
+lf[585]=C_h_intern(&lf[585],18,"\010compilerdebugging");
+lf[586]=C_h_intern(&lf[586],1,"i");
+lf[587]=C_decode_literal(C_heaptop,"\376B\000\000>global inlining candidate was assigned and will not be inlined");
+lf[588]=C_h_intern(&lf[588],5,"boxed");
+lf[589]=C_decode_literal(C_heaptop,"\376B\000\000\042global variable `~S\047 is never used");
+lf[590]=C_decode_literal(C_heaptop,"\376B\000\000:local assignment to unused variable `~S\047 may be unintended");
+lf[591]=C_h_intern(&lf[591],23,"\003syshash-table-for-each");
+lf[592]=C_h_intern(&lf[592],1,"p");
+lf[593]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis gathering phase...");
+lf[594]=C_decode_literal(C_heaptop,"\376B\000\000\033analysis traversal phase...");
+lf[595]=C_h_intern(&lf[595],35,"\010compilerperform-closure-conversion");
+lf[596]=C_h_intern(&lf[596],12,"customizable");
+lf[597]=C_h_intern(&lf[597],20,"node-parameters-set!");
+lf[598]=C_decode_literal(C_heaptop,"\376B\000\0009known procedure called with wrong number of arguments: ~A");
+lf[599]=C_h_intern(&lf[599],28,"\010compilersource-info->string");
+lf[600]=C_h_intern(&lf[600],21,"\010compilerllist-length");
+lf[601]=C_h_intern(&lf[601],8,"toplevel");
+lf[602]=C_h_intern(&lf[602],18,"captured-variables");
+lf[603]=C_h_intern(&lf[603],12,"closure-size");
+lf[604]=C_h_intern(&lf[604],10,"\004coreunbox");
+lf[605]=C_h_intern(&lf[605],8,"\004corebox");
+lf[606]=C_h_intern(&lf[606],12,"\004coreclosure");
+lf[607]=C_h_intern(&lf[607],14,"\010compilerqnode");
+lf[608]=C_h_intern(&lf[608],20,"\003sysmake-lambda-info");
+lf[609]=C_h_intern(&lf[609],8,"->string");
+lf[610]=C_h_intern(&lf[610],1,"\077");
+lf[611]=C_h_intern(&lf[611],18,"\010compilerreal-name");
+lf[612]=C_h_intern(&lf[612],10,"fold-right");
+lf[613]=C_h_intern(&lf[613],10,"boxed-rest");
+lf[614]=C_h_intern(&lf[614],6,"filter");
+lf[615]=C_h_intern(&lf[615],16,"\004coreupdatebox_i");
+lf[616]=C_h_intern(&lf[616],14,"\004coreupdatebox");
+lf[617]=C_h_intern(&lf[617],8,"\004coreref");
+lf[618]=C_h_intern(&lf[618],13,"\004coreupdate_i");
+lf[619]=C_h_intern(&lf[619],11,"\004coreupdate");
+lf[620]=C_h_intern(&lf[620],19,"\010compilerimmediate\077");
+lf[621]=C_decode_literal(C_heaptop,"\376B\000\000\023bad node (closure2)");
+lf[622]=C_h_intern(&lf[622],11,"\004coreswitch");
+lf[623]=C_h_intern(&lf[623],9,"\004corecond");
+lf[624]=C_h_intern(&lf[624],16,"\004coredirect_call");
+lf[625]=C_h_intern(&lf[625],11,"\004corereturn");
+lf[626]=C_h_intern(&lf[626],1,"o");
+lf[627]=C_decode_literal(C_heaptop,"\376B\000\000\026calls to known targets");
+lf[628]=C_h_intern(&lf[628],16,"\003sysmake-promise");
+lf[629]=C_decode_literal(C_heaptop,"\376B\000\000*closure conversion transformation phase...");
+lf[630]=C_decode_literal(C_heaptop,"\376B\000\000\027customizable procedures");
+lf[631]=C_decode_literal(C_heaptop,"\376B\000\000%closure conversion gathering phase...");
+lf[632]=C_h_intern(&lf[632],19,"make-lambda-literal");
+lf[633]=C_h_intern(&lf[633],14,"lambda-literal");
+lf[634]=C_h_intern(&lf[634],15,"lambda-literal\077");
+lf[635]=C_h_intern(&lf[635],17,"lambda-literal-id");
+lf[636]=C_h_intern(&lf[636],23,"lambda-literal-external");
+lf[637]=C_h_intern(&lf[637],24,"lambda-literal-arguments");
+lf[638]=C_h_intern(&lf[638],29,"lambda-literal-argument-count");
+lf[639]=C_h_intern(&lf[639],28,"lambda-literal-rest-argument");
+lf[640]=C_h_intern(&lf[640],26,"lambda-literal-temporaries");
+lf[641]=C_h_intern(&lf[641],32,"lambda-literal-callee-signatures");
+lf[642]=C_h_intern(&lf[642],24,"lambda-literal-allocated");
+lf[643]=C_h_intern(&lf[643],30,"lambda-literal-directly-called");
+lf[644]=C_h_intern(&lf[644],27,"lambda-literal-closure-size");
+lf[645]=C_h_intern(&lf[645],22,"lambda-literal-looping");
+lf[646]=C_h_intern(&lf[646],27,"lambda-literal-customizable");
+lf[647]=C_h_intern(&lf[647],33,"lambda-literal-rest-argument-mode");
+lf[648]=C_h_intern(&lf[648],19,"lambda-literal-body");
+lf[649]=C_h_intern(&lf[649],21,"lambda-literal-direct");
+lf[650]=C_h_intern(&lf[650],36,"\010compilerprepare-for-code-generation");
+lf[651]=C_h_intern(&lf[651],10,"\004corelocal");
+lf[652]=C_h_intern(&lf[652],12,"\004coreliteral");
+lf[653]=C_h_intern(&lf[653],11,"\004coreglobal");
+lf[654]=C_decode_literal(C_heaptop,"\376B\000\000!identified direct recursive calls");
+lf[655]=C_decode_literal(C_heaptop,"\376B\000\000\021bad direct lambda");
+lf[656]=C_h_intern(&lf[656],4,"none");
+lf[657]=C_decode_literal(C_heaptop,"\376B\000\000\024unused rest argument");
+lf[658]=C_decode_literal(C_heaptop,"\376B\000\000 rest argument accessed as vector");
+lf[659]=C_h_intern(&lf[659],7,"butlast");
+lf[660]=C_h_intern(&lf[660],9,"\004corebind");
+lf[661]=C_h_intern(&lf[661],13,"\004coresetlocal");
+lf[662]=C_h_intern(&lf[662],16,"\004coresetglobal_i");
+lf[663]=C_h_intern(&lf[663],14,"\004coresetglobal");
+lf[664]=C_h_intern(&lf[664],1,"=");
+lf[665]=C_decode_literal(C_heaptop,"\376B\000\0000coerced inexact literal number `~S\047 to fixnum ~S");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000,cannot coerce inexact literal `~S\047 to fixnum");
+lf[667]=C_h_intern(&lf[667],20,"\010compilerbig-fixnum\077");
+lf[668]=C_h_intern(&lf[668],3,"max");
+lf[669]=C_h_intern(&lf[669],10,"list-index");
+lf[670]=C_h_intern(&lf[670],36,"\010compilermake-block-variable-literal");
+lf[671]=C_h_intern(&lf[671],36,"\010compilerblock-variable-literal-name");
+lf[672]=C_h_intern(&lf[672],32,"\010compilerblock-variable-literal\077");
+lf[673]=C_h_intern(&lf[673],14,"\004coreimmediate");
+lf[674]=C_h_intern(&lf[674],3,"fix");
+lf[675]=C_h_intern(&lf[675],4,"bool");
+lf[676]=C_h_intern(&lf[676],4,"char");
+lf[677]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003nil\376\377\016");
+lf[678]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003eof\376\377\016");
+lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\027bad immediate (prepare)");
+lf[680]=C_decode_literal(C_heaptop,"\376B\000\000\027fast global assignments");
+lf[681]=C_decode_literal(C_heaptop,"\376B\000\000\026fast global references");
+lf[682]=C_decode_literal(C_heaptop,"\376B\000\000\030fast box initializations");
+lf[683]=C_decode_literal(C_heaptop,"\376B\000\000\024preparation phase...");
+C_register_lf2(lf,684,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c384 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5137,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t3);}
+
+/* k5135 */
+static void C_ccall f_5137(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5137,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5140,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k5138 in k5135 */
+static void C_ccall f_5140(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[94],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5140,2,t0,t1);}
+t2=C_mutate((C_word*)lf[2]+1 /* (set! d ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5142,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] /* rest-parameters-promoted-to-vector */,0,C_SCHEME_END_OF_LIST);
+t53=C_set_block_item(lf[56] /* inline-table */,0,C_SCHEME_FALSE);
+t54=C_set_block_item(lf[57] /* inline-table-used */,0,C_SCHEME_FALSE);
+t55=C_set_block_item(lf[58] /* constant-table */,0,C_SCHEME_FALSE);
+t56=C_set_block_item(lf[59] /* constants-used */,0,C_SCHEME_FALSE);
+t57=C_set_block_item(lf[60] /* broken-constant-nodes */,0,C_SCHEME_END_OF_LIST);
+t58=C_set_block_item(lf[61] /* inline-substitutions-enabled */,0,C_SCHEME_FALSE);
+t59=C_set_block_item(lf[62] /* direct-call-ids */,0,C_SCHEME_END_OF_LIST);
+t60=C_set_block_item(lf[63] /* first-analysis */,0,C_SCHEME_TRUE);
+t61=C_set_block_item(lf[64] /* foreign-type-table */,0,C_SCHEME_FALSE);
+t62=C_set_block_item(lf[65] /* foreign-variables */,0,C_SCHEME_END_OF_LIST);
+t63=C_set_block_item(lf[66] /* foreign-lambda-stubs */,0,C_SCHEME_END_OF_LIST);
+t64=C_set_block_item(lf[67] /* foreign-callback-stubs */,0,C_SCHEME_END_OF_LIST);
+t65=C_set_block_item(lf[68] /* external-variables */,0,C_SCHEME_END_OF_LIST);
+t66=C_set_block_item(lf[69] /* loop-lambda-names */,0,C_SCHEME_END_OF_LIST);
+t67=C_set_block_item(lf[70] /* profile-lambda-list */,0,C_SCHEME_END_OF_LIST);
+t68=C_set_block_item(lf[71] /* profile-lambda-index */,0,C_fix(0));
+t69=C_set_block_item(lf[72] /* profile-info-vector-name */,0,C_SCHEME_FALSE);
+t70=C_set_block_item(lf[73] /* external-to-pointer */,0,C_SCHEME_END_OF_LIST);
+t71=C_set_block_item(lf[74] /* error-is-extended-binding */,0,C_SCHEME_FALSE);
+t72=C_set_block_item(lf[75] /* real-name-table */,0,C_SCHEME_FALSE);
+t73=C_set_block_item(lf[76] /* location-pointer-map */,0,C_SCHEME_END_OF_LIST);
+t74=C_set_block_item(lf[77] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
+t75=C_set_block_item(lf[78] /* defconstant-bindings */,0,C_SCHEME_END_OF_LIST);
+t76=C_set_block_item(lf[79] /* callback-names */,0,C_SCHEME_END_OF_LIST);
+t77=C_set_block_item(lf[80] /* toplevel-scope */,0,C_SCHEME_TRUE);
+t78=C_set_block_item(lf[81] /* toplevel-lambda-id */,0,C_SCHEME_FALSE);
+t79=C_set_block_item(lf[82] /* csc-control-file */,0,C_SCHEME_FALSE);
+t80=C_set_block_item(lf[83] /* data-declarations */,0,C_SCHEME_END_OF_LIST);
+t81=C_set_block_item(lf[84] /* file-requirements */,0,C_SCHEME_FALSE);
+t82=C_set_block_item(lf[85] /* postponed-initforms */,0,C_SCHEME_END_OF_LIST);
+t83=C_mutate((C_word*)lf[86]+1 /* (set! initialize-compiler ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5237,tmp=(C_word)a,a+=2,tmp));
+t84=C_mutate((C_word*)lf[91]+1 /* (set! canonicalize-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5298,tmp=(C_word)a,a+=2,tmp));
+t85=C_mutate((C_word*)lf[318]+1 /* (set! process-declaration ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10418,tmp=(C_word)a,a+=2,tmp));
+t86=C_mutate((C_word*)lf[487]+1 /* (set! make-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12118,tmp=(C_word)a,a+=2,tmp));
+t87=C_mutate((C_word*)lf[489]+1 /* (set! foreign-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12124,tmp=(C_word)a,a+=2,tmp));
+t88=C_mutate((C_word*)lf[490]+1 /* (set! foreign-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12130,tmp=(C_word)a,a+=2,tmp));
+t89=C_mutate((C_word*)lf[491]+1 /* (set! foreign-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12139,tmp=(C_word)a,a+=2,tmp));
+t90=C_mutate((C_word*)lf[492]+1 /* (set! foreign-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12148,tmp=(C_word)a,a+=2,tmp));
+t91=C_mutate((C_word*)lf[493]+1 /* (set! foreign-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12157,tmp=(C_word)a,a+=2,tmp));
+t92=C_mutate((C_word*)lf[494]+1 /* (set! foreign-stub-argument-names ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12166,tmp=(C_word)a,a+=2,tmp));
+t93=C_mutate((C_word*)lf[495]+1 /* (set! foreign-stub-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12175,tmp=(C_word)a,a+=2,tmp));
+t94=C_mutate((C_word*)lf[496]+1 /* (set! foreign-stub-cps ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12184,tmp=(C_word)a,a+=2,tmp));
+t95=C_mutate((C_word*)lf[497]+1 /* (set! foreign-stub-callback ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12193,tmp=(C_word)a,a+=2,tmp));
+t96=C_mutate((C_word*)lf[498]+1 /* (set! create-foreign-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12202,tmp=(C_word)a,a+=2,tmp));
+t97=C_mutate((C_word*)lf[283]+1 /* (set! expand-foreign-lambda ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12446,tmp=(C_word)a,a+=2,tmp));
+t98=C_mutate((C_word*)lf[286]+1 /* (set! expand-foreign-lambda* ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12483,tmp=(C_word)a,a+=2,tmp));
+t99=C_mutate((C_word*)lf[289]+1 /* (set! expand-foreign-primitive ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12582,tmp=(C_word)a,a+=2,tmp));
+t100=C_mutate((C_word*)lf[346]+1 /* (set! update-line-number-database! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12721,tmp=(C_word)a,a+=2,tmp));
+t101=C_mutate((C_word*)lf[511]+1 /* (set! perform-cps-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12811,tmp=(C_word)a,a+=2,tmp));
+t102=C_mutate((C_word*)lf[521]+1 /* (set! make-foreign-callback-stub ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13670,tmp=(C_word)a,a+=2,tmp));
+t103=C_mutate((C_word*)lf[529]+1 /* (set! foreign-callback-stub? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13676,tmp=(C_word)a,a+=2,tmp));
+t104=C_mutate((C_word*)lf[530]+1 /* (set! foreign-callback-stub-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13682,tmp=(C_word)a,a+=2,tmp));
+t105=C_mutate((C_word*)lf[531]+1 /* (set! foreign-callback-stub-name ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13691,tmp=(C_word)a,a+=2,tmp));
+t106=C_mutate((C_word*)lf[532]+1 /* (set! foreign-callback-stub-qualifiers ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13700,tmp=(C_word)a,a+=2,tmp));
+t107=C_mutate((C_word*)lf[533]+1 /* (set! foreign-callback-stub-return-type ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13709,tmp=(C_word)a,a+=2,tmp));
+t108=C_mutate((C_word*)lf[534]+1 /* (set! foreign-callback-stub-argument-types ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13718,tmp=(C_word)a,a+=2,tmp));
+t109=C_mutate((C_word*)lf[535]+1 /* (set! analyze-expression ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13727,tmp=(C_word)a,a+=2,tmp));
+t110=C_mutate((C_word*)lf[595]+1 /* (set! perform-closure-conversion ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15804,tmp=(C_word)a,a+=2,tmp));
+t111=C_mutate((C_word*)lf[632]+1 /* (set! make-lambda-literal ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17564,tmp=(C_word)a,a+=2,tmp));
+t112=C_mutate((C_word*)lf[634]+1 /* (set! lambda-literal? ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17570,tmp=(C_word)a,a+=2,tmp));
+t113=C_mutate((C_word*)lf[635]+1 /* (set! lambda-literal-id ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17576,tmp=(C_word)a,a+=2,tmp));
+t114=C_mutate((C_word*)lf[636]+1 /* (set! lambda-literal-external ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17585,tmp=(C_word)a,a+=2,tmp));
+t115=C_mutate((C_word*)lf[637]+1 /* (set! lambda-literal-arguments ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17594,tmp=(C_word)a,a+=2,tmp));
+t116=C_mutate((C_word*)lf[638]+1 /* (set! lambda-literal-argument-count ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17603,tmp=(C_word)a,a+=2,tmp));
+t117=C_mutate((C_word*)lf[639]+1 /* (set! lambda-literal-rest-argument ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17612,tmp=(C_word)a,a+=2,tmp));
+t118=C_mutate((C_word*)lf[640]+1 /* (set! lambda-literal-temporaries ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17621,tmp=(C_word)a,a+=2,tmp));
+t119=C_mutate((C_word*)lf[641]+1 /* (set! lambda-literal-callee-signatures ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17630,tmp=(C_word)a,a+=2,tmp));
+t120=C_mutate((C_word*)lf[642]+1 /* (set! lambda-literal-allocated ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17639,tmp=(C_word)a,a+=2,tmp));
+t121=C_mutate((C_word*)lf[643]+1 /* (set! lambda-literal-directly-called ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17648,tmp=(C_word)a,a+=2,tmp));
+t122=C_mutate((C_word*)lf[644]+1 /* (set! lambda-literal-closure-size ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17657,tmp=(C_word)a,a+=2,tmp));
+t123=C_mutate((C_word*)lf[645]+1 /* (set! lambda-literal-looping ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17666,tmp=(C_word)a,a+=2,tmp));
+t124=C_mutate((C_word*)lf[646]+1 /* (set! lambda-literal-customizable ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17675,tmp=(C_word)a,a+=2,tmp));
+t125=C_mutate((C_word*)lf[647]+1 /* (set! lambda-literal-rest-argument-mode ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17684,tmp=(C_word)a,a+=2,tmp));
+t126=C_mutate((C_word*)lf[648]+1 /* (set! lambda-literal-body ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17693,tmp=(C_word)a,a+=2,tmp));
+t127=C_mutate((C_word*)lf[649]+1 /* (set! lambda-literal-direct ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17702,tmp=(C_word)a,a+=2,tmp));
+t128=C_mutate((C_word*)lf[650]+1 /* (set! prepare-for-code-generation ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_17711,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 k5138 in k5135 */
+static void C_ccall f_17711(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 ab[92],*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_17711,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_fix(0);
+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_SCHEME_END_OF_LIST;
+t17=(*a=C_VECTOR_TYPE|1,a[1]=t16,tmp=(C_word)a,a+=2,tmp);
+t18=C_fix(0);
+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_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(t25,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17714,a[2]=t27,a[3]=t33,tmp=(C_word)a,a+=4,tmp));
+t41=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17765,a[2]=t3,a[3]=t21,a[4]=t33,a[5]=t37,tmp=(C_word)a,a+=6,tmp));
+t42=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_17838,a[2]=t39,a[3]=t23,a[4]=t33,a[5]=t37,a[6]=t3,a[7]=t9,a[8]=t15,a[9]=t17,a[10]=t11,a[11]=t19,a[12]=t29,a[13]=t31,a[14]=t13,a[15]=t27,a[16]=t25,tmp=(C_word)a,a+=17,tmp));
+t43=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18924,a[2]=t29,tmp=(C_word)a,a+=3,tmp));
+t44=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18970,a[2]=t7,a[3]=t5,a[4]=t35,a[5]=t39,tmp=(C_word)a,a+=6,tmp));
+t45=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19050,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t46=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19064,a[2]=t5,a[3]=t35,tmp=(C_word)a,a+=4,tmp));
+t47=C_set_block_item(t39,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_19096,tmp=(C_word)a,a+=2,tmp));
+t48=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19181,a[2]=t2,a[3]=t29,a[4]=t19,a[5]=t21,a[6]=t23,a[7]=t9,a[8]=t7,a[9]=t5,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 2672 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t48,lf[592],lf[683]);}
+
+/* k19179 in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19181(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_19181,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19184,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: 2673 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_17838(t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
+
+/* k19182 in k19179 in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19184(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_19184,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19187,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: 2674 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[585]))(5,*((C_word*)lf[585]+1),t2,lf[626],lf[682],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k19185 in k19182 in k19179 in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_19187,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19190,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: 2675 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[585]))(5,*((C_word*)lf[585]+1),t2,lf[626],lf[681],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k19188 in k19185 in k19182 in k19179 in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19190(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_19190,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19193,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: 2676 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[585]))(5,*((C_word*)lf[585]+1),t2,lf[626],lf[680],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k19191 in k19188 in k19185 in k19182 in k19179 in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19193(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2677 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 k5138 in k5135 */
+static void C_fcall f_19096(C_word 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_19096,NULL,2,t1,t2);}
+t3=C_retrieve(lf[100]);
+t4=(C_word)C_eqp(t3,t2);
+if(C_truep(t4)){
+t5=t1;
+t6=t5;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_record(&a,4,lf[512],lf[139],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
+else{
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19123,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fixnump(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,lf[674],t6);
+t8=t1;
+t9=t8;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+else{
+if(C_truep((C_word)C_booleanp(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,lf[675],t6);
+t8=t1;
+t9=t8;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+else{
+if(C_truep((C_word)C_charp(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,lf[676],t6);
+t8=t1;
+t9=t8;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t7,C_SCHEME_END_OF_LIST));}
+else{
+if(C_truep((C_word)C_i_nullp(t2))){
+t6=t1;
+t7=t6;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[512],lf[673],lf[677],C_SCHEME_END_OF_LIST));}
+else{
+if(C_truep((C_word)C_eofp(t2))){
+t6=t1;
+t7=t6;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[512],lf[673],lf[678],C_SCHEME_END_OF_LIST));}
+else{
+C_trace("compiler.scm: 2669 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),t5,lf[679]);}}}}}}}
+
+/* k19121 in immediate-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19123(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_19123,2,t0,t1);}
+t2=((C_word*)t0)[2];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],lf[673],t1,C_SCHEME_END_OF_LIST));}
+
+/* blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_19064(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_19064,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19068,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_19080,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2653 list-index");
+((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t3,t4,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* a19079 in blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19080(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_19080,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19087,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2655 block-variable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[672]))(3,*((C_word*)lf[672]+1),t3,t2);}
+
+/* k19085 in a19079 in blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19087(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_19087,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19094,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2656 block-variable-literal-name");
+((C_proc3)C_retrieve_symbol_proc(lf[671]))(3,*((C_word*)lf[671]+1),t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k19092 in k19085 in a19079 in blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19094(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_eqp(((C_word*)t0)[2],t1));}
+
+/* k19066 in blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19068(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_19068,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_19078,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2658 make-block-variable-literal");
+((C_proc3)C_retrieve_symbol_proc(lf[670]))(3,*((C_word*)lf[670]+1),t2,((C_word*)t0)[2]);}}
+
+/* k19076 in k19066 in blockvar-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19078(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2658 new-literal");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_19050(t2,((C_word*)t0)[2],t1);}
+
+/* new-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_19050(C_word 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_19050,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_length(((C_word*)((C_word*)t0)[2])[1]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19058,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_a_i_list(&a,1,t2);
+C_trace("compiler.scm: 2649 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t4,((C_word*)((C_word*)t0)[2])[1],t5);}
+
+/* k19056 in new-literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+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 *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 k5138 in k5135 */
+static void C_fcall f_18970(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_18970,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18977,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: 2633 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[620]))(3,*((C_word*)lf[620]+1),t3,t2);}
+
+/* k18975 in literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18977(C_word c,C_word t0,C_word t1){
+C_word 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_18977,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 2633 immediate-literal");
+f_19096(((C_word*)t0)[6],((C_word*)t0)[5]);}
+else{
+if(C_truep((C_word)C_i_numberp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18989,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_word)C_i_inexactp(((C_word*)t0)[5]))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19003,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2636 list-index");
+((C_proc4)C_retrieve_symbol_proc(lf[669]))(4,*((C_word*)lf[669]+1),t2,t3,((C_word*)((C_word*)t0)[3])[1]);}
+else{
+C_trace("compiler.scm: 2638 new-literal");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_19050(t3,((C_word*)t0)[6],((C_word*)t0)[5]);}}
+else{
+if(C_truep((C_word)C_lambdainfop(((C_word*)t0)[5]))){
+t2=(C_word)C_i_length(((C_word*)((C_word*)t0)[2])[1]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19029,a[2]=t2,a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_a_i_list(&a,1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 2642 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,((C_word*)((C_word*)t0)[2])[1],t4);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19039,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: 2644 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t2,((C_word*)t0)[5],((C_word*)((C_word*)t0)[3])[1]);}}}}
+
+/* k19037 in k18975 in literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19039(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: 2645 new-literal");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_19050(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* k19027 in k18975 in literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19029(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_19029,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_word)C_a_i_vector(&a,1,((C_word*)t0)[2]));}
+
+/* a19002 in k18975 in literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_19003(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_19003,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_numberp(t2))){
+if(C_truep((C_word)C_i_inexactp(t2))){
+t3=((C_word*)t0)[2];
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)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);}}
+
+/* k18987 in k18975 in literal in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18989(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: 2638 new-literal");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_19050(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* mapwalk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18924(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_18924,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_18930,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_18930(t13,t1,t2);}
+
+/* loop4933 in mapwalk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18930(C_word t0,C_word 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_18930,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_18957,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_18964,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));
+C_trace("g49494950");
+t6=t3;
+f_18957(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k18962 in loop4933 in mapwalk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18964(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_18964,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));
+C_trace("loop49334946");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_18930(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));
+C_trace("loop49334946");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_18930(t6,((C_word*)t0)[3],t5);}}
+
+/* g4949 in loop4933 in mapwalk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18957(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_18957,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2630 walk");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_17838(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 *a;
+loop:
+a=C_alloc(17);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_17838,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(3));
+t8=t2;
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=t2;
+t11=(C_word)C_slot(t10,C_fix(1));
+t12=(C_word)C_eqp(t11,lf[139]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(t11,lf[565]));
+if(C_truep(t13)){
+t14=t2;
+t15=t1;
+((C_proc2)(void*)(*((C_word*)t15+1)))(2,t15,t14);}
+else{
+t14=(C_word)C_eqp(t11,lf[517]);
+if(C_truep(t14)){
+t15=(C_word)C_i_car(t9);
+C_trace("compiler.scm: 2435 walk-var");
+t16=((C_word*)((C_word*)t0)[16])[1];
+f_17714(t16,t1,t15,t3,C_SCHEME_FALSE);}
+else{
+t15=(C_word)C_eqp(t11,lf[524]);
+if(C_truep(t15)){
+t16=(C_word)C_i_car(t9);
+C_trace("compiler.scm: 2438 walk-global");
+t17=((C_word*)((C_word*)t0)[15])[1];
+f_17765(t17,t1,t16,C_SCHEME_TRUE);}
+else{
+t16=(C_word)C_eqp(t11,lf[624]);
+if(C_truep(t16)){
+t17=(C_word)C_i_cadddr(t9);
+t18=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[14])[1],t17);
+t19=C_mutate(((C_word *)((C_word*)t0)[14])+1,t18);
+t20=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17920,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2442 mapwalk");
+t21=((C_word*)((C_word*)t0)[13])[1];
+f_18924(t21,t20,t7,t3,t4,t5);}
+else{
+t17=(C_word)C_eqp(t11,lf[273]);
+if(C_truep(t17)){
+t18=(C_word)C_i_cadr(t9);
+t19=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[14])[1],t18);
+t20=C_mutate(((C_word *)((C_word*)t0)[14])+1,t19);
+t21=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17946,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2446 mapwalk");
+t22=((C_word*)((C_word*)t0)[13])[1];
+f_18924(t22,t21,t7,t3,t4,t5);}
+else{
+t18=(C_word)C_eqp(t11,lf[101]);
+if(C_truep(t18)){
+t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17972,a[2]=t9,a[3]=t11,a[4]=t1,a[5]=((C_word*)t0)[14],tmp=(C_word)a,a+=6,tmp);
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17976,a[2]=t19,tmp=(C_word)a,a+=3,tmp);
+t21=(C_word)C_i_cadr(t9);
+C_trace("compiler.scm: 2449 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[502]))(3,*((C_word*)lf[502]+1),t20,t21);}
+else{
+t19=(C_word)C_eqp(t11,lf[105]);
+if(C_truep(t19)){
+t20=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18006,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[13],a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18010,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
+t22=(C_word)C_i_car(t9);
+C_trace("compiler.scm: 2453 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[502]))(3,*((C_word*)lf[502]+1),t21,t22);}
+else{
+t20=(C_word)C_eqp(t11,lf[606]);
+if(C_truep(t20)){
+t21=(C_word)C_i_car(t9);
+t22=(C_word)C_fixnum_plus((C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[14])[1],t21),C_fix(1));
+t23=C_mutate(((C_word *)((C_word*)t0)[14])+1,t22);
+t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18036,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2458 mapwalk");
+t25=((C_word*)((C_word*)t0)[13])[1];
+f_18924(t25,t24,t7,t3,t4,t5);}
+else{
+t21=(C_word)C_eqp(t11,lf[605]);
+if(C_truep(t21)){
+t22=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[14])[1],C_fix(2));
+t23=C_mutate(((C_word *)((C_word*)t0)[14])+1,t22);
+t24=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18066,a[2]=t9,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t25=(C_word)C_i_car(t7);
+C_trace("compiler.scm: 2462 walk");
+t98=t24;
+t99=t25;
+t100=t3;
+t101=t4;
+t102=t5;
+t1=t98;
+t2=t99;
+t3=t100;
+t4=t101;
+t5=t102;
+goto loop;}
+else{
+t22=(C_word)C_eqp(t11,lf[616]);
+if(C_truep(t22)){
+t23=(C_word)C_i_car(t7);
+t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18082,a[2]=t5,a[3]=t23,a[4]=t11,a[5]=t1,a[6]=((C_word*)t0)[11],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 2466 mapwalk");
+t25=((C_word*)((C_word*)t0)[13])[1];
+f_18924(t25,t24,t7,t3,t4,t5);}
+else{
+t23=(C_word)C_eqp(t11,lf[173]);
+t24=(C_truep(t23)?t23:(C_word)C_eqp(t11,lf[550]));
+if(C_truep(t24)){
+t25=((C_word*)((C_word*)t0)[10])[1];
+t26=((C_word*)((C_word*)t0)[9])[1];
+t27=((C_word*)((C_word*)t0)[8])[1];
+t28=((C_word*)((C_word*)t0)[14])[1];
+t29=(C_word)C_eqp(t11,lf[550]);
+t30=C_set_block_item(((C_word*)t0)[10],0,C_fix(0));
+t31=C_set_block_item(((C_word*)t0)[14],0,C_fix(0));
+t32=C_set_block_item(((C_word*)t0)[9],0,C_SCHEME_END_OF_LIST);
+t33=C_set_block_item(((C_word*)t0)[8],0,C_fix(0));
+t34=(C_word)C_i_caddr(t9);
+t35=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_18154,a[2]=((C_word*)t0)[12],a[3]=t7,a[4]=((C_word*)t0)[6],a[5]=t29,a[6]=t26,a[7]=((C_word*)t0)[9],a[8]=t28,a[9]=((C_word*)t0)[14],a[10]=t25,a[11]=((C_word*)t0)[10],a[12]=t27,a[13]=((C_word*)t0)[8],a[14]=((C_word*)t0)[7],a[15]=t9,tmp=(C_word)a,a+=16,tmp);
+C_trace("compiler.scm: 2486 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),t1,t34,t35);}
+else{
+t25=(C_word)C_eqp(t11,lf[159]);
+if(C_truep(t25)){
+t26=(C_word)C_i_car(t9);
+t27=(C_word)C_i_car(t7);
+t28=(C_word)C_slot(t27,C_fix(1));
+t29=(C_word)C_eqp(lf[605],t28);
+t30=(C_truep(t29)?(C_word)C_a_i_list(&a,1,t26):C_SCHEME_END_OF_LIST);
+t31=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[10])[1]);
+t32=C_mutate(((C_word *)((C_word*)t0)[10])+1,t31);
+t33=(C_word)C_a_i_list(&a,1,C_fix(1));
+t34=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18351,a[2]=t9,a[3]=t3,a[4]=t5,a[5]=t30,a[6]=t4,a[7]=((C_word*)t0)[12],a[8]=t7,a[9]=t33,a[10]=t1,tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 2543 walk");
+t98=t34;
+t99=t27;
+t100=t3;
+t101=t4;
+t102=t5;
+t1=t98;
+t2=t99;
+t3=t100;
+t4=t101;
+t5=t102;
+goto loop;}
+else{
+t26=(C_word)C_eqp(t11,lf[252]);
+if(C_truep(t26)){
+t27=(C_word)C_i_car(t9);
+t28=(C_word)C_i_car(t7);
+t29=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18397,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t7,a[6]=t27,a[7]=t1,a[8]=t5,a[9]=t4,a[10]=t3,a[11]=t28,a[12]=((C_word*)t0)[12],tmp=(C_word)a,a+=13,tmp);
+C_trace("compiler.scm: 2549 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t29,t27,t3);}
+else{
+t27=(C_word)C_eqp(t11,lf[513]);
+if(C_truep(t27)){
+t28=(C_word)C_i_cdr(t7);
+t29=(C_word)C_i_length(t28);
+t30=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_18555,a[2]=((C_word*)t0)[8],a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t7,a[7]=((C_word*)t0)[13],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: 2573 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t30,*((C_word*)lf[664]+1),((C_word*)((C_word*)t0)[9])[1],t29);}
+else{
+t28=(C_word)C_eqp(t11,lf[540]);
+if(C_truep(t28)){
+t29=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18604,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t7,a[6]=((C_word*)t0)[13],a[7]=t9,a[8]=t11,a[9]=t1,tmp=(C_word)a,a+=10,tmp);
+if(C_truep((C_word)C_i_car(t9))){
+t30=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[8])[1]);
+t31=C_mutate(((C_word *)((C_word*)t0)[8])+1,t30);
+t32=t29;
+f_18604(t32,t31);}
+else{
+t30=t29;
+f_18604(t30,C_SCHEME_UNDEFINED);}}
+else{
+t29=(C_word)C_eqp(t11,lf[99]);
+if(C_truep(t29)){
+t30=(C_word)C_i_car(t9);
+t31=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18638,a[2]=((C_word*)t0)[4],a[3]=t30,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_fixnump(t30))){
+t32=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18737,a[2]=t31,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2584 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[667]))(3,*((C_word*)lf[667]+1),t32,t30);}
+else{
+t32=t31;
+f_18638(t32,C_SCHEME_FALSE);}}
+else{
+t30=(C_word)C_eqp(t11,lf[124]);
+t31=(C_truep(t30)?t30:(C_word)C_eqp(t11,lf[623]));
+if(C_truep(t31)){
+t32=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18749,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[12],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
+t33=(C_word)C_i_car(t7);
+C_trace("compiler.scm: 2599 walk");
+t98=t32;
+t99=t33;
+t100=t3;
+t101=t4;
+t102=t5;
+t1=t98;
+t2=t99;
+t3=t100;
+t4=t101;
+t5=t102;
+goto loop;}
+else{
+t32=(C_word)C_eqp(t11,lf[622]);
+if(C_truep(t32)){
+t33=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18804,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=((C_word*)t0)[12],a[6]=t7,a[7]=t9,a[8]=t11,a[9]=t1,a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
+t34=(C_word)C_i_car(t7);
+C_trace("compiler.scm: 2608 walk");
+t98=t33;
+t99=t34;
+t100=t3;
+t101=t4;
+t102=t5;
+t1=t98;
+t2=t99;
+t3=t100;
+t4=t101;
+t5=t102;
+goto loop;}
+else{
+t33=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18913,a[2]=t9,a[3]=t11,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2627 mapwalk");
+t34=((C_word*)((C_word*)t0)[13])[1];
+f_18924(t34,t33,t7,t3,t4,t5);}}}}}}}}}}}}}}}}}}}
+
+/* k18911 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18913(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_18913,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18804(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_18804,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[10])[1];
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18820,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_word)C_i_car(((C_word*)t0)[7]);
+t5=(C_word)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_18830,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_18830(t9,t3,t4,t5,C_fix(0));}
+
+/* loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18830(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_18830,NULL,5,t0,t1,t2,t3,t4);}
+t5=C_mutate(((C_word *)((C_word*)t0)[8])+1,((C_word*)t0)[7]);
+t6=(C_word)C_eqp(t2,C_fix(0));
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18841,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_word)C_i_car(t3);
+C_trace("compiler.scm: 2618 walk");
+t9=((C_word*)((C_word*)t0)[6])[1];
+f_17838(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_18863,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_word)C_i_car(t3);
+C_trace("compiler.scm: 2621 walk");
+t9=((C_word*)((C_word*)t0)[6])[1];
+f_17838(t9,t7,t8,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
+
+/* k18861 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18863(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_18863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18866,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_word)C_i_cadr(((C_word*)t0)[10]);
+C_trace("compiler.scm: 2622 walk");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18864 in k18861 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18866(C_word c,C_word t0,C_word 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_18866,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18873,a[2]=t1,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_fixnum_decrease(((C_word*)t0)[7]);
+t4=(C_word)C_i_cddr(((C_word*)t0)[6]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18885,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]);
+C_trace("compiler.scm: 2625 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[668]+1)))(4,*((C_word*)lf[668]+1),t5,t6,((C_word*)t0)[2]);}
+
+/* k18883 in k18864 in k18861 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18885(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2625 loop");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_18830(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k18871 in k18864 in k18861 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18873(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2623 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[525]))(5,*((C_word*)lf[525]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k18839 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18841(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_18841,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18852,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_word)C_fixnum_difference(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[5]);
+C_trace("compiler.scm: 2619 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[668]+1)))(4,*((C_word*)lf[668]+1),t2,((C_word*)t0)[2],t3);}
+
+/* k18850 in k18839 in loop in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18852(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_18852,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_list(&a,1,((C_word*)t0)[2]));}
+
+/* k18818 in k18802 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18820(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_18820,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+
+/* k18747 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18749(C_word c,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_18749,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[10])[1];
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18752,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_cadr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2601 walk");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18750 in k18747 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18752(C_word c,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_18752,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[12])[1];
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18755,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_word)C_i_caddr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2603 walk");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18753 in k18750 in k18747 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18755(C_word c,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_18755,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18775,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_word)C_fixnum_difference(((C_word*)((C_word*)t0)[8])[1],((C_word*)t0)[2]);
+t4=(C_word)C_fixnum_difference(((C_word*)t0)[2],((C_word*)t0)[9]);
+C_trace("compiler.scm: 2604 max");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[668]+1)))(4,*((C_word*)lf[668]+1),t2,t3,t4);}
+
+/* k18773 in k18753 in k18750 in k18747 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18775(C_word c,C_word t0,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_18775,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[9],t1);
+t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t4));}
+
+/* k18735 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18737(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_18638(t2,(C_word)C_i_not(t1));}
+
+/* k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18638(C_word t0,C_word 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_18638,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 2585 immediate-literal");
+f_19096(((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+if(C_truep((C_word)C_i_numberp(((C_word*)t0)[3]))){
+t2=(C_word)C_eqp(lf[383],*((C_word*)lf[6]+1));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18659,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_word)C_i_integerp(((C_word*)t0)[3]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18686,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2588 big-fixnum?");
+((C_proc3)C_retrieve_symbol_proc(lf[667]))(3,*((C_word*)lf[667]+1),t4,((C_word*)t0)[3]);}
+else{
+t4=t3;
+f_18659(t4,C_SCHEME_FALSE);}}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18702,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2594 literal");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_18970(t4,t3,((C_word*)t0)[3]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18708,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: 2595 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[620]))(3,*((C_word*)lf[620]+1),t2,((C_word*)t0)[3]);}}}
+
+/* k18706 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18708(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18708,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 2595 immediate-literal");
+f_19096(((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18727,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2596 literal");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18970(t3,t2,((C_word*)t0)[3]);}}
+
+/* k18725 in k18706 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18727(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_18727,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+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[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+
+/* k18700 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18702(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_18702,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+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[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+
+/* k18684 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18686(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_18659(t2,(C_word)C_i_not(t1));}
+
+/* k18657 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18659(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_18659,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18662,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_inexact_to_exact(((C_word*)t0)[4]);
+C_trace("compiler.scm: 2589 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[116]))(6,*((C_word*)lf[116]+1),t2,lf[479],lf[665],((C_word*)t0)[4],t3);}
+else{
+C_trace("compiler.scm: 2593 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),((C_word*)t0)[2],lf[666],((C_word*)t0)[4]);}}
+
+/* k18660 in k18657 in k18636 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18662(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_inexact_to_exact(((C_word*)t0)[4]);
+C_trace("compiler.scm: 2592 immediate-literal");
+f_19096(((C_word*)t0)[2],t2);}
+
+/* k18602 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18604(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_18604,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18616,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: 2580 mapwalk");
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_18924(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18614 in k18602 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18616,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k18553 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+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 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_18555,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_18558,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_18573,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_length(((C_word*)t0)[8]);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t5,C_fix(3)))){
+t6=(C_word)C_i_caddr(((C_word*)t0)[8]);
+t7=t4;
+f_18573(t7,(C_word)C_eqp(((C_word*)t0)[4],t6));}
+else{
+t6=t4;
+f_18573(t6,C_SCHEME_FALSE);}}
+
+/* k18571 in k18553 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18573(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_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_18558(t4,t3);}
+else{
+t2=((C_word*)t0)[2];
+f_18558(t2,C_SCHEME_UNDEFINED);}}
+
+/* k18556 in k18553 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18558(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_18558,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18570,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_18924(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18568 in k18556 in k18553 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18570(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_18570,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18397(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_18397,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18401,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("g47764777");
+t3=t2;
+f_18401(t3,((C_word*)t0)[7],t1);}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[11],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18436,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_18520,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t4)){
+t6=t3;
+f_18436(t6,(C_word)C_i_not(t4));}
+else{
+t6=*((C_word*)lf[12]+1);
+if(C_truep(t6)){
+t7=t3;
+f_18436(t7,(C_word)C_i_not(t6));}
+else{
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18531,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[94]))(4,*((C_word*)lf[94]+1),t7,((C_word*)t0)[6],lf[134]);}}}}
+
+/* k18529 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18531(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_18436(t3,(C_word)C_i_not(t2));}
+else{
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[545]);}}
+
+/* k18518 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18520(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_18436(t2,(C_word)C_i_not(t1));}
+
+/* k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18436(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_18436,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18516,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2558 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t2,((C_word*)t0)[12]);}
+
+/* k18514 in k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18516(C_word c,C_word t0,C_word 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_18516,2,t0,t1);}
+t2=(C_word)C_i_not(t1);
+t3=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_18442,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_word)C_eqp(((C_word*)t0)[13],lf[99]);
+if(C_truep(t4)){
+t5=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t6=(C_word)C_i_car(t5);
+C_trace("compiler.scm: 2559 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[620]))(3,*((C_word*)lf[620]+1),t3,t6);}
+else{
+t5=t3;
+f_18442(2,t5,C_SCHEME_FALSE);}}
+
+/* k18440 in k18514 in k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18442(C_word c,C_word t0,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_18442,2,t0,t1);}
+t2=(C_truep(t1)?t1:(C_word)C_eqp(lf[139],((C_word*)t0)[13]));
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18448,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_word)C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
+t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
+t6=t3;
+f_18448(t6,t5);}
+else{
+t4=t3;
+f_18448(t4,C_SCHEME_UNDEFINED);}}
+
+/* k18446 in k18440 in k18514 in k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18448(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_18448,NULL,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[12])?lf[662]:lf[663]);
+t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_18480,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: 2565 blockvar-literal");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_19064(t4,t3,((C_word*)t0)[10]);}
+else{
+C_trace("compiler.scm: 2566 literal");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_18970(t4,t3,((C_word*)t0)[10]);}}
+
+/* k18478 in k18446 in k18440 in k18514 in k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18480(C_word c,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_18480,2,t0,t1);}
+t2=(C_word)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_18472,a[2]=t2,a[3]=((C_word*)t0)[7],a[4]=((C_word*)t0)[8],tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2569 walk");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t5,t3,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18470 in k18478 in k18446 in k18440 in k18514 in k18434 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18472(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_18472,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[4];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+
+/* g4776 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18401(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_18401,NULL,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18422,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2551 walk");
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_17838(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18420 in g4776 in k18395 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18422(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_18422,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[3];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[661],((C_word*)t0)[2],t2));}
+
+/* k18349 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18351(C_word c,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_18351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18355,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[8]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18363,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: 2544 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18361 in k18349 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18363(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_18363,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18367,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: 2544 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18365 in k18361 in k18349 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18367(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2544 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_17838(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k18353 in k18349 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18355(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_18355,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[660],((C_word*)t0)[2],t2));}
+
+/* a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18154(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[26],*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_18154,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_car(((C_word*)t0)[15]);
+t6=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_18161,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)[15],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],tmp=(C_word)a,a+=21,tmp);
+if(C_truep(t4)){
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18281,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2492 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t7,((C_word*)t0)[4],t4,lf[571]);}
+else{
+t7=t6;
+f_18161(2,t7,C_SCHEME_FALSE);}}
+
+/* k18279 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18281(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_18281,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18287,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: 2493 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[557]);}
+
+/* k18285 in k18279 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18287(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_18287,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+f_18161(2,t2,lf[554]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18312,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: 2494 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[613]);}}
+
+/* k18310 in k18285 in k18279 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18312(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: 2495 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[544]);}
+else{
+t2=(C_word)C_i_not(((C_word*)t0)[2]);
+if(C_truep(t2)){
+if(C_truep(t2)){
+t3=((C_word*)t0)[5];
+f_18161(2,t3,lf[656]);}
+else{
+C_trace("compiler.scm: 2495 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[544]);}}
+else{
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[2]))){
+t3=((C_word*)t0)[5];
+f_18161(2,t3,lf[656]);}
+else{
+C_trace("compiler.scm: 2495 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[544]);}}}}
+
+/* k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18161(C_word c,C_word t0,C_word 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_18161,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_18164,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],tmp=(C_word)a,a+=20,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[3]);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18272,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_word)C_eqp(lf[656],t1);
+if(C_truep(t5)){
+C_trace("compiler.scm: 2499 butlast");
+((C_proc3)C_retrieve_symbol_proc(lf[659]))(3,*((C_word*)lf[659]+1),t4,((C_word*)t0)[7]);}
+else{
+t6=((C_word*)t0)[7];
+C_trace("compiler.scm: 2496 walk");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_17838(t7,t2,t3,t6,((C_word*)t0)[8],C_SCHEME_END_OF_LIST);}}
+
+/* k18270 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18272(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2496 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_17838(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18164(C_word c,C_word t0,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_18164,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_18167,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],tmp=(C_word)a,a+=21,tmp);
+t3=(C_word)C_eqp(((C_word*)t0)[3],lf[656]);
+if(C_truep(t3)){
+C_trace("compiler.scm: 2504 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[585]))(6,*((C_word*)lf[585]+1),t2,lf[626],lf[657],((C_word*)t0)[4],((C_word*)t0)[7]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[3],lf[553]);
+if(C_truep(t4)){
+C_trace("compiler.scm: 2505 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[585]))(6,*((C_word*)lf[585]+1),t2,lf[626],lf[658],((C_word*)t0)[4],((C_word*)t0)[7]);}
+else{
+t5=C_SCHEME_UNDEFINED;
+t6=t2;
+f_18167(2,t6,t5);}}}
+
+/* k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18167(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_18167,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_18170,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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],tmp=(C_word)a,a+=21,tmp);
+t3=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[5]:C_SCHEME_FALSE);
+if(C_truep(t3)){
+C_trace("compiler.scm: 2507 bomb");
+((C_proc6)C_retrieve_symbol_proc(lf[522]))(6,*((C_word*)lf[522]+1),t2,lf[655],((C_word*)t0)[8],((C_word*)((C_word*)t0)[15])[1],((C_word*)t0)[5]);}
+else{
+t4=t2;
+f_18170(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18170(C_word c,C_word t0,C_word 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*)tr2,(void*)f_18170,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_18198,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],tmp=(C_word)a,a+=13,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[11]);
+t4=(C_word)C_fixnum_increase(((C_word*)((C_word*)t0)[17])[1]);
+t5=(C_truep(((C_word*)t0)[9])?((C_word*)t0)[9]:(C_word)C_i_memq(((C_word*)t0)[8],*((C_word*)lf[62]+1)));
+t6=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_18214,a[2]=((C_word*)t0)[19],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]=t4,a[11]=((C_word*)t0)[5],a[12]=((C_word*)t0)[6],a[13]=((C_word*)t0)[7],a[14]=t3,a[15]=((C_word*)t0)[8],a[16]=t2,tmp=(C_word)a,a+=17,tmp);
+C_trace("compiler.scm: 2519 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t6,((C_word*)t0)[2],((C_word*)t0)[8],lf[603]);}
+
+/* k18212 in k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18214(C_word c,C_word t0,C_word 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_18214,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_18221,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],tmp=(C_word)a,a+=17,tmp);
+t4=((C_word*)t0)[11];
+if(C_truep(t4)){
+t5=t3;
+f_18221(t5,C_SCHEME_FALSE);}
+else{
+t5=((C_word*)((C_word*)t0)[2])[1];
+if(C_truep((C_word)C_fixnum_greaterp(t5,C_fix(0)))){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18240,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2523 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[585]))(6,*((C_word*)lf[585]+1),t6,lf[626],lf[654],((C_word*)t0)[15],((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t6=t3;
+f_18221(t6,C_SCHEME_FALSE);}}}
+
+/* k18238 in k18212 in k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18240(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_18221(t2,C_SCHEME_TRUE);}
+
+/* k18219 in k18212 in k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18221(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*)trf_18221,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,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]=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],tmp=(C_word)a,a+=17,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=t2;
+f_18225(2,t3,((C_word*)t0)[3]);}
+else{
+C_trace("compiler.scm: 2525 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[2],((C_word*)t0)[15],lf[596]);}}
+
+/* k18223 in k18219 in k18212 in k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18225(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2509 make-lambda-literal");
+((C_proc17)C_retrieve_proc(*((C_word*)lf[632]+1)))(17,*((C_word*)lf[632]+1),((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*)t0)[10],((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]);}
+
+/* k18196 in k18168 in k18165 in k18162 in k18159 in a18153 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+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 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_18198,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[12])[1]);
+t3=C_mutate(((C_word *)((C_word*)t0)[12])+1,t2);
+t4=C_mutate(((C_word *)((C_word*)t0)[11])+1,((C_word*)t0)[10]);
+t5=C_mutate(((C_word *)((C_word*)t0)[9])+1,((C_word*)t0)[8]);
+t6=C_mutate(((C_word *)((C_word*)t0)[7])+1,((C_word*)t0)[6]);
+t7=C_mutate(((C_word *)((C_word*)t0)[5])+1,((C_word*)t0)[4]);
+t8=(C_word)C_i_car(((C_word*)t0)[3]);
+t9=(C_word)C_a_i_list(&a,1,t8);
+t10=((C_word*)t0)[2];
+t11=t10;
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,(C_word)C_a_i_record(&a,4,lf[512],lf[565],t9,C_SCHEME_END_OF_LIST));}
+
+/* k18080 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18082(C_word c,C_word t0,C_word 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_18082,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18097,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_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t4=(C_word)C_eqp(lf[517],t3);
+if(C_truep(t4)){
+t5=(C_word)C_slot(((C_word*)t0)[3],C_fix(2));
+t6=(C_word)C_i_car(t5);
+t7=t2;
+f_18097(t7,(C_word)C_i_memq(t6,((C_word*)t0)[2]));}
+else{
+t5=t2;
+f_18097(t5,C_SCHEME_FALSE);}}
+
+/* k18095 in k18080 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_18097(C_word t0,C_word t1){
+C_word 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_18097,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[615],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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t3));}}
+
+/* k18064 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18066(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_18066,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[3];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[605],((C_word*)t0)[2],t2));}
+
+/* k18034 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18036(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_18036,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[512],lf[606],((C_word*)t0)[2],t1));}
+
+/* k18008 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18010(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2453 words");
+((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+
+/* k18004 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18006(C_word c,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_18006,2,t0,t1);}
+t2=(C_word)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_18002,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: 2454 mapwalk");
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_18924(t5,t4,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k18000 in k18004 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_18002(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_18002,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k17974 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17976(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2449 words");
+((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+
+/* k17970 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17972(C_word c,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_17972,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
+
+/* k17944 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17946(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_17946,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k17918 in walk in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17920(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_17920,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_17765(C_word t0,C_word 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_17765,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17769,a[2]=((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_17769(2,t5,t3);}
+else{
+t5=*((C_word*)lf[22]+1);
+if(C_truep(t5)){
+t6=t4;
+f_17769(2,t6,t5);}
+else{
+t6=*((C_word*)lf[12]+1);
+if(C_truep(t6)){
+t7=t4;
+f_17769(2,t7,t6);}
+else{
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17825,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[94]))(4,*((C_word*)lf[94]+1),t7,t8,lf[134]);}}}}
+
+/* k17823 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17825(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_17769(2,t3,t2);}
+else{
+t2=((C_word*)t0)[2];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),((C_word*)t0)[3],t2,lf[545]);}}
+
+/* k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17769(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_17769,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17772,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_17804,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2413 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t3,((C_word*)t0)[2],((C_word*)t0)[7],lf[557]);}
+
+/* k17802 in k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17804(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17804,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17811,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2414 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_17772(t2,C_SCHEME_FALSE);}}
+
+/* k17809 in k17802 in k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17811(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_17772(t2,(C_word)C_i_not(t1));}
+
+/* k17770 in k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_17772(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_17772,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17775,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_word)C_fixnum_increase(((C_word*)((C_word*)t0)[2])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[2])+1,t3);
+t5=t2;
+f_17775(t5,t4);}
+else{
+t3=t2;
+f_17775(t3,C_SCHEME_UNDEFINED);}}
+
+/* k17773 in k17770 in k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_17775(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_17775,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17791,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: 2419 blockvar-literal");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_19064(t3,t2,((C_word*)t0)[5]);}
+else{
+C_trace("compiler.scm: 2420 literal");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18970(t3,t2,((C_word*)t0)[5]);}}
+
+/* k17789 in k17773 in k17770 in k17767 in walk-global in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17791(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_17791,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[653],t2,C_SCHEME_END_OF_LIST));}
+
+/* walk-var in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_fcall f_17714(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_17714,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17718,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: 2403 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t5,t2,t3);}
+
+/* k17716 in walk-var in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17718(C_word c,C_word t0,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_17718,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[6];
+t3=t1;
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=t2;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_record(&a,4,lf[512],lf[651],t4,C_SCHEME_END_OF_LIST));}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17744,a[2]=((C_word*)t0)[2],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: 2404 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[119]))(3,*((C_word*)lf[119]+1),t2,((C_word*)t0)[4]);}}
+
+/* k17742 in k17716 in walk-var in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17744(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17744,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17760,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2404 literal");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_18970(t3,t2,((C_word*)t0)[4]);}
+else{
+C_trace("compiler.scm: 2405 walk-global");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_17765(t2,((C_word*)t0)[6],((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* k17758 in k17742 in k17716 in walk-var in ##compiler#prepare-for-code-generation in k5138 in k5135 */
+static void C_ccall f_17760(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_17760,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+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[512],lf[652],t2,C_SCHEME_END_OF_LIST));}
+
+/* lambda-literal-direct in k5138 in k5135 */
+static void C_ccall f_17702(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_17702,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(15)));}
+
+/* lambda-literal-body in k5138 in k5135 */
+static void C_ccall f_17693(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_17693,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(14)));}
+
+/* lambda-literal-rest-argument-mode in k5138 in k5135 */
+static void C_ccall f_17684(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_17684,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(13)));}
+
+/* lambda-literal-customizable in k5138 in k5135 */
+static void C_ccall f_17675(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_17675,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(12)));}
+
+/* lambda-literal-looping in k5138 in k5135 */
+static void C_ccall f_17666(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_17666,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(11)));}
+
+/* lambda-literal-closure-size in k5138 in k5135 */
+static void C_ccall f_17657(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_17657,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(10)));}
+
+/* lambda-literal-directly-called in k5138 in k5135 */
+static void C_ccall f_17648(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_17648,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(9)));}
+
+/* lambda-literal-allocated in k5138 in k5135 */
+static void C_ccall f_17639(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_17639,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(8)));}
+
+/* lambda-literal-callee-signatures in k5138 in k5135 */
+static void C_ccall f_17630(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_17630,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(7)));}
+
+/* lambda-literal-temporaries in k5138 in k5135 */
+static void C_ccall f_17621(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_17621,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(6)));}
+
+/* lambda-literal-rest-argument in k5138 in k5135 */
+static void C_ccall f_17612(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_17612,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+
+/* lambda-literal-argument-count in k5138 in k5135 */
+static void C_ccall f_17603(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_17603,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+
+/* lambda-literal-arguments in k5138 in k5135 */
+static void C_ccall f_17594(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_17594,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+
+/* lambda-literal-external in k5138 in k5135 */
+static void C_ccall f_17585(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_17585,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+
+/* lambda-literal-id in k5138 in k5135 */
+static void C_ccall f_17576(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_17576,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[633]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+
+/* lambda-literal? in k5138 in k5135 */
+static void C_ccall f_17570(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_17570,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[633]));}
+
+/* make-lambda-literal in k5138 in k5135 */
+static void C_ccall f_17564(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 tmp;
+C_word t17;
+C_word ab[17],*a=ab;
+if(c!=17) C_bad_argc_2(c,17,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr17,(void*)f_17564,17,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16);}
+t17=t1;
+((C_proc2)(void*)(*((C_word*)t17+1)))(2,t17,(C_word)C_a_i_record(&a,16,lf[633],t2,t3,t4,t5,t6,t7,t8,t9,t10,t11,t12,t13,t14,t15,t16));}
+
+/* ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15804(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_15804,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_15807,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_15813,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_15823,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_15834,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_16269,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_17294,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_17340,tmp=(C_word)a,a+=2,tmp));
+t29=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17531,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: 2357 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t29,lf[592],lf[631]);}
+
+/* k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17531(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_17531,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17534,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: 2358 gather");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_15834(t3,t2,((C_word*)t0)[4],C_SCHEME_FALSE,C_SCHEME_END_OF_LIST);}
+
+/* k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17534(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_17534,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17537,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: 2359 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[585]))(5,*((C_word*)lf[585]+1),t2,lf[626],lf[630],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17537(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_17537,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17540,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: 2360 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t2,lf[592],lf[629]);}
+
+/* k17538 in k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17540(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_17540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17543,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2361 transform");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_16269(t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k17541 in k17538 in k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17543(C_word c,C_word t0,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_17543,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17546,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)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_17556,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_17558,tmp=(C_word)a,a+=2,tmp);
+C_trace("##sys#make-promise");
+t6=*((C_word*)lf[628]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
+
+/* a17557 in k17541 in k17538 in k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17558(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_17558,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_length(*((C_word*)lf[62]+1)));}
+
+/* k17554 in k17541 in k17538 in k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17556(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2363 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[585]))(6,*((C_word*)lf[585]+1),((C_word*)t0)[3],lf[626],lf[627],((C_word*)((C_word*)t0)[2])[1],t1);}
+
+/* k17544 in k17541 in k17538 in k17535 in k17532 in k17529 in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17546(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 k5138 in k5135 */
+static void C_fcall f_17340(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_17340,NULL,4,t1,t2,t3,t4);}
+t5=t2;
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=(C_word)C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17347,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2333 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t8,t7,t4);}
+
+/* k17345 in ref-var in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17347(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_17347,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17351,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("g43404341");
+t3=t2;
+f_17351(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);}}
+
+/* g4340 in k17345 in ref-var in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17351(C_word 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_17351,NULL,3,t0,t1,t2);}
+t3=(C_word)C_fixnum_plus(t2,C_fix(1));
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17372,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2336 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[2]);}
+
+/* k17370 in g4340 in k17345 in ref-var in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17372(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_17372,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[3];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[617],((C_word*)t0)[2],t2));}
+
+/* maptransform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17294(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_17294,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_17300,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_17300(t12,t1,t2);}
+
+/* loop4303 in maptransform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17300(C_word t0,C_word 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_17300,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_17327,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_17334,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));
+C_trace("g43194320");
+t6=t3;
+f_17327(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k17332 in loop4303 in maptransform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17334(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_17334,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));
+C_trace("loop43034316");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_17300(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));
+C_trace("loop43034316");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_17300(t6,((C_word*)t0)[3],t5);}}
+
+/* g4319 in loop4303 in maptransform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17327(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_17327,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2329 transform");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_16269(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16269(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_16269,NULL,5,t0,t1,t2,t3,t4);}
+t5=t2;
+t6=(C_word)C_slot(t5,C_fix(3));
+t7=t2;
+t8=(C_word)C_slot(t7,C_fix(2));
+t9=t2;
+t10=(C_word)C_slot(t9,C_fix(1));
+t11=(C_word)C_eqp(t10,lf[99]);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16303,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_16303(t13,t11);}
+else{
+t13=(C_word)C_eqp(t10,lf[139]);
+if(C_truep(t13)){
+t14=t12;
+f_16303(t14,t13);}
+else{
+t14=(C_word)C_eqp(t10,lf[565]);
+t15=t12;
+f_16303(t15,(C_truep(t14)?t14:(C_word)C_eqp(t10,lf[524])));}}}
+
+/* k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16303(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_16303,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_word)C_eqp(((C_word*)t0)[11],lf[517]);
+if(C_truep(t2)){
+t3=(C_word)C_i_car(((C_word*)t0)[10]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16315,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: 2204 ref-var");
+f_17340(t4,((C_word*)t0)[13],((C_word*)t0)[7],((C_word*)t0)[6]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[11],lf[124]);
+t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_16342,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_16342(t5,t3);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[11],lf[513]);
+if(C_truep(t5)){
+t6=t4;
+f_16342(t6,t5);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[11],lf[272]);
+if(C_truep(t6)){
+t7=t4;
+f_16342(t7,t6);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[11],lf[273]);
+if(C_truep(t7)){
+t8=t4;
+f_16342(t8,t7);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[11],lf[345]);
+if(C_truep(t8)){
+t9=t4;
+f_16342(t9,t8);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[11],lf[101]);
+if(C_truep(t9)){
+t10=t4;
+f_16342(t10,t9);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[11],lf[253]);
+if(C_truep(t10)){
+t11=t4;
+f_16342(t11,t10);}
+else{
+t11=(C_word)C_eqp(((C_word*)t0)[11],lf[622]);
+if(C_truep(t11)){
+t12=t4;
+f_16342(t12,t11);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[11],lf[623]);
+if(C_truep(t12)){
+t13=t4;
+f_16342(t13,t12);}
+else{
+t13=(C_word)C_eqp(((C_word*)t0)[11],lf[624]);
+if(C_truep(t13)){
+t14=t4;
+f_16342(t14,t13);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[11],lf[540]);
+if(C_truep(t14)){
+t15=t4;
+f_16342(t15,t14);}
+else{
+t15=(C_word)C_eqp(((C_word*)t0)[11],lf[625]);
+if(C_truep(t15)){
+t16=t4;
+f_16342(t16,t15);}
+else{
+t16=(C_word)C_eqp(((C_word*)t0)[11],lf[105]);
+t17=t4;
+f_16342(t17,(C_truep(t16)?t16:(C_word)C_eqp(((C_word*)t0)[11],lf[256])));}}}}}}}}}}}}}}}
+
+/* k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16342(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_16342,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[13];
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16363,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: 2212 maptransform");
+t5=((C_word*)((C_word*)t0)[10])[1];
+f_17294(t5,t4,((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[6],lf[159]);
+if(C_truep(t2)){
+t3=(C_word)C_i_car(((C_word*)t0)[11]);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16375,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: 2216 test");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_15807(t5,t4,t3,lf[588]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[6],lf[173]);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(((C_word*)t0)[6],lf[550]));
+if(C_truep(t4)){
+t5=(C_word)C_i_caddr(((C_word*)t0)[11]);
+t6=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_16476,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: 2232 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),((C_word*)t0)[12],t5,t6);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[6],lf[252]);
+if(C_truep(t5)){
+t6=(C_word)C_i_car(((C_word*)t0)[11]);
+t7=(C_word)C_i_car(((C_word*)t0)[9]);
+t8=(C_word)C_slot(t7,C_fix(1));
+t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16965,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_word)C_eqp(lf[99],t8);
+if(C_truep(t10)){
+t11=(C_word)C_slot(t7,C_fix(2));
+t12=(C_word)C_i_car(t11);
+C_trace("compiler.scm: 2292 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[620]))(3,*((C_word*)lf[620]+1),t9,t12);}
+else{
+t11=t9;
+f_16965(2,t11,C_SCHEME_FALSE);}}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[6],lf[107]);
+if(C_truep(t6)){
+t7=(C_truep(*((C_word*)lf[34]+1))?(C_word)C_a_i_list(&a,1,C_fix(2)):(C_word)C_a_i_list(&a,1,C_fix(1)));
+t8=(C_word)C_i_car(((C_word*)t0)[11]);
+t9=(C_word)C_a_i_list(&a,2,t8,C_SCHEME_TRUE);
+t10=(C_word)C_a_i_record(&a,4,lf[512],lf[565],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_17176,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_17180,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
+t13=(C_word)C_i_car(((C_word*)t0)[11]);
+C_trace("compiler.scm: 2323 ##sys#make-lambda-info");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),t12,t13);}
+else{
+t11=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[606],t7,t11));}}
+else{
+C_trace("compiler.scm: 2326 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),((C_word*)t0)[12],lf[621]);}}}}}}
+
+/* k17178 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17180(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2323 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[607]))(3,*((C_word*)lf[607]+1),((C_word*)t0)[2],t1);}
+
+/* k17174 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17176,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[2],t3));}
+
+/* k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16965(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_16965,2,t0,t1);}
+t2=(C_truep(t1)?t1:(C_word)C_eqp(lf[139],((C_word*)t0)[9]));
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16971,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2294 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t3,((C_word*)t0)[3],((C_word*)t0)[5]);}
+
+/* k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16971(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_16971,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16975,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("g42604261");
+t3=t2;
+f_16975(t3,((C_word*)t0)[2],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17068,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: 2308 test");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_15807(t3,t2,((C_word*)t0)[3],lf[588]);}}
+
+/* k17066 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17068(C_word c,C_word t0,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_17068,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_truep(((C_word*)t0)[8])?lf[615]:lf[616]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_17088,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: 2312 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t3,((C_word*)t0)[2]);}
+else{
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[2]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17112,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2316 transform");
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_16269(t4,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
+
+/* k17110 in k17066 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17112(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_17112,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=((C_word*)t0)[3];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[252],((C_word*)t0)[2],t2));}
+
+/* k17086 in k17066 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17088(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_17088,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17092,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: 2313 transform");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_16269(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k17090 in k17086 in k17066 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17092(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_17092,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
+
+/* g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16975(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_16975,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16982,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: 2296 test");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_15807(t4,t3,((C_word*)t0)[2],lf[588]);}
+
+/* k16980 in g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16982(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_16982,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_truep(((C_word*)t0)[8])?lf[615]:lf[616]);
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[7]);
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17023,a[2]=((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: 2300 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[3]);}
+else{
+t2=(C_truep(((C_word*)t0)[8])?lf[618]:lf[619]);
+t3=(C_word)C_fixnum_increase(((C_word*)t0)[7]);
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17051,a[2]=((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: 2306 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[3]);}}
+
+/* k17049 in k16980 in g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17051(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_17051,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17055,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: 2307 transform");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_16269(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k17053 in k17049 in k16980 in g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17055(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_17055,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t2));}
+
+/* k17021 in k16980 in g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17023(C_word c,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_17023,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[617],((C_word*)t0)[8],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17011,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: 2301 transform");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_16269(t5,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k17009 in k17021 in k16980 in g4260 in k16969 in k16963 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17011(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_17011,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t2));}
+
+/* a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16476(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_16476,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_16480,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_16938,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2235 filter");
+((C_proc4)C_retrieve_symbol_proc(lf[614]))(4,*((C_word*)lf[614]+1),t5,t6,t2);}
+
+/* a16937 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16938(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_16938,3,t0,t1,t2);}
+C_trace("compiler.scm: 2235 test");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t3,t1,t2,lf[588]);}
+
+/* k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16480(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_16480,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_16483,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_16852,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_16903,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
+t15=((C_word*)t13)[1];
+f_16903(t15,t11,t1);}
+
+/* loop4069 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16903(C_word t0,C_word 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_16903,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[97]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16932,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));
+C_trace("g40854086");
+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);}}
+
+/* k16930 in loop4069 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16932(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_16932,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));
+C_trace("loop40694082");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16903(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));
+C_trace("loop40694082");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16903(t6,((C_word*)t0)[3],t5);}}
+
+/* k16850 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16852(C_word c,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_16852,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_16854,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_16854(t5,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop4042 in k16850 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16854(C_word t0,C_word 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_16854,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[163]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16887,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));
+C_trace("g40624063");
+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);}}
+
+/* k16885 in loop4042 in k16850 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16887(C_word c,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_16887,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_16867,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_16867(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_16867(t5,t4);}}
+
+/* k16865 in k16885 in loop4042 in k16850 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16867(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));
+C_trace("loop40424056");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_16854(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16483(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_16483,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_16486,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2237 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[137]);}
+
+/* k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16486(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_16486,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[17])?(C_word)C_i_car(((C_word*)t0)[16]):lf[601]);
+t3=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_16492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2239 test");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t4,t3,t2,lf[602]);}
+
+/* k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16492(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_16492,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16498,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2240 test");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t4,t3,((C_word*)t0)[17],lf[603]);}
+
+/* k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16498(C_word c,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_16498,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_16504,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_cadr(((C_word*)t0)[20]);
+t5=t3;
+f_16504(t5,(C_truep(t4)?(C_word)C_i_pairp(((C_word*)t0)[15]):C_SCHEME_FALSE));}
+else{
+t4=t3;
+f_16504(t4,C_SCHEME_FALSE);}}
+
+/* k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16504(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_16504,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|20,a[1]=(C_word)f_16507,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_16819,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: 2246 test");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t4,t3,((C_word*)t0)[6],lf[588]);}
+else{
+t3=t2;
+f_16507(2,t3,C_SCHEME_FALSE);}}
+
+/* k16817 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16819(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_16819,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16822,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: 2247 test");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t3,t2,((C_word*)t0)[6],lf[544]);}
+else{
+t2=((C_word*)t0)[4];
+f_16507(2,t2,C_SCHEME_FALSE);}}
+
+/* k16820 in k16817 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16822(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_assq(((C_word*)t0)[5],((C_word*)t0)[4]);
+t3=(C_word)C_i_cdr(t2);
+C_trace("compiler.scm: 2248 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[3],((C_word*)t0)[2],t3,lf[613],C_SCHEME_TRUE);}
+else{
+t2=((C_word*)t0)[3];
+f_16507(2,t2,C_SCHEME_FALSE);}}
+
+/* k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16507(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_16507,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[20])?(C_word)C_fixnum_plus(((C_word*)t0)[19],C_fix(2)):(C_word)C_fixnum_plus(((C_word*)t0)[19],C_fix(1)));
+t3=(C_word)C_a_i_list(&a,1,t2);
+t4=(C_word)C_i_cadr(((C_word*)t0)[18]);
+t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_16742,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_16746,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_16761,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_16761(t14,t10,((C_word*)t0)[2]);}
+
+/* loop4125 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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 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_16761,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_16788,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_16788(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));
+C_trace("loop41254138");
+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));
+C_trace("loop41254138");
+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);}}
+
+/* g4141 in loop4125 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static C_word C_fcall f_16788(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);}}
+
+/* k16744 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16746(C_word 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_word)C_i_assq(((C_word*)t0)[5],((C_word*)t0)[4]):C_SCHEME_FALSE);
+if(C_truep(t2)){
+t3=(C_word)C_i_cdr(t2);
+C_trace("compiler.scm: 2258 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[180]))(5,*((C_word*)lf[180]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}
+else{
+t3=((C_word*)t0)[5];
+C_trace("compiler.scm: 2258 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[180]))(5,*((C_word*)lf[180]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],t3);}}
+
+/* k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16742(C_word c,C_word t0,C_word t1){
+C_word 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_16742,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[18],t1);
+t3=(C_word)C_i_cadddr(((C_word*)t0)[17]);
+t4=(C_word)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_16625,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_16629,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t7=(C_word)C_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2267 transform");
+t8=((C_word*)((C_word*)t0)[2])[1];
+f_16269(t8,t6,t7,((C_word*)t0)[18],((C_word*)t0)[6]);}
+
+/* k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16629(C_word c,C_word t0,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_16629,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16632,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
+t3=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_16640,tmp=(C_word)a,a+=2,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16661,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: 2272 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[164]))(3,*((C_word*)lf[164]+1),t4,((C_word*)t0)[2]);}
+else{
+t3=t1;
+t4=((C_word*)t0)[4];
+f_16625(t4,(C_word)C_a_i_list(&a,1,t3));}}
+
+/* k16659 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16661(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_16661,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_16665,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_16667,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_16667(t10,t6,((C_word*)t0)[2]);}
+
+/* loop4176 in k16659 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16667(C_word t0,C_word 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_16667,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|6,a[1]=(C_word)f_16711,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_i_cdr(t3);
+C_trace("compiler.scm: 2273 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k16709 in loop4176 in k16659 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16711(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_16711,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[605],C_SCHEME_END_OF_LIST,t2);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
+t5=(C_word)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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41764189");
+t8=((C_word*)((C_word*)t0)[4])[1];
+f_16667(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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+C_trace("loop41764189");
+t8=((C_word*)((C_word*)t0)[4])[1];
+f_16667(t8,((C_word*)t0)[3],t7);}}
+
+/* k16663 in k16659 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16665(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2269 fold-right");
+((C_proc6)C_retrieve_symbol_proc(lf[612]))(6,*((C_word*)lf[612]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a16639 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16640(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_16640,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_a_i_list(&a,1,t2);
+t6=(C_word)C_a_i_list(&a,2,t3,t4);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,4,lf[512],lf[159],t5,t6));}
+
+/* k16630 in k16627 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16632(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_16632,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_16625(t2,(C_word)C_a_i_list(&a,1,t1));}
+
+/* k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16625(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_16625,NULL,2,t0,t1);}
+t2=(C_word)C_a_i_record(&a,4,lf[512],((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_16536,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_16575,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_16575(t11,t7,((C_word*)t0)[2]);}
+
+/* loop4206 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16575(C_word t0,C_word 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_16575,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_16602,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_16613,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));
+C_trace("g42224223");
+t6=t3;
+f_16602(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k16611 in loop4206 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16613(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_16613,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));
+C_trace("loop42064219");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16575(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));
+C_trace("loop42064219");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16575(t6,((C_word*)t0)[3],t5);}}
+
+/* g4222 in loop4206 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16602(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_16602,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16610,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: 2276 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t3,t2);}
+
+/* k16608 in g4222 in loop4206 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16610(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2276 ref-var");
+f_17340(((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16536(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_16536,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16539,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_16550,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16554,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16558,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16566,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2284 real-name");
+((C_proc3)C_retrieve_symbol_proc(lf[611]))(3,*((C_word*)lf[611]+1),t6,((C_word*)t0)[2]);}
+else{
+t3=t1;
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[5],t4));}}
+
+/* k16564 in k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16566(C_word c,C_word t0,C_word 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_16566,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
+t4=(C_word)C_a_i_cons(&a,2,t2,t3);
+C_trace("compiler.scm: 2284 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[609]))(3,*((C_word*)lf[609]+1),((C_word*)t0)[2],t4);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
+t3=(C_word)C_a_i_cons(&a,2,lf[610],t2);
+C_trace("compiler.scm: 2284 ->string");
+((C_proc3)C_retrieve_symbol_proc(lf[609]))(3,*((C_word*)lf[609]+1),((C_word*)t0)[2],t3);}}
+
+/* k16556 in k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16558(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2283 ##sys#make-lambda-info");
+((C_proc3)C_retrieve_symbol_proc(lf[608]))(3,*((C_word*)lf[608]+1),((C_word*)t0)[2],t1);}
+
+/* k16552 in k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16554(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2282 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[607]))(3,*((C_word*)lf[607]+1),((C_word*)t0)[2],t1);}
+
+/* k16548 in k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16550(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16550,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+C_trace("compiler.scm: 2279 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k16537 in k16534 in k16623 in k16740 in k16505 in k16502 in k16496 in k16490 in k16484 in k16481 in k16478 in a16475 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16539(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_16539,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[606],((C_word*)t0)[2],t2));}
+
+/* k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16375(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_16375,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16378,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2217 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,((C_word*)t0)[9]);}
+
+/* k16376 in k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16378(C_word c,C_word t0,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_16378,2,t0,t1);}
+if(C_truep(((C_word*)t0)[10])){
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16401,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_word)C_i_car(((C_word*)t0)[7]);
+C_trace("compiler.scm: 2221 transform");
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_16269(t5,t3,t4,((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16459,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2228 maptransform");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_17294(t3,t2,((C_word*)t0)[7],((C_word*)t0)[5],((C_word*)t0)[4]);}}
+
+/* k16457 in k16376 in k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16459(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_16459,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[512],lf[159],((C_word*)t0)[2],t1));}
+
+/* k16399 in k16376 in k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16401(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_16401,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[9]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16443,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: 2224 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t3,((C_word*)t0)[2]);}
+
+/* k16441 in k16399 in k16376 in k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16443,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[605],C_SCHEME_END_OF_LIST,t2);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16431,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_word)C_i_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 2225 transform");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16269(t6,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k16429 in k16441 in k16399 in k16376 in k16373 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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[22],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16431,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[6],t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[5],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t4));}
+
+/* k16361 in k16340 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16363(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_16363,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=t2;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,4,lf[512],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k16313 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16315(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_16315,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16321,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2205 test");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_15807(t3,t2,((C_word*)t0)[2],lf[588]);}
+
+/* k16319 in k16313 in k16301 in transform in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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 t5;
+C_word ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16321,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[604],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 k5138 in k5135 */
+static void C_fcall f_15834(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_15834,NULL,5,t0,t1,t2,t3,t4);}
+t5=t2;
+t6=(C_word)C_slot(t5,C_fix(3));
+t7=t2;
+t8=(C_word)C_slot(t7,C_fix(2));
+t9=t2;
+t10=(C_word)C_slot(t9,C_fix(1));
+t11=(C_word)C_eqp(t10,lf[99]);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_15868,a[2]=((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_15868(t13,t11);}
+else{
+t13=(C_word)C_eqp(t10,lf[517]);
+if(C_truep(t13)){
+t14=t12;
+f_15868(t14,t13);}
+else{
+t14=(C_word)C_eqp(t10,lf[139]);
+if(C_truep(t14)){
+t15=t12;
+f_15868(t15,t14);}
+else{
+t15=(C_word)C_eqp(t10,lf[565]);
+if(C_truep(t15)){
+t16=t12;
+f_15868(t16,t15);}
+else{
+t16=(C_word)C_eqp(t10,lf[107]);
+t17=t12;
+f_15868(t17,(C_truep(t16)?t16:(C_word)C_eqp(t10,lf[524])));}}}}}
+
+/* k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15868(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_15868,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_word)C_eqp(((C_word*)t0)[12],lf[159]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15879,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_15889,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_word)C_eqp(((C_word*)t0)[12],lf[513]);
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[10]);
+t5=(C_word)C_i_car(((C_word*)t0)[11]);
+t6=(C_word)C_i_cdr(((C_word*)t0)[11]);
+t7=(C_word)C_i_pairp(t6);
+t8=(C_truep(t7)?(C_word)C_i_cadr(((C_word*)t0)[11]):C_SCHEME_FALSE);
+t9=(C_word)C_slot(t4,C_fix(1));
+t10=(C_word)C_eqp(lf[517],t9);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15953,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_word)C_slot(t4,C_fix(2));
+t14=(C_word)C_i_car(t13);
+t15=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16008,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_16126,a[2]=t14,a[3]=((C_word*)t0)[3],a[4]=t15,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2155 test");
+t17=((C_word*)((C_word*)t0)[3])[1];
+f_15807(t17,t16,t14,lf[549]);}
+else{
+t13=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+t14=(C_word)C_a_i_cons(&a,2,t5,t13);
+C_trace("compiler.scm: 2148 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[597]))(4,*((C_word*)lf[597]+1),t11,((C_word*)t0)[6],t14);}}
+else{
+t13=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+C_trace("compiler.scm: 2148 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[597]))(4,*((C_word*)lf[597]+1),t11,((C_word*)t0)[6],t13);}}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[12],lf[173]);
+t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[12],lf[550]));
+if(C_truep(t5)){
+t6=(C_word)C_i_caddr(((C_word*)t0)[11]);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16172,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: 2181 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+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_16211,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_16211(t9,((C_word*)t0)[13],((C_word*)t0)[10]);}}}}}
+
+/* loop3875 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16211(C_word t0,C_word 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_16211,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_16219,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_16226,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));
+C_trace("g38823883");
+t6=t3;
+f_16219(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k16224 in loop3875 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16226(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_16211(t3,((C_word*)t0)[2],t2);}
+
+/* g3882 in loop3875 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16219(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_16219,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2191 gather");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16172(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_16172,5,t0,t1,t2,t3,t4);}
+t5=(C_truep(((C_word*)t0)[7])?(C_word)C_i_car(((C_word*)t0)[6]):lf[601]);
+t6=(C_word)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_17394,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_17396,a[2]=t12,a[3]=t9,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t14=((C_word*)t12)[1];
+f_17396(t14,t10,t6);}
+
+/* walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17396(C_word t0,C_word 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_17396,NULL,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(3));
+t5=t2;
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=t2;
+t8=(C_word)C_slot(t7,C_fix(1));
+t9=(C_word)C_eqp(t8,lf[517]);
+if(C_truep(t9)){
+t10=(C_word)C_i_car(t6);
+if(C_truep((C_word)C_i_memq(t10,((C_word*)t0)[4]))){
+t11=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17440,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2348 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t11,*((C_word*)lf[144]+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_word)C_eqp(t8,lf[99]);
+t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_17449,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_17449(t12,t10);}
+else{
+t12=(C_word)C_eqp(t8,lf[139]);
+if(C_truep(t12)){
+t13=t11;
+f_17449(t13,t12);}
+else{
+t13=(C_word)C_eqp(t8,lf[107]);
+if(C_truep(t13)){
+t14=t11;
+f_17449(t14,t13);}
+else{
+t14=(C_word)C_eqp(t8,lf[565]);
+if(C_truep(t14)){
+t15=t11;
+f_17449(t15,t14);}
+else{
+t15=(C_word)C_eqp(t8,lf[101]);
+t16=t11;
+f_17449(t16,(C_truep(t15)?t15:(C_word)C_eqp(t8,lf[524])));}}}}}}
+
+/* k17447 in walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17449(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_17449,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[252]);
+if(C_truep(t2)){
+t3=(C_word)C_i_car(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_memq(t3,((C_word*)t0)[5]))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17475,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: 2352 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t4,*((C_word*)lf[144]+1),((C_word*)((C_word*)t0)[4])[1],t3);}
+else{
+t4=(C_word)C_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2353 walk");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_17396(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_17480,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_17480(t6,((C_word*)t0)[8],((C_word*)t0)[3]);}}}
+
+/* loop4403 in k17447 in walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_17480(C_word 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_17480,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_17490,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));
+C_trace("g44104411");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_17396(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k17488 in loop4403 in k17447 in walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17490(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_17480(t3,((C_word*)t0)[2],t2);}
+
+/* k17473 in k17447 in walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17475(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]);
+C_trace("compiler.scm: 2353 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_17396(t4,((C_word*)t0)[2],t3);}
+
+/* k17438 in walk in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17440(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);}
+
+/* k17392 in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_17394(C_word c,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_17394,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[9])[1];
+t3=(C_word)C_i_length(t2);
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16185,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: 2187 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t4,((C_word*)t0)[2],((C_word*)t0)[5],lf[603],t3);}
+
+/* k16183 in k17392 in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16185(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_16185,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16188,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: 2188 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[6],lf[602],((C_word*)t0)[2]);}
+
+/* k16186 in k16183 in k17392 in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16188(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_16188,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16199,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: 2189 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k16197 in k16186 in k16183 in k17392 in a16171 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16199(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2189 gather");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_15834(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k16124 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16126(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_16008(2,t2,C_SCHEME_FALSE);}
+else{
+C_trace("compiler.scm: 2155 test");
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_15807(t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[567]);}}
+
+/* k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16008,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_16014,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_slot(t3,C_fix(1));
+t5=t2;
+f_16014(t5,(C_word)C_eqp(lf[173],t4));}
+else{
+t3=t2;
+f_16014(t3,C_SCHEME_FALSE);}}
+
+/* k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16014(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_16014,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[11];
+t3=(C_word)C_slot(t2,C_fix(2));
+t4=(C_word)C_i_caddr(t3);
+t5=(C_word)C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_16031,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: 2160 test");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t7,t6,((C_word*)t0)[5],lf[571]);}
+else{
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[10],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t2);
+C_trace("compiler.scm: 2148 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[597]))(4,*((C_word*)lf[597]+1),((C_word*)t0)[8],((C_word*)t0)[7],t3);}}
+
+/* k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16031(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_16031,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_16034,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: 2161 test");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_15807(t3,t2,((C_word*)t0)[6],lf[547]);}
+
+/* k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16034(C_word c,C_word t0,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_16034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_16037,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_word)C_i_length(((C_word*)t0)[2]);
+t4=(C_word)C_i_length(t1);
+t5=(C_word)C_eqp(t3,t4);
+t6=t2;
+f_16037(t6,(C_truep(t5)?(C_word)C_i_listp(((C_word*)t0)[3]):C_SCHEME_FALSE));}
+else{
+t3=t2;
+f_16037(t3,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_16037(t3,C_SCHEME_FALSE);}}
+
+/* k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16037(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_16037,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_16040,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_16055,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_16076,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2168 llist-length");
+((C_proc3)C_retrieve_symbol_proc(lf[600]))(3,*((C_word*)lf[600]+1),t4,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_16055(t4,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_16055(t4,C_SCHEME_FALSE);}}
+
+/* k16074 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16076(C_word 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_cdr(((C_word*)t0)[3]);
+t3=(C_word)C_i_length(t2);
+t4=(C_word)C_eqp(t1,t3);
+t5=((C_word*)t0)[2];
+f_16055(t5,(C_word)C_i_not(t4));}
+
+/* k16053 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_16055(C_word t0,C_word t1){
+C_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_16055,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16062,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2171 source-info->string");
+((C_proc3)C_retrieve_symbol_proc(lf[599]))(3,*((C_word*)lf[599]+1),t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_16040(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k16060 in k16053 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16062(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2169 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),((C_word*)t0)[2],lf[598],t1);}
+
+/* k16038 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16040(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_16040,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_16043,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: 2172 register-direct-call!");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_15823(t3,t2,((C_word*)t0)[10]);}
+
+/* k16041 in k16038 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16043(C_word c,C_word t0,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_16043,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16046,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: 2173 register-customizable!");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_15813(t3,t2,((C_word*)t0)[2],((C_word*)t0)[9]);}
+else{
+t3=(C_word)C_a_i_list(&a,2,((C_word*)t0)[9],((C_word*)t0)[8]);
+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);
+C_trace("compiler.scm: 2148 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[597]))(4,*((C_word*)lf[597]+1),((C_word*)t0)[5],((C_word*)t0)[4],t5);}}
+
+/* k16044 in k16041 in k16038 in k16035 in k16032 in k16029 in k16012 in k16006 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_16046(C_word c,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_16046,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
+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);
+C_trace("compiler.scm: 2148 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[597]))(4,*((C_word*)lf[597]+1),((C_word*)t0)[3],((C_word*)t0)[2],t4);}
+
+/* k15951 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15953(C_word c,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_15953,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_15958,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_15958(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3846 in k15951 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15958(C_word t0,C_word 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_15958,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_15966,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_15973,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));
+C_trace("g38533854");
+t6=t3;
+f_15966(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k15971 in loop3846 in k15951 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15973(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_15958(t3,((C_word*)t0)[2],t2);}
+
+/* g3853 in loop3846 in k15951 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15966(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_15966,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2178 gather");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15889(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_15889,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15893,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_15906,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_15906(t8,t4,t2);}
+
+/* loop3776 in a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15906(C_word t0,C_word 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_15906,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_15914,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_15921,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));
+C_trace("g37833784");
+t6=t3;
+f_15914(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k15919 in loop3776 in a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15921(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_15906(t3,((C_word*)t0)[2],t2);}
+
+/* g3783 in loop3776 in a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15914(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_15914,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 2140 gather");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_15834(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15891 in a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15893(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_15893,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15904,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: 2141 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15902 in k15891 in a15888 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15904(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2141 gather");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_15834(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a15878 in k15866 in gather in ##compiler#perform-closure-conversion in k5138 in k5135 */
+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 *a;
+if(c!=2) C_bad_argc_2(c,2,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15879,2,t0,t1);}
+t2=(C_word)C_i_length(((C_word*)t0)[3]);
+C_trace("compiler.scm: 2139 split-at");
+((C_proc4)C_retrieve_symbol_proc(lf[320]))(4,*((C_word*)lf[320]+1),t1,((C_word*)t0)[2],t2);}
+
+/* register-direct-call! in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15823(C_word 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_15823,NULL,3,t0,t1,t2);}
+t3=(C_word)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_15832,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2126 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t5,*((C_word*)lf[144]+1),*((C_word*)lf[62]+1),t2);}
+
+/* k15830 in register-direct-call! in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15832(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[62]+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 k5138 in k5135 */
+static void C_fcall f_15813(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_15813,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15818,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: 2121 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t4,*((C_word*)lf[144]+1),((C_word*)((C_word*)t0)[3])[1],t2);}
+
+/* k15816 in register-customizable! in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_ccall f_15818(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: 2122 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[596],C_SCHEME_TRUE);}
+
+/* test in ##compiler#perform-closure-conversion in k5138 in k5135 */
+static void C_fcall f_15807(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_15807,NULL,4,t0,t1,t2,t3);}
+C_trace("compiler.scm: 2118 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t1,((C_word*)t0)[2],t2,t3);}
+
+/* ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13727(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_13727,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13731,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1702 make-vector");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(3001),C_SCHEME_END_OF_LIST);}
+
+/* k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+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 t6;
+C_word t7;
+C_word 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_13731,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_13740,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_14434,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_14468,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_14646,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_14652,tmp=(C_word)a,a+=2,tmp));
+t21=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14666,a[2]=t1,a[3]=t15,tmp=(C_word)a,a+=4,tmp));
+t22=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14691,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=t13,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[3],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1882 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t22,lf[592],lf[594]);}
+
+/* k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14691(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_14691,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_14695,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: 1884 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_13740(t4,t3,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14695(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_14695,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14698,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: 1887 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[585]))(4,*((C_word*)lf[585]+1),t2,lf[592],lf[593]);}
+
+/* k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14698(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_14698,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14701,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_14711,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);
+C_trace("compiler.scm: 1888 ##sys#hash-table-for-each");
+((C_proc4)C_retrieve_symbol_proc(lf[591]))(4,*((C_word*)lf[591]+1),t2,t3,((C_word*)t0)[4]);}
+
+/* a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14711(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 ab[72],*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_14711,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_SCHEME_FALSE;
+t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
+t30=C_fix(0);
+t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
+t32=C_fix(0);
+t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
+t34=(*a=C_CLOSURE_TYPE|21,a[1]=(C_word)f_14715,a[2]=t11,a[3]=t21,a[4]=t15,a[5]=t33,a[6]=((C_word*)t0)[2],a[7]=t23,a[8]=t13,a[9]=t25,a[10]=t3,a[11]=((C_word*)t0)[3],a[12]=t27,a[13]=t31,a[14]=t19,a[15]=t29,a[16]=t2,a[17]=((C_word*)t0)[4],a[18]=t1,a[19]=t9,a[20]=t7,a[21]=t5,tmp=(C_word)a,a+=22,tmp);
+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|17,a[1]=(C_word)f_15659,a[2]=t36,a[3]=t29,a[4]=t27,a[5]=t9,a[6]=t7,a[7]=t25,a[8]=t23,a[9]=t21,a[10]=t19,a[11]=t33,a[12]=t17,a[13]=t11,a[14]=t15,a[15]=t31,a[16]=t13,a[17]=t5,tmp=(C_word)a,a+=18,tmp));
+t38=((C_word*)t36)[1];
+f_15659(t38,t34,t3);}
+
+/* loop3299 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15659(C_word t0,C_word 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(17);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_15659,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_15667,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);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_15667(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);}}
+
+/* g3306 in loop3299 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static C_word C_fcall f_15667(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_stack_check;
+t2=(C_word)C_i_car(t1);
+t3=(C_word)C_eqp(t2,lf[549]);
+if(C_truep(t3)){
+t4=C_set_block_item(((C_word*)t0)[16],0,C_SCHEME_TRUE);
+return(t4);}
+else{
+t4=(C_word)C_eqp(t2,lf[571]);
+if(C_truep(t4)){
+t5=(C_word)C_i_cdr(t1);
+t6=C_mutate(((C_word *)((C_word*)t0)[15])+1,t5);
+t7=(C_word)C_i_length(((C_word*)((C_word*)t0)[15])[1]);
+t8=C_mutate(((C_word *)((C_word*)t0)[14])+1,t7);
+return(t8);}
+else{
+t5=(C_word)C_eqp(t2,lf[537]);
+if(C_truep(t5)){
+t6=C_set_block_item(((C_word*)t0)[13],0,C_SCHEME_TRUE);
+return(t6);}
+else{
+t6=(C_word)C_eqp(t2,lf[559]);
+if(C_truep(t6)){
+t7=(C_word)C_i_cdr(t1);
+t8=C_mutate(((C_word *)((C_word*)t0)[12])+1,t7);
+return(t8);}
+else{
+t7=(C_word)C_eqp(t2,lf[547]);
+if(C_truep(t7)){
+t8=(C_word)C_i_cdr(t1);
+t9=C_mutate(((C_word *)((C_word*)t0)[11])+1,t8);
+t10=(C_word)C_i_length(((C_word*)((C_word*)t0)[11])[1]);
+t11=C_mutate(((C_word *)((C_word*)t0)[10])+1,t10);
+return(t11);}
+else{
+t8=(C_word)C_eqp(t2,lf[557]);
+if(C_truep(t8)){
+t9=C_set_block_item(((C_word*)t0)[9],0,C_SCHEME_TRUE);
+return(t9);}
+else{
+t9=(C_word)C_eqp(t2,lf[558]);
+if(C_truep(t9)){
+t10=C_set_block_item(((C_word*)t0)[8],0,C_SCHEME_TRUE);
+return(t10);}
+else{
+t10=(C_word)C_eqp(t2,lf[566]);
+if(C_truep(t10)){
+t11=C_set_block_item(((C_word*)t0)[7],0,C_SCHEME_TRUE);
+return(t11);}
+else{
+t11=(C_word)C_eqp(t2,lf[538]);
+if(C_truep(t11)){
+t12=C_set_block_item(((C_word*)t0)[6],0,C_SCHEME_TRUE);
+return(t12);}
+else{
+t12=(C_word)C_eqp(t2,lf[567]);
+if(C_truep(t12)){
+t13=(C_word)C_i_cdr(t1);
+t14=C_mutate(((C_word *)((C_word*)t0)[5])+1,t13);
+return(t14);}
+else{
+t13=(C_word)C_eqp(t2,lf[569]);
+if(C_truep(t13)){
+t14=(C_word)C_i_cdr(t1);
+t15=C_mutate(((C_word *)((C_word*)t0)[4])+1,t14);
+return(t15);}
+else{
+t14=(C_word)C_eqp(t2,lf[543]);
+if(C_truep(t14)){
+t15=(C_word)C_i_cdr(t1);
+t16=C_mutate(((C_word *)((C_word*)t0)[3])+1,t15);
+return(t16);}
+else{
+t15=(C_word)C_eqp(t2,lf[544]);
+if(C_truep(t15)){
+t16=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
+return(t16);}
+else{
+t16=C_SCHEME_UNDEFINED;
+return(t16);}}}}}}}}}}}}}}
+
+/* k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14715(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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[29],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14715,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[21])[1];
+t3=(C_truep(t2)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[20])[1]);
+t4=C_mutate(((C_word *)((C_word*)t0)[20])+1,t3);
+t5=((C_word*)((C_word*)t0)[21])[1];
+t6=(C_truep(t5)?C_SCHEME_FALSE:((C_word*)((C_word*)t0)[19])[1]);
+t7=C_mutate(((C_word *)((C_word*)t0)[19])+1,t6);
+t8=(*a=C_CLOSURE_TYPE|19,a[1]=(C_word)f_14726,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[19],a[5]=((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)[20],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);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[16],a[4]=t8,a[5]=((C_word*)t0)[20],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(*((C_word*)lf[63]+1))){
+t10=((C_word*)((C_word*)t0)[20])[1];
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15637,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t10)){
+t12=t11;
+f_15637(t12,t10);}
+else{
+if(C_truep(((C_word*)((C_word*)t0)[9])[1])){
+t12=((C_word*)((C_word*)t0)[2])[1];
+t13=t11;
+f_15637(t13,t12);}
+else{
+t12=t11;
+f_15637(t12,C_SCHEME_FALSE);}}}
+else{
+t10=t9;
+f_15610(t10,C_SCHEME_FALSE);}}
+
+/* k15635 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15637(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)C_slot(t2,C_fix(1));
+t4=((C_word*)t0)[2];
+f_15610(t4,(C_word)C_eqp(lf[173],t3));}
+else{
+t2=((C_word*)t0)[2];
+f_15610(t2,C_SCHEME_FALSE);}}
+
+/* k15608 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15610(C_word t0,C_word t1){
+C_word 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_word)C_slot(t2,C_fix(2));
+t4=(C_word)C_i_car(t3);
+C_trace("compiler.scm: 1937 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),((C_word*)t0)[4],t4,((C_word*)t0)[3]);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=(C_word)C_slot(t3,C_fix(2));
+t5=(C_word)C_i_car(t4);
+C_trace("compiler.scm: 1937 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),((C_word*)t0)[4],t5,((C_word*)t0)[3]);}}
+else{
+t2=((C_word*)t0)[4];
+f_14726(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14726(C_word c,C_word t0,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_14726,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_14729,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],tmp=(C_word)a,a+=19,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[17],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(*((C_word*)lf[63]+1))){
+if(C_truep(((C_word*)((C_word*)t0)[9])[1])){
+if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[8])[1]))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15607,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=((C_word*)t0)[17];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t4,t5,lf[428]);}
+else{
+t4=t3;
+f_15552(t4,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_15552(t4,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_15552(t4,C_SCHEME_FALSE);}}
+
+/* k15605 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15607(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_15552(t2,(C_word)C_i_not(t1));}
+
+/* k15550 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15552(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_15552,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15555,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: 1946 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t2,lf[117],lf[590],((C_word*)t0)[3]);}
+else{
+t3=t2;
+f_15555(2,t3,C_SCHEME_UNDEFINED);}}
+else{
+t2=((C_word*)t0)[4];
+f_14729(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k15553 in k15550 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15555,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15561,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_15583,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: 1947 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t3,((C_word*)t0)[2]);}
+
+/* k15581 in k15553 in k15550 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15583(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_14729(2,t3,t2);}
+else{
+t2=((C_word*)t0)[3];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),((C_word*)t0)[2],t2,lf[312]);}}
+
+/* k15559 in k15553 in k15550 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15561(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_14729(2,t3,t2);}
+else{
+C_trace("compiler.scm: 1949 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[3],lf[117],lf[589],((C_word*)t0)[2]);}}
+
+/* k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14729(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_14729,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|17,a[1]=(C_word)f_14732,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_word*)((C_word*)t0)[14])[1])){
+t3=((C_word*)((C_word*)t0)[2])[1];
+if(C_truep(t3)){
+C_trace("compiler.scm: 1953 quick-put!");
+f_14652(t2,((C_word*)t0)[9],lf[588],C_SCHEME_TRUE);}
+else{
+t4=t2;
+f_14732(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+t3=t2;
+f_14732(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14732(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[36],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14732,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_14735,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_word*)((C_word*)t0)[10])[1])){
+t3=((C_word*)((C_word*)t0)[10])[1];
+t4=(C_word)C_slot(t3,C_fix(2));
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15323,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[12],a[4]=((C_word*)t0)[8],a[5]=t2,a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
+t6=((C_word*)((C_word*)t0)[10])[1];
+t7=(C_word)C_slot(t6,C_fix(1));
+t8=(C_word)C_eqp(lf[173],t7);
+if(C_truep(t8)){
+t9=(C_word)C_i_cadr(t4);
+t10=(C_word)C_i_not(t9);
+if(C_truep(t10)){
+t11=t5;
+f_15323(2,t11,t10);}
+else{
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15355,a[2]=((C_word*)t0)[16],tmp=(C_word)a,a+=3,tmp);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15363,a[2]=t11,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15365,a[2]=((C_word*)t0)[10],tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_15371,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_15323(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_word)C_slot(t3,C_fix(2));
+t5=((C_word*)((C_word*)t0)[2])[1];
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(C_word)C_eqp(lf[173],t6);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15410,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15416,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[16],a[4]=((C_word*)t0)[8],a[5]=((C_word*)t0)[9],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_14735(2,t8,C_SCHEME_UNDEFINED);}}
+else{
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15474,a[2]=t2,a[3]=((C_word*)t0)[8],a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[13],tmp=(C_word)a,a+=7,tmp);
+t4=((C_word*)t0)[15];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t3,t4,lf[443]);}}}
+
+/* k15472 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15474(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_15474,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15478,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("g34413442");
+t3=t2;
+f_15478(t3,((C_word*)t0)[2],t1);}
+else{
+t2=((C_word*)t0)[2];
+f_14735(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* g3441 in k15472 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15478(C_word t0,C_word 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_15478,NULL,3,t0,t1,t2);}
+t3=t2;
+if(C_truep((C_word)C_i_structurep(t3,lf[512]))){
+if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15496,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1985 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[585]))(5,*((C_word*)lf[585]+1),t4,lf[586],lf[587],((C_word*)t0)[4]);}
+else{
+t4=t2;
+t5=(C_word)C_slot(t4,C_fix(2));
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15537,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: 1991 quick-put!");
+f_14652(t6,((C_word*)t0)[2],lf[582],C_SCHEME_TRUE);}}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k15535 in g3441 in k15472 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15537(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1992 quick-put!");
+f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[569],((C_word*)t0)[2]);}
+
+/* k15494 in g3441 in k15472 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15496(C_word c,C_word t0,C_word t1){
+C_word 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_15496,2,t0,t1);}
+t2=((C_word*)t0)[3];
+t3=((C_word*)t0)[2];
+t4=(C_word)C_a_i_list(&a,1,lf[437]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15501,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[443],C_SCHEME_TRUE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=(C_word)C_i_car(t4);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[443],t7);}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k15499 in k15494 in g3441 in k15472 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15501(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+
+/* a15415 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15416(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_15416,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15420,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_15454,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: 1973 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[538]);}
+
+/* k15452 in a15415 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15454(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_word)C_i_pairp(((C_word*)t0)[5]))){
+C_trace("compiler.scm: 1975 quick-put!");
+f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[584],C_SCHEME_TRUE);}
+else{
+t2=((C_word*)t0)[3];
+f_15420(2,t2,C_SCHEME_UNDEFINED);}}
+else{
+t2=((C_word*)t0)[3];
+f_15420(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k15418 in a15415 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15420(C_word c,C_word t0,C_word 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_15420,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+t3=(C_word)C_i_not(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15429,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: 1980 quick-put!");
+f_14652(((C_word*)t0)[5],((C_word*)t0)[4],lf[582],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_15437,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1977 every");
+((C_proc4)C_retrieve_symbol_proc(lf[412]))(4,*((C_word*)lf[412]+1),t4,t5,((C_word*)t0)[2]);}}
+
+/* a15436 in k15418 in a15415 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15437(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_15437,3,t0,t1,t2);}
+C_trace("compiler.scm: 1978 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t1,((C_word*)t0)[2],t2,lf[538]);}
+
+/* k15427 in k15418 in a15415 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15429(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: 1980 quick-put!");
+f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[582],C_SCHEME_TRUE);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* a15409 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15410(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_15410,2,t0,t1);}
+C_trace("compiler.scm: 1972 scan-free-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[583]))(3,*((C_word*)lf[583]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* a15370 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15371(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*)tr2rv,(void*)f_15371r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_15371r(t0,t1,t2);}}
+
+static void C_ccall f_15371r(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_fix(0)));}
+
+/* a15364 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15365(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_15365,2,t0,t1);}
+C_trace("compiler.scm: 1964 scan-free-variables");
+((C_proc3)C_retrieve_symbol_proc(lf[583]))(3,*((C_word*)lf[583]+1),t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k15361 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15363(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1962 every");
+((C_proc4)C_retrieve_symbol_proc(lf[412]))(4,*((C_word*)lf[412]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a15354 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15355(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_15355,3,t0,t1,t2);}
+C_trace("compiler.scm: 1963 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t1,((C_word*)t0)[2],t2,lf[538]);}
+
+/* k15321 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15323(C_word c,C_word t0,C_word 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_15323,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15329,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_word)C_eqp(C_fix(1),t3);
+if(C_truep(t4)){
+t5=((C_word*)((C_word*)t0)[2])[1];
+t6=t2;
+f_15329(t6,(C_word)C_eqp(C_fix(1),t5));}
+else{
+t5=t2;
+f_15329(t5,C_SCHEME_FALSE);}}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[5];
+f_14735(2,t3,t2);}}
+
+/* k15327 in k15321 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15329(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("compiler.scm: 1966 quick-put!");
+f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[581],C_SCHEME_TRUE);}
+else{
+C_trace("compiler.scm: 1967 quick-put!");
+f_14652(((C_word*)t0)[3],((C_word*)t0)[2],lf[582],C_SCHEME_TRUE);}}
+
+/* k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14735(C_word c,C_word t0,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_14735,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_14738,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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|6,a[1]=(C_word)f_15270,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[7],a[4]=t2,a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[9],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[9])[1])){
+t4=((C_word*)((C_word*)t0)[9])[1];
+t5=(C_word)C_slot(t4,C_fix(1));
+t6=t3;
+f_15270(t6,(C_word)C_eqp(lf[99],t5));}
+else{
+t4=t3;
+f_15270(t4,C_SCHEME_FALSE);}}
+
+/* k15268 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15270(C_word t0,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_15270,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)((C_word*)t0)[6])[1];
+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_15279,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: 2000 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[314]))(3,*((C_word*)lf[314]+1),t5,t4);}
+else{
+t2=((C_word*)t0)[4];
+f_14738(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k15277 in k15268 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15279(C_word c,C_word t0,C_word 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: 2002 quick-put!");
+f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[580],C_SCHEME_TRUE);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[4];
+f_14738(2,t4,t3);}}
+else{
+t2=((C_word*)((C_word*)t0)[2])[1];
+t3=(C_word)C_eqp(C_fix(1),t2);
+if(C_truep(t3)){
+C_trace("compiler.scm: 2002 quick-put!");
+f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[580],C_SCHEME_TRUE);}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=((C_word*)t0)[4];
+f_14738(2,t5,t4);}}}
+
+/* k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14738(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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*)tr2,(void*)f_14738,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14741,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);
+if(C_truep(((C_word*)((C_word*)t0)[9])[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_15139,a[2]=t2,a[3]=((C_word*)t0)[14],a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+t6=((C_word*)((C_word*)t0)[9])[1];
+t7=(C_word)C_slot(t6,C_fix(1));
+t8=(C_word)C_eqp(lf[173],t7);
+if(C_truep(t8)){
+t9=((C_word*)((C_word*)t0)[11])[1];
+t10=((C_word*)((C_word*)t0)[2])[1];
+t11=t5;
+f_15139(t11,(C_word)C_eqp(t9,t10));}
+else{
+t9=t5;
+f_15139(t9,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_14741(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15139(C_word t0,C_word 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_15139,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)((C_word*)t0)[7])[1];
+t3=(C_word)C_slot(t2,C_fix(2));
+if(C_truep((C_word)C_i_cadr(t3))){
+t4=(C_word)C_i_caddr(t3);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15162,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: 2016 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),((C_word*)t0)[2],t4,t5);}
+else{
+t4=((C_word*)t0)[2];
+f_14741(2,t4,C_SCHEME_UNDEFINED);}}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[2];
+f_14741(2,t3,t2);}}
+
+/* a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15162(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_15162,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15166,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_15166(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_15205,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_15205(t9,t5,t2);}}
+
+/* loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15205(C_word t0,C_word 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_15205,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_15213,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_15241,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));
+C_trace("g35253526");
+t6=t3;
+f_15213(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k15239 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15241(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_15205(t3,((C_word*)t0)[2],t2);}
+
+/* g3525 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15213(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_15213,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15220,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_15238,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 2022 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t4,((C_word*)t0)[2],t2,lf[571]);}
+
+/* k15236 in g3525 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15238(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15238,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_15220(t2,C_SCHEME_FALSE);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15234,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2023 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[557]);}}
+
+/* k15232 in k15236 in g3525 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15234(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_15220(t2,(C_word)C_i_not(t1));}
+
+/* k15218 in g3525 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15220(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_15220,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15223,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2024 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[427],C_SCHEME_TRUE);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k15221 in k15218 in g3525 in loop3518 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15223(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);}
+
+/* k15164 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15166(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_15166,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15172,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_word)C_i_memq(((C_word*)t0)[2],*((C_word*)lf[79]+1));
+t4=t2;
+f_15172(t4,(C_word)C_i_not(t3));}
+else{
+t3=t2;
+f_15172(t3,C_SCHEME_FALSE);}}
+
+/* k15170 in k15164 in a15161 in k15137 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15172(C_word t0,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_15172,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2030 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[5],((C_word*)t0)[4],t2,lf[578],C_SCHEME_TRUE);}
+else{
+if(C_truep(((C_word*)t0)[3])){
+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)C_i_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 2033 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[5],((C_word*)t0)[4],t4,lf[579],C_SCHEME_TRUE);}
+else{
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}}}
+
+/* k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14741(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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[27],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14741,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_14744,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],tmp=(C_word)a,a+=13,tmp);
+t3=((C_word*)((C_word*)t0)[10])[1];
+if(C_truep(t3)){
+t4=t2;
+f_14744(2,t4,C_SCHEME_UNDEFINED);}
+else{
+if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[3])[1]))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15081,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=t2,a[5]=((C_word*)t0)[6],tmp=(C_word)a,a+=6,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[7])[1])){
+t5=((C_word*)((C_word*)t0)[7])[1];
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(C_word)C_eqp(lf[517],t6);
+t8=(C_word)C_i_not(t7);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15093,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[7],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t8)){
+t10=t9;
+f_15093(t10,t8);}
+else{
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15107,a[2]=t9,tmp=(C_word)a,a+=3,tmp);
+t11=((C_word*)((C_word*)t0)[7])[1];
+t12=(C_word)C_slot(t11,C_fix(2));
+t13=(C_word)C_i_car(t12);
+C_trace("compiler.scm: 2041 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t10,((C_word*)t0)[13],t13,lf[538]);}}
+else{
+t5=t4;
+f_15081(t5,C_SCHEME_FALSE);}}
+else{
+t4=t2;
+f_14744(2,t4,C_SCHEME_UNDEFINED);}}}
+
+/* k15105 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15107(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_15093(t2,(C_word)C_i_not(t1));}
+
+/* k15091 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15093(C_word t0,C_word t1){
+C_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_15093,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15100,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2042 expression-has-side-effects?");
+((C_proc4)C_retrieve_symbol_proc(lf[577]))(4,*((C_word*)lf[577]+1),t2,((C_word*)((C_word*)t0)[3])[1],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[4];
+f_15081(t2,C_SCHEME_FALSE);}}
+
+/* k15098 in k15091 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15100(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_15081(t2,(C_word)C_i_not(t1));}
+
+/* k15079 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_15081(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: 2044 quick-put!");
+f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[576],C_SCHEME_TRUE);}
+else{
+t3=((C_word*)t0)[4];
+f_14744(2,t3,C_SCHEME_UNDEFINED);}}
+else{
+t2=((C_word*)((C_word*)t0)[2])[1];
+if(C_truep(t2)){
+C_trace("compiler.scm: 2044 quick-put!");
+f_14652(((C_word*)t0)[4],((C_word*)t0)[3],lf[576],C_SCHEME_TRUE);}
+else{
+t3=((C_word*)t0)[4];
+f_14744(2,t3,C_SCHEME_UNDEFINED);}}}
+
+/* k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14744(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_14744,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14747,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=(C_truep(((C_word*)((C_word*)t0)[5])[1])?(C_word)C_i_not(((C_word*)((C_word*)t0)[2])[1]):C_SCHEME_FALSE);
+if(C_truep(t3)){
+t4=((C_word*)((C_word*)t0)[5])[1];
+t5=(C_word)C_slot(t4,C_fix(1));
+t6=(C_word)C_eqp(lf[517],t5);
+if(C_truep(t6)){
+t7=((C_word*)((C_word*)t0)[5])[1];
+t8=(C_word)C_slot(t7,C_fix(2));
+t9=(C_word)C_i_car(t8);
+t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14961,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t9,a[6]=((C_word*)t0)[11],a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 2056 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t10,((C_word*)t0)[11],t9,lf[571]);}
+else{
+t7=C_SCHEME_UNDEFINED;
+t8=t2;
+f_14747(2,t8,t7);}}
+else{
+t4=t2;
+f_14747(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14961(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_14961,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14967,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_15042,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: 2057 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t3,((C_word*)t0)[6],((C_word*)t0)[5],lf[549]);}
+
+/* k15040 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15042(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_14967(2,t2,C_SCHEME_FALSE);}
+else{
+C_trace("compiler.scm: 2057 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[567]);}}
+
+/* k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14967(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_14967,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14970,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_14970(t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15032,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: 2058 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t3,((C_word*)t0)[7],((C_word*)t0)[6],lf[537]);}}
+
+/* k15030 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15032(C_word c,C_word t0,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_15032,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[6];
+f_14970(t2,C_SCHEME_FALSE);}
+else{
+if(C_truep(((C_word*)t0)[5])){
+t2=(C_word)C_i_length(((C_word*)t0)[5]);
+t3=(C_word)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_14970(t5,C_SCHEME_FALSE);}
+else{
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15024,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: 2062 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2],lf[557]);}}
+else{
+t4=((C_word*)t0)[6];
+f_14970(t4,C_SCHEME_FALSE);}}
+else{
+t2=((C_word*)t0)[6];
+f_14970(t2,C_SCHEME_FALSE);}}}
+
+/* k15022 in k15030 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15024(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_15024,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_14970(t2,C_SCHEME_FALSE);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15020,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: 2063 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t2,((C_word*)t0)[2]);}}
+
+/* k15018 in k15022 in k15030 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15020(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_15020,2,t0,t1);}
+t2=(C_word)C_i_not(t1);
+if(C_truep(t2)){
+t3=((C_word*)t0)[4];
+f_14970(t3,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15016,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 2064 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2],lf[538]);}}
+
+/* k15014 in k15018 in k15022 in k15030 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_15016(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_14970(t2,(C_word)C_i_not(t1));}
+
+/* k14968 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14970(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_14970,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14973,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: 2065 quick-put!");
+f_14652(t2,((C_word*)t0)[2],lf[575],((C_word*)t0)[4]);}
+else{
+t2=((C_word*)t0)[6];
+f_14747(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14971 in k14968 in k14965 in k14959 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14973(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2066 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[574],C_SCHEME_TRUE);}
+
+/* k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14747(C_word c,C_word t0,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_14747,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14750,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_14775,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[10],a[5]=t2,a[6]=((C_word*)t0)[4],tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
+t4=((C_word*)((C_word*)t0)[4])[1];
+t5=(C_word)C_slot(t4,C_fix(1));
+t6=t3;
+f_14775(t6,(C_word)C_eqp(lf[173],t5));}
+else{
+t4=t3;
+f_14775(t4,C_SCHEME_FALSE);}}
+
+/* k14773 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14775(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_14775,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)((C_word*)t0)[6])[1];
+t3=(C_word)C_slot(t2,C_fix(2));
+if(C_truep((C_word)C_i_cadr(t3))){
+t4=C_SCHEME_UNDEFINED;
+t5=((C_word*)t0)[5];
+f_14750(2,t5,t4);}
+else{
+t4=(C_word)C_i_caddr(t3);
+t5=((C_word*)((C_word*)t0)[6])[1];
+t6=(C_word)C_slot(t5,C_fix(3));
+t7=(C_word)C_i_car(t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14801,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_word)C_i_pairp(t4))){
+t9=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t9))){
+t10=(C_word)C_slot(t7,C_fix(1));
+t11=t8;
+f_14801(t11,(C_word)C_eqp(lf[513],t10));}
+else{
+t10=t8;
+f_14801(t10,C_SCHEME_FALSE);}}
+else{
+t9=t8;
+f_14801(t9,C_SCHEME_FALSE);}}}
+else{
+t2=((C_word*)t0)[5];
+f_14750(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14799 in k14773 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14801(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_14801,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_slot(((C_word*)t0)[7],C_fix(3));
+t3=(C_word)C_i_length(t2);
+t4=(C_word)C_eqp(C_fix(2),t3);
+if(C_truep(t4)){
+t5=(C_word)C_i_car(t2);
+t6=(C_word)C_i_cadr(t2);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14827,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_word)C_slot(t5,C_fix(1));
+t9=(C_word)C_eqp(lf[517],t8);
+if(C_truep(t9)){
+t10=(C_word)C_slot(t6,C_fix(1));
+t11=(C_word)C_eqp(lf[517],t10);
+if(C_truep(t11)){
+t12=(C_word)C_i_car(((C_word*)t0)[2]);
+t13=(C_word)C_slot(t6,C_fix(2));
+t14=(C_word)C_i_car(t13);
+t15=t7;
+f_14827(t15,(C_word)C_eqp(t12,t14));}
+else{
+t12=t7;
+f_14827(t12,C_SCHEME_FALSE);}}
+else{
+t10=t7;
+f_14827(t10,C_SCHEME_FALSE);}}
+else{
+t5=C_SCHEME_UNDEFINED;
+t6=((C_word*)t0)[6];
+f_14750(2,t6,t5);}}
+else{
+t2=((C_word*)t0)[6];
+f_14750(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14825 in k14799 in k14773 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14827(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_14827,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_slot(((C_word*)t0)[6],C_fix(2));
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14833,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: 2086 quick-put!");
+f_14652(t4,((C_word*)t0)[2],lf[575],t3);}
+else{
+t2=((C_word*)t0)[5];
+f_14750(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14831 in k14825 in k14799 in k14773 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14833(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 2087 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[574],C_SCHEME_TRUE);}
+
+/* k14748 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14750(C_word c,C_word t0,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_14750,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14756,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);
+if(C_truep(((C_word*)((C_word*)t0)[5])[1])){
+t3=((C_word*)((C_word*)t0)[4])[1];
+if(C_truep(t3)){
+t4=t2;
+f_14756(t4,C_SCHEME_FALSE);}
+else{
+t4=((C_word*)((C_word*)t0)[3])[1];
+t5=((C_word*)((C_word*)t0)[2])[1];
+t6=t2;
+f_14756(t6,(C_word)C_eqp(t4,t5));}}
+else{
+t3=t2;
+f_14756(t3,C_SCHEME_FALSE);}}
+
+/* k14754 in k14748 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14756(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_14756,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14760,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: 2097 lset-adjoin");
+((C_proc5)C_retrieve_symbol_proc(lf[573]))(5,*((C_word*)lf[573]+1),t2,*((C_word*)lf[144]+1),*((C_word*)lf[55]+1),((C_word*)t0)[2]);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k14758 in k14754 in k14748 in k14745 in k14742 in k14739 in k14736 in k14733 in k14730 in k14727 in k14724 in k14713 in a14710 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14760(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! rest-parameters-promoted-to-vector ...) */,t1);
+C_trace("compiler.scm: 2098 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[544],lf[553]);}
+
+/* k14699 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14701(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_14701,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14705,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 2104 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[432]))(5,*((C_word*)lf[432]+1),t2,*((C_word*)lf[144]+1),*((C_word*)lf[55]+1),((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k14703 in k14699 in k14696 in k14693 in k14689 in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14705(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[55]+1 /* (set! rest-parameters-promoted-to-vector ...) */,t1);
+if(C_truep(*((C_word*)lf[51]+1))){
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+else{
+t3=C_mutate((C_word*)lf[51]+1 /* (set! original-program-size ...) */,*((C_word*)lf[52]+1));
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t0)[2]);}}
+
+/* contains? in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14666(C_word 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_14666,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_14676,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1877 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t5,((C_word*)t0)[2],t2,lf[556]);}}
+
+/* k14674 in contains? in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14676(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_14676,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14684,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1879 any");
+((C_proc4)C_retrieve_symbol_proc(lf[572]))(4,*((C_word*)lf[572]+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);}}
+
+/* a14683 in k14674 in contains? in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14684(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_14684,3,t0,t1,t2);}
+C_trace("compiler.scm: 1879 contains?");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14666(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* quick-put! in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14652(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_14652,NULL,4,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14660,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_i_cdr(t2);
+C_trace("compiler.scm: 1872 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t5,t3,t4,t6);}
+
+/* k14658 in quick-put! in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14660(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));}
+
+/* ref in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14646(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_14646,NULL,4,t0,t1,t2,t3);}
+C_trace("compiler.scm: 1869 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[546]))(6,*((C_word*)lf[546]+1),t1,((C_word*)t0)[2],t2,lf[571],t3);}
+
+/* assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14468(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_14468,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=t3;
+t7=(C_word)C_slot(t6,C_fix(1));
+t8=(C_word)C_eqp(lf[139],t7);
+if(C_truep(t8)){
+C_trace("compiler.scm: 1843 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t1,((C_word*)t0)[2],t2,lf[566],C_SCHEME_TRUE);}
+else{
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14481,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_word)C_slot(t10,C_fix(1));
+t12=(C_word)C_eqp(lf[517],t11);
+if(C_truep(t12)){
+t13=t3;
+t14=(C_word)C_slot(t13,C_fix(2));
+t15=(C_word)C_i_car(t14);
+t16=t9;
+f_14481(t16,(C_word)C_eqp(t2,t15));}
+else{
+t13=t9;
+f_14481(t13,C_SCHEME_FALSE);}}}
+
+/* k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14481(C_word t0,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_14481,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_word)C_i_memq(((C_word*)t0)[6],((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14493,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_14493(t4,t2);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14597,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[94]))(4,*((C_word*)lf[94]+1),t4,t5,lf[312]);}}}
+
+/* k14595 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14597(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_14597,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[3];
+f_14493(t3,t2);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14607,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1848 variable-visible?");
+((C_proc3)C_retrieve_symbol_proc(lf[570]))(3,*((C_word*)lf[570]+1),t2,((C_word*)t0)[2]);}}
+
+/* k14605 in k14595 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14607(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_14493(t2,(C_word)C_i_not(t1));}
+
+/* k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14493(C_word t0,C_word 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_14493,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14496,a[2]=((C_word*)t0)[2],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: 1849 get-all");
+((C_proc6)C_retrieve_symbol_proc(lf[568]))(6,*((C_word*)lf[568]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[549],lf[567]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14538,a[2]=((C_word*)t0)[2],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_14574,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_14574(2,t5,t3);}
+else{
+t5=((C_word*)t0)[4];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t4,t5,lf[477]);}}}
+
+/* k14572 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14574(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14574,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14581,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1859 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[549]);}
+else{
+t2=((C_word*)t0)[4];
+f_14538(t2,C_SCHEME_FALSE);}}
+
+/* k14579 in k14572 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14581(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_14538(t2,(C_word)C_i_not(t1));}
+
+/* k14536 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14538(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_14538,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14541,a[2]=((C_word*)t0)[2],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: 1860 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[548]);}
+else{
+C_trace("compiler.scm: 1866 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[549],C_SCHEME_TRUE);}}
+
+/* k14539 in k14536 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14541(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_14541,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14547,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: 1861 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[569]);}
+
+/* k14545 in k14539 in k14536 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14547(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: 1862 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[549],C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_i_not(((C_word*)t0)[4]);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[3],((C_word*)t0)[4]));
+if(C_truep(t3)){
+C_trace("compiler.scm: 1864 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[569],((C_word*)t0)[2]);}
+else{
+C_trace("compiler.scm: 1865 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],lf[549],C_SCHEME_TRUE);}}}
+
+/* k14494 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14496(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_14496,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14499,a[2]=((C_word*)t0)[2],a[3]=((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: 1850 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[548]);}
+
+/* k14497 in k14494 in k14491 in k14479 in assign in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14499(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_assq(lf[549],((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_word)C_i_assq(lf[567],((C_word*)t0)[7]))){
+C_trace("compiler.scm: 1853 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[549],C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_i_not(t1);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[3],t1));
+if(C_truep(t3)){
+C_trace("compiler.scm: 1855 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[567],((C_word*)t0)[2]);}
+else{
+C_trace("compiler.scm: 1856 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],lf[549],C_SCHEME_TRUE);}}}}
+
+/* walkeach in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14434(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_14434,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_14440,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_14440(t9,t1,t2);}
+
+/* loop3180 in walkeach in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14440(C_word t0,C_word 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_14440,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_14448,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_14455,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));
+C_trace("g31873188");
+t6=t3;
+f_14448(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k14453 in loop3180 in walkeach in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14455(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_14440(t3,((C_word*)t0)[2],t2);}
+
+/* g3187 in loop3180 in walkeach in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14448(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_14448,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1839 walk");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_13740(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_13740(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_13740,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(3));
+t8=t2;
+t9=(C_word)C_slot(t8,C_fix(2));
+t10=t2;
+t11=(C_word)C_slot(t10,C_fix(1));
+t12=(C_word)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_word)C_eqp(t11,lf[99]);
+t15=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_13777,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_13777(t16,t14);}
+else{
+t16=(C_word)C_eqp(t11,lf[139]);
+t17=t15;
+f_13777(t17,(C_truep(t16)?t16:(C_word)C_eqp(t11,lf[565])));}}
+
+/* k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_13777(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[18],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_13777,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_word)C_eqp(((C_word*)t0)[13],lf[517]);
+if(C_truep(t2)){
+t3=(C_word)C_i_car(((C_word*)t0)[12]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13789,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: 1718 ref");
+t5=((C_word*)((C_word*)t0)[8])[1];
+f_14646(t5,t4,t3,((C_word*)t0)[7]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[13],lf[524]);
+if(C_truep(t3)){
+t4=(C_word)C_i_car(((C_word*)t0)[12]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13832,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: 1728 ref");
+t6=((C_word*)((C_word*)t0)[8])[1];
+f_14646(t6,t5,t4,((C_word*)t0)[7]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[13],lf[345]);
+t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[13],lf[540]));
+if(C_truep(t5)){
+t6=(C_word)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: 1734 walkeach");
+t8=((C_word*)((C_word*)t0)[6])[1];
+f_14434(t8,((C_word*)t0)[14],((C_word*)t0)[5],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[4]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[13],lf[513]);
+if(C_truep(t6)){
+t7=(C_word)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_word)C_i_car(((C_word*)t0)[5]);
+t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13868,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_word)C_slot(t9,C_fix(1));
+t12=(C_word)C_eqp(lf[517],t11);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t9,C_fix(2));
+t14=(C_word)C_i_car(t13);
+t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13891,a[2]=t10,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[5],a[5]=t14,tmp=(C_word)a,a+=6,tmp);
+t16=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],((C_word*)t0)[7]);
+C_trace("compiler.scm: 1741 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[546]))(6,*((C_word*)lf[546]+1),t15,((C_word*)t0)[9],t14,lf[547],t16);}
+else{
+t13=t10;
+f_13868(2,t13,C_SCHEME_UNDEFINED);}}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[13],lf[159]);
+t8=(C_truep(t7)?t7:(C_word)C_eqp(((C_word*)t0)[13],lf[160]));
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14013,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: 1755 append");
+((C_proc5)C_retrieve_proc(*((C_word*)lf[161]+1)))(5,*((C_word*)lf[161]+1),t9,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);}
+else{
+t9=(C_word)C_eqp(((C_word*)t0)[13],lf[172]);
+if(C_truep(t9)){
+t10=(C_word)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_word)C_i_car(((C_word*)t0)[12]);
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14080,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: 1768 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),((C_word*)t0)[14],t12,t13);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[13],lf[173]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[13],lf[550]));
+if(C_truep(t11)){
+t12=(C_word)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_word)C_i_caddr(((C_word*)t0)[12]);
+t15=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14146,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: 1781 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),((C_word*)t0)[14],t14,t15);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[13],lf[252]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(((C_word*)t0)[13],lf[169]));
+if(C_truep(t13)){
+t14=(C_word)C_i_car(((C_word*)t0)[12]);
+t15=(C_word)C_i_car(((C_word*)t0)[5]);
+t16=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14286,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[63]+1))){
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14348,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[94]))(4,*((C_word*)lf[94]+1),t17,t14,lf[545]);}
+else{
+t17=t16;
+f_14286(2,t17,C_SCHEME_UNDEFINED);}}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[13],lf[107]);
+t15=(C_truep(t14)?t14:(C_word)C_eqp(((C_word*)t0)[13],lf[272]));
+if(C_truep(t15)){
+t16=(C_word)C_i_car(((C_word*)t0)[12]);
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14384,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_14390,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[63]+1))){
+if(C_truep(((C_word*)t0)[4])){
+if(C_truep((C_word)C_i_symbolp(t16))){
+C_trace("compiler.scm: 1832 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t18,*((C_word*)lf[75]+1),t16);}
+else{
+t19=t18;
+f_14390(2,t19,C_SCHEME_FALSE);}}
+else{
+t19=t18;
+f_14390(2,t19,C_SCHEME_FALSE);}}
+else{
+t19=t18;
+f_14390(2,t19,C_SCHEME_FALSE);}}
+else{
+C_trace("compiler.scm: 1836 walkeach");
+t16=((C_word*)((C_word*)t0)[6])[1];
+f_14434(t16,((C_word*)t0)[14],((C_word*)t0)[5],((C_word*)t0)[10],((C_word*)t0)[11],((C_word*)t0)[4]);}}}}}}}}}}}
+
+/* k14388 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14390(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: 1833 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),((C_word*)t0)[9],((C_word*)t0)[8],((C_word*)t0)[7]);}
+else{
+C_trace("compiler.scm: 1834 walkeach");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_14434(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[7]);}}
+
+/* k14382 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14384(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1834 walkeach");
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_14434(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14346 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14348(C_word c,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_14348,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14351,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(t1,lf[560]);
+if(C_truep(t3)){
+C_trace("compiler.scm: 1815 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t2,lf[561],lf[562],((C_word*)t0)[3]);}
+else{
+t4=(C_word)C_eqp(t1,lf[563]);
+if(C_truep(t4)){
+C_trace("compiler.scm: 1817 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t2,lf[561],lf[564],((C_word*)t0)[3]);}
+else{
+C_trace("compiler.scm: 1818 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[559],((C_word*)t0)[2]);}}}
+
+/* k14349 in k14346 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14351(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1818 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[559],((C_word*)t0)[2]);}
+
+/* k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14286(C_word c,C_word t0,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_14286,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14289,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_i_memq(((C_word*)t0)[4],((C_word*)t0)[7]))){
+t3=t2;
+f_14289(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(C_word)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_word)C_i_memq(((C_word*)t0)[4],((C_word*)t0)[8]))){
+C_trace("compiler.scm: 1822 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[537],C_SCHEME_TRUE);}
+else{
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14340,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: 1823 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t5,((C_word*)t0)[5],((C_word*)t0)[4],lf[538]);}}}
+
+/* k14338 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14340(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_14289(2,t2,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 1824 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[538],C_SCHEME_TRUE);}}
+
+/* k14287 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14289(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_14289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14292,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_14312,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: 1825 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,((C_word*)t0)[7],((C_word*)t0)[8]);}
+
+/* k14310 in k14287 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14312(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1825 assign");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_14468(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k14290 in k14287 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14292(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_14292,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14295,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[80]+1))){
+t3=t2;
+f_14295(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 1826 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[558],C_SCHEME_TRUE);}}
+
+/* k14293 in k14290 in k14287 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14295,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14298,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: 1827 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[557],C_SCHEME_TRUE);}
+
+/* k14296 in k14293 in k14290 in k14287 in k14284 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14298(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_car(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1828 walk");
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_13740(t3,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14146(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_14146,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_car(((C_word*)t0)[9]);
+t6=*((C_word*)lf[52]+1);
+t7=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_14153,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_14265,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: 1787 collect!");
+((C_proc6)C_retrieve_symbol_proc(lf[546]))(6,*((C_word*)lf[546]+1),t8,((C_word*)t0)[3],((C_word*)t0)[2],lf[556],t5);}
+else{
+t8=t7;
+f_14153(2,t8,C_SCHEME_UNDEFINED);}}
+
+/* k14263 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14265(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1788 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],lf[555],((C_word*)t0)[2]);}
+
+/* k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14153(C_word c,C_word t0,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_14153,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_14156,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_14233,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_14233(t6,t2,((C_word*)t0)[9]);}
+
+/* loop3085 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14233(C_word t0,C_word 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_14233,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_14241,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_14251,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));
+C_trace("g30923093");
+t6=t3;
+f_14241(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k14249 in loop3085 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14251(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_14233(t3,((C_word*)t0)[2],t2);}
+
+/* g3092 in loop3085 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14241(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_14241,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14245,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1791 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t3,((C_word*)t0)[3],t2,lf[548],((C_word*)t0)[2]);}
+
+/* k14243 in g3092 in loop3085 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14245(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1792 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[549],C_SCHEME_TRUE);}
+
+/* k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14156(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_14156,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_14159,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])){
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[2],*((C_word*)lf[55]+1)))){
+C_trace("compiler.scm: 1795 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544],lf[553]);}
+else{
+C_trace("compiler.scm: 1795 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[544],lf[554]);}}
+else{
+t3=t2;
+f_14159(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+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 ab[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14159,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14162,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_14218,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: 1799 simple-lambda-node?");
+((C_proc3)C_retrieve_symbol_proc(lf[552]))(3,*((C_word*)lf[552]+1),t3,((C_word*)t0)[12]);}
+
+/* k14216 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14218(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: 1799 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[551],C_SCHEME_TRUE);}
+else{
+t2=((C_word*)t0)[4];
+f_14162(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k14160 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14162(C_word c,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_14162,2,t0,t1);}
+t2=*((C_word*)lf[80]+1);
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_14165,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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[81]+1))){
+t4=t3;
+f_14165(t4,C_SCHEME_UNDEFINED);}
+else{
+t4=C_mutate((C_word*)lf[81]+1 /* (set! toplevel-lambda-id ...) */,((C_word*)t0)[5]);
+t5=t3;
+f_14165(t5,t4);}}
+
+/* k14163 in k14160 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14165(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_14165,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14168,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_i_cadr(((C_word*)t0)[2]))){
+t3=(C_word)C_eqp(*((C_word*)lf[81]+1),((C_word*)t0)[5]);
+if(C_truep(t3)){
+t4=t2;
+f_14168(t4,C_SCHEME_UNDEFINED);}
+else{
+t4=C_set_block_item(lf[80] /* toplevel-scope */,0,C_SCHEME_FALSE);
+t5=t2;
+f_14168(t5,t4);}}
+else{
+t3=t2;
+f_14168(t3,C_SCHEME_UNDEFINED);}}
+
+/* k14166 in k14163 in k14160 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14168(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_14168,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14171,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_word)C_i_car(((C_word*)t0)[7]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14200,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: 1804 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14198 in k14166 in k14163 in k14160 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14200(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1804 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_13740(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14169 in k14166 in k14163 in k14160 in k14157 in k14154 in k14151 in a14145 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14171(C_word c,C_word t0,C_word 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[80]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[5]);
+t3=((C_word*)t0)[4];
+t4=(C_word)C_slot(t3,C_fix(2));
+t5=(C_word)C_i_cdddr(t4);
+t6=(C_word)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_word)C_i_set_car(t5,t6));}
+
+/* a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14080(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_14080,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14084,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_14099,a[2]=t7,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp));
+t9=((C_word*)t7)[1];
+f_14099(t9,t5,t2);}
+
+/* loop3053 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14099(C_word t0,C_word 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_14099,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_14107,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14114,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));
+C_trace("g30603061");
+t6=t3;
+f_14107(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k14112 in loop3053 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14114(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_14099(t3,((C_word*)t0)[2],t2);}
+
+/* g3060 in loop3053 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14107(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_14107,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1772 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t1,((C_word*)t0)[2],t2,lf[549],C_SCHEME_TRUE);}
+
+/* k14082 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14084(C_word c,C_word t0,C_word 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_14084,2,t0,t1);}
+t2=*((C_word*)lf[80]+1);
+t3=C_set_block_item(lf[80] /* toplevel-scope */,0,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14088,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_car(((C_word*)t0)[6]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14097,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: 1776 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14095 in k14082 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14097(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1776 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_13740(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k14086 in k14082 in a14079 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14088(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[80]+1 /* (set! toplevel-scope ...) */,((C_word*)t0)[3]);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14013(C_word c,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_14013,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_14018,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_14018(t5,((C_word*)t0)[3],((C_word*)t0)[7],((C_word*)t0)[2]);}
+
+/* loop in k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_14018(C_word t0,C_word 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_14018,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|6,a[1]=(C_word)f_14036,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: 1758 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t5,((C_word*)t0)[7],((C_word*)t0)[6]);}
+else{
+t4=(C_word)C_i_car(t2);
+t5=(C_word)C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_14045,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: 1761 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),t6,((C_word*)t0)[2],t4,lf[548],((C_word*)t0)[8]);}}
+
+/* k14043 in loop in k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14045(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_14045,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14048,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: 1762 assign");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_14468(t3,t2,((C_word*)t0)[3],((C_word*)t0)[8],((C_word*)t0)[2],((C_word*)t0)[5]);}
+
+/* k14046 in k14043 in loop in k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14048(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_14048,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14051,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: 1763 walk");
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_13740(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14049 in k14046 in k14043 in loop in k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14051(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]);
+C_trace("compiler.scm: 1764 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_14018(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k14034 in loop in k14011 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_14036(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1758 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_13740(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13891,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13976,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("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t2,((C_word*)t0)[5],lf[545]);}
+
+/* k13974 in k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13976(C_word c,C_word t0,C_word t1){
+C_word 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_13976,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_i_memq(((C_word*)t0)[5],C_retrieve(lf[541])):C_SCHEME_FALSE);
+if(C_truep(t2)){
+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|3,a[1]=(C_word)f_13906,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_13906(t7,((C_word*)t0)[2],t3);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[2];
+f_13868(2,t4,t3);}}
+
+/* loop3005 in k13974 in k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_13906(C_word t0,C_word 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_13906,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_13914,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13957,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));
+C_trace("g30123013");
+t6=t3;
+f_13914(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k13955 in loop3005 in k13974 in k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13957(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_13906(t3,((C_word*)t0)[2],t2);}
+
+/* g3012 in loop3005 in k13974 in k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_fcall f_13914(C_word t0,C_word 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_13914,NULL,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_eqp(lf[517],t4);
+if(C_truep(t5)){
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=(C_word)C_i_car(t7);
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13933,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1749 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t9,((C_word*)t0)[2],t8,lf[544]);}
+else{
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,C_SCHEME_FALSE);}}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}}
+
+/* k13931 in g3012 in loop3005 in k13974 in k13889 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13933(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: 1749 count!");
+((C_proc5)C_retrieve_symbol_proc(lf[542]))(5,*((C_word*)lf[542]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[543]);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k13866 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13868(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_13868,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13871,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)C_i_car(((C_word*)t0)[8]);
+C_trace("compiler.scm: 1751 walk");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_13740(t4,t2,t3,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+
+/* k13869 in k13866 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13871(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)[7]);
+C_trace("compiler.scm: 1752 walkeach");
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_14434(t3,((C_word*)t0)[5],t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k13830 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13832(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_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: 1730 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[538],C_SCHEME_TRUE);}
+
+/* k13787 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13789(C_word c,C_word t0,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_13789,2,t0,t1);}
+if(C_truep((C_word)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_word)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_word)C_i_memq(((C_word*)t0)[6],((C_word*)t0)[3]))){
+C_trace("compiler.scm: 1722 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[2],((C_word*)t0)[6],lf[537],C_SCHEME_TRUE);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13820,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: 1723 get");
+((C_proc5)C_retrieve_symbol_proc(lf[539]))(5,*((C_word*)lf[539]+1),t4,((C_word*)t0)[2],((C_word*)t0)[6],lf[538]);}}}
+
+/* k13818 in k13787 in k13775 in walk in k13729 in ##compiler#analyze-expression in k5138 in k5135 */
+static void C_ccall f_13820(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: 1724 put!");
+((C_proc6)C_retrieve_symbol_proc(lf[536]))(6,*((C_word*)lf[536]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],lf[538],C_SCHEME_TRUE);}}
+
+/* foreign-callback-stub-argument-types in k5138 in k5135 */
+static void C_ccall f_13718(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_13718,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[528]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+
+/* foreign-callback-stub-return-type in k5138 in k5135 */
+static void C_ccall f_13709(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_13709,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[528]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+
+/* foreign-callback-stub-qualifiers in k5138 in k5135 */
+static void C_ccall f_13700(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_13700,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[528]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+
+/* foreign-callback-stub-name in k5138 in k5135 */
+static void C_ccall f_13691(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_13691,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[528]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+
+/* foreign-callback-stub-id in k5138 in k5135 */
+static void C_ccall f_13682(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_13682,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[528]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+
+/* foreign-callback-stub? in k5138 in k5135 */
+static void C_ccall f_13676(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_13676,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[528]));}
+
+/* make-foreign-callback-stub in k5138 in k5135 */
+static void C_ccall f_13670(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_13670,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_a_i_record(&a,6,lf[528],t2,t3,t4,t5,t6));}
+
+/* ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12811(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_12811,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_12814,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_12871,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_13343,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_13519,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_13540,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_13632,a[2]=t14,tmp=(C_word)a,a+=3,tmp));
+C_trace("compiler.scm: 1684 walk");
+t21=((C_word*)t6)[1];
+f_12871(t21,t1,t2,*((C_word*)lf[527]+1));}
+
+/* atomic? in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13632(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_13632,3,t0,t1,t2);}
+t3=t2;
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_i_memq(t4,lf[526]);
+if(C_truep(t5)){
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+if(C_truep((C_truep((C_word)C_eqp(t4,lf[272]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[273]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[101]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[253]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[105]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t4,lf[256]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(3));
+C_trace("compiler.scm: 1682 every");
+((C_proc4)C_retrieve_symbol_proc(lf[412]))(4,*((C_word*)lf[412]+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 k5138 in k5135 */
+static void C_fcall f_13540(C_word t0,C_word 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_13540,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_13546,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_13546(t7,t1,t2,C_SCHEME_END_OF_LIST);}
+
+/* loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_13546(C_word t0,C_word 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_13546,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13560,a[2]=t1,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1665 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[213]+1)))(3,*((C_word*)lf[213]+1),t4,t3);}
+else{
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13566,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_word)C_i_car(t2);
+C_trace("compiler.scm: 1666 atomic?");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_13632(3,t6,t4,t5);}}
+
+/* k13564 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13566(C_word c,C_word t0,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_13566,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_i_car(((C_word*)t0)[6]);
+t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
+C_trace("compiler.scm: 1667 loop");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_13546(t5,((C_word*)t0)[3],t2,t4);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13584,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: 1669 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[504]);}}
+
+/* k13582 in k13564 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13584(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_13584,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13593,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: 1670 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t4,((C_word*)t0)[2],t2,t3);}
+
+/* a13592 in k13582 in k13564 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13593(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_13593,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[5]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13614,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13626,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: 1675 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t6,((C_word*)t0)[5]);}
+
+/* k13624 in a13592 in k13582 in k13564 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13626(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13626,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 1674 loop");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_13546(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k13612 in a13592 in k13582 in k13564 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13614(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_13614,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+
+/* k13558 in loop in walk-arguments in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13560(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1665 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 k5138 in k5135 */
+static void C_fcall f_13519(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_13519,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13525,a[2]=t5,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1658 walk-arguments");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_13540(t7,t1,t4,t6);}
+
+/* a13524 in walk-inline-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13525(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_13525,3,t0,t1,t2);}
+t3=((C_word*)t0)[4];
+t4=((C_word*)t0)[3];
+t5=(C_word)C_a_i_record(&a,4,lf[512],t3,t4,t2);
+C_trace("compiler.scm: 1661 k");
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t1,t5);}
+
+/* walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_13343(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_13343,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13347,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: 1634 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t6,lf[516]);}
+
+/* k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13347(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_13347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13350,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1635 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[337]);}
+
+/* k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13350(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_13350,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[9]);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_13429,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[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: 276 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t3,lf[519]);}
+
+/* k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13429(C_word c,C_word t0,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_13429,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[11]);
+t3=(C_word)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_13416,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_13420,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1639 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[11]);}
+
+/* k13418 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13420(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1639 k");
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13416(C_word c,C_word t0,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_13416,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[173],((C_word*)t0)[10],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13379,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_13381,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: 1640 walk-arguments");
+t6=((C_word*)((C_word*)t0)[3])[1];
+f_13540(t6,t4,((C_word*)t0)[2],t5);}
+
+/* a13380 in k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13381(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_13381,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13387,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: 1643 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t4,t1,((C_word*)t0)[2],t3);}
+
+/* a13386 in a13380 in k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13387(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_13387,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13400,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_13404,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1645 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t4,((C_word*)t0)[2]);}
+
+/* k13402 in a13386 in a13380 in k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13404(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1645 cons*");
+((C_proc5)C_retrieve_symbol_proc(lf[525]))(5,*((C_word*)lf[525]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k13398 in a13386 in a13380 in k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13400(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_13400,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_word)C_a_i_record(&a,4,lf[512],lf[513],t3,t1));}
+
+/* k13377 in k13414 in k13427 in k13348 in k13345 in walk-call in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13379(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_13379,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+
+/* walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_12871(C_word t0,C_word 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_12871,NULL,4,t0,t1,t2,t3);}
+t4=t2;
+t5=(C_word)C_slot(t4,C_fix(3));
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=t2;
+t9=(C_word)C_slot(t8,C_fix(1));
+t10=t2;
+t11=(C_word)C_slot(t10,C_fix(1));
+t12=(C_word)C_eqp(t11,lf[517]);
+t13=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12913,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_12913(t14,t12);}
+else{
+t14=(C_word)C_eqp(t11,lf[99]);
+if(C_truep(t14)){
+t15=t13;
+f_12913(t15,t14);}
+else{
+t15=(C_word)C_eqp(t11,lf[139]);
+if(C_truep(t15)){
+t16=t13;
+f_12913(t16,t15);}
+else{
+t16=(C_word)C_eqp(t11,lf[107]);
+t17=t13;
+f_12913(t17,(C_truep(t16)?t16:(C_word)C_eqp(t11,lf[524])));}}}}
+
+/* k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_12913(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_12913,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 1590 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_word)C_eqp(((C_word*)t0)[9],lf[124]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12925,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: 1591 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t3,lf[516]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[9],lf[159]);
+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_13050,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_13050(t7,((C_word*)t0)[11],((C_word*)t0)[6],((C_word*)t0)[8]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[9],lf[172]);
+t5=(C_truep(t4)?t4:(C_word)C_eqp(((C_word*)t0)[9],lf[173]));
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13127,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: 276 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t6,lf[519]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[9],lf[252]);
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13140,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: 1614 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t7,lf[520]);}
+else{
+t7=(C_word)C_eqp(((C_word*)t0)[9],lf[319]);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13209,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: 276 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t8,lf[519]);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[9],lf[272]);
+t9=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13254,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_13254(t10,t8);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[9],lf[273]);
+if(C_truep(t10)){
+t11=t9;
+f_13254(t11,t10);}
+else{
+t11=(C_word)C_eqp(((C_word*)t0)[9],lf[101]);
+if(C_truep(t11)){
+t12=t9;
+f_13254(t12,t11);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[9],lf[253]);
+if(C_truep(t12)){
+t13=t9;
+f_13254(t13,t12);}
+else{
+t13=(C_word)C_eqp(((C_word*)t0)[9],lf[105]);
+t14=t9;
+f_13254(t14,(C_truep(t13)?t13:(C_word)C_eqp(((C_word*)t0)[9],lf[256])));}}}}}}}}}}}
+
+/* k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_13254(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_13254,NULL,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 1628 walk-inline-call");
+t2=((C_word*)((C_word*)t0)[9])[1];
+f_13519(t2,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[3],lf[513]);
+if(C_truep(t2)){
+t3=(C_word)C_i_car(((C_word*)t0)[5]);
+t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 1629 walk-call");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_13343(t5,((C_word*)t0)[8],t3,t4,((C_word*)t0)[6],((C_word*)t0)[4]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[3],lf[345]);
+if(C_truep(t3)){
+t4=(C_word)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_13439,a[2]=t6,a[3]=t5,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1648 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t7,lf[516]);}
+else{
+C_trace("compiler.scm: 1631 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[522]))(3,*((C_word*)lf[522]+1),((C_word*)t0)[8],lf[523]);}}}}
+
+/* k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13439(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_13439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13442,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: 1649 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[337]);}
+
+/* k13440 in k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13442(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_13442,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13513,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: 276 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t3,lf[519]);}
+
+/* k13511 in k13440 in k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13513(C_word c,C_word t0,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_13513,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[7]);
+t3=(C_word)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_13500,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_13504,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1653 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[7]);}
+
+/* k13502 in k13511 in k13440 in k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13504(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1653 k");
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13498 in k13511 in k13440 in k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13500(C_word c,C_word t0,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_13500,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[173],((C_word*)t0)[6],t2);
+t4=(C_word)C_a_i_list(&a,1,((C_word*)t0)[5]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13488,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: 1655 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[2]);}
+
+/* k13486 in k13498 in k13511 in k13440 in k13437 in k13252 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13488(C_word c,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_13488,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[345],((C_word*)t0)[5],t2);
+t4=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t4));}
+
+/* k13207 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13209(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_13209,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13245,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[521]+1),t1,((C_word*)t0)[2]);}
+
+/* k13243 in k13207 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13245(C_word c,C_word t0,C_word 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_13245,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,*((C_word*)lf[67]+1));
+t3=C_mutate((C_word*)lf[67]+1 /* (set! foreign-callback-stubs ...) */,t2);
+t4=(C_word)C_slot(((C_word*)t0)[6],C_fix(2));
+t5=(C_word)C_i_car(t4);
+t6=(C_word)C_slot(((C_word*)t0)[6],C_fix(3));
+C_trace("compiler.scm: 1625 cps-lambda");
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_12814(t7,((C_word*)t0)[4],((C_word*)t0)[3],t5,t6,((C_word*)t0)[2]);}
+
+/* k13138 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+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 t4;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13140,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13149,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: 1615 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t4,((C_word*)t0)[2],t2,t3);}
+
+/* a13148 in k13138 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13149(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_13149,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+t4=(C_word)C_i_car(((C_word*)t0)[3]);
+t5=(C_word)C_a_i_list(&a,1,t4);
+t6=(C_word)C_a_i_list(&a,1,t2);
+t7=(C_word)C_a_i_record(&a,4,lf[512],lf[252],t5,t6);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13179,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_13183,a[2]=t8,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1619 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t9,((C_word*)t0)[4]);}
+
+/* k13181 in a13148 in k13138 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13183(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1619 k");
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13177 in a13148 in k13138 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13179,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+
+/* k13125 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13127(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_car(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1613 cps-lambda");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_12814(t3,((C_word*)t0)[4],t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_13050(C_word t0,C_word 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_13050,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=(C_word)C_i_car(t3);
+C_trace("compiler.scm: 1607 walk");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12871(t5,t1,t4,((C_word*)t0)[3]);}
+else{
+t4=(C_word)C_i_car(t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13073,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1608 walk");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12871(t6,t1,t4,t5);}}
+
+/* a13072 in loop in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13073(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_13073,3,t0,t1,t2);}
+t3=(C_word)C_i_car(((C_word*)t0)[4]);
+t4=(C_word)C_a_i_list(&a,1,t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13094,a[2]=t4,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t7=(C_word)C_i_cdr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1612 loop");
+t8=((C_word*)((C_word*)t0)[2])[1];
+f_13050(t8,t5,t6,t7);}
+
+/* k13092 in a13072 in loop in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13094,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+
+/* k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12925(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_12925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12928,a[2]=((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: 1592 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[337]);}
+
+/* k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12928(C_word c,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_12928,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12929,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[6]);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13035,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: 276 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t4,lf[519]);}
+
+/* k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13035(C_word c,C_word t0,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_13035,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[8]);
+t3=(C_word)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_13022,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_13026,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1597 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t5,((C_word*)t0)[8]);}
+
+/* k13024 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13026(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1597 k");
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13020 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13022(C_word c,C_word t0,C_word 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_13022,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[173],((C_word*)t0)[7],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12975,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_i_car(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12981,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: 1598 walk");
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t7,t4,t5,t6);}
+
+/* a12980 in k13020 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12981(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_12981,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12998,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_word)C_i_cadr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1602 walk");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t5,t3,t4,((C_word*)t0)[2]);}
+
+/* k12996 in a12980 in k13020 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12998(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_12998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13002,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_caddr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1603 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12871(t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k13000 in k12996 in a12980 in k13020 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_13002(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_13002,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];
+t4=t3;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[512],lf[124],C_SCHEME_END_OF_LIST,t2));}
+
+/* k12973 in k13020 in k13033 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+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 t4;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12975,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[159],((C_word*)t0)[2],t2));}
+
+/* k1 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12929(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_12929,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12946,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1593 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t3,((C_word*)t0)[2]);}
+
+/* k12944 in k1 in k12926 in k12923 in k12911 in walk in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12946(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_12946,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[513],lf[518],t2));}
+
+/* cps-lambda in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_fcall f_12814(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_12814,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12818,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: 1578 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t6,lf[516]);}
+
+/* k12816 in cps-lambda in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12818(C_word c,C_word t0,C_word 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_12818,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[7]);
+t3=(C_word)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_12842,a[2]=((C_word*)t0)[4],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)[3]);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12848,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1581 walk");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_12871(t7,t4,t5,t6);}
+
+/* a12847 in k12816 in cps-lambda in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12848(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_12848,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12865,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1583 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[515]))(3,*((C_word*)lf[515]+1),t3,((C_word*)t0)[2]);}
+
+/* k12863 in a12847 in k12816 in cps-lambda in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12865(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_12865,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_record(&a,4,lf[512],lf[513],lf[514],t2));}
+
+/* k12840 in k12816 in cps-lambda in ##compiler#perform-cps-conversion in k5138 in k5135 */
+static void C_ccall f_12842(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_12842,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+t3=(C_word)C_a_i_record(&a,4,lf[512],lf[173],((C_word*)t0)[4],t2);
+C_trace("compiler.scm: 1579 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 k5138 in k5135 */
+static void C_ccall f_12721(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_12721,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_12724,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_12753,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
+C_trace("compiler.scm: 1570 walk");
+t10=((C_word*)t7)[1];
+f_12753(t10,t1,t2);}
+
+/* walk in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_fcall f_12753(C_word t0,C_word 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_12753,NULL,3,t0,t1,t2);}
+t3=(C_word)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_word)C_i_car(t2);
+if(C_truep((C_word)C_i_symbolp(t4))){
+t5=(C_word)C_i_car(t2);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12772,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: 1565 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t6,C_retrieve(lf[510]),t5);}
+else{
+C_trace("compiler.scm: 1569 mapupdate");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_12724(t5,t1,t2);}}}
+
+/* k12770 in walk in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_ccall f_12772(C_word c,C_word t0,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_12772,2,t0,t1);}
+t2=(C_truep(t1)?t1:C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12778,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)C_i_assq(((C_word*)t0)[6],t2))){
+t4=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1568 mapupdate");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_12724(t5,((C_word*)t0)[4],t4);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12795,a[2]=((C_word*)t0)[3],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1567 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t4,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
+
+/* k12793 in k12770 in walk in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_ccall f_12795(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1567 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),((C_word*)t0)[3],C_retrieve(lf[510]),((C_word*)t0)[2],t1);}
+
+/* k12776 in k12770 in walk in ##compiler#update-line-number-database! in k5138 in k5135 */
+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 *a;
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1568 mapupdate");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12724(t3,((C_word*)t0)[2],t2);}
+
+/* mapupdate in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_fcall f_12724(C_word 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_12724,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_12730,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_12730(t6,t1,t2);}
+
+/* loop in mapupdate in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_fcall f_12730(C_word 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_12730,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_12740,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_i_car(t2);
+C_trace("compiler.scm: 1559 walk");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12753(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12738 in loop in mapupdate in ##compiler#update-line-number-database! in k5138 in k5135 */
+static void C_ccall f_12740(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]);
+C_trace("compiler.scm: 1560 loop");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12730(t3,((C_word*)t0)[2],t2);}
+
+/* ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12582(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_12582,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12586,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cddr(t2);
+if(C_truep((C_word)C_i_pairp(t4))){
+t5=(C_word)C_i_caddr(t2);
+t6=(C_word)C_i_stringp(t5);
+t7=t3;
+f_12586(t7,(C_word)C_i_not(t6));}
+else{
+t5=t3;
+f_12586(t5,C_SCHEME_FALSE);}}
+
+/* k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_fcall f_12586(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_12586,NULL,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_i_cadr(((C_word*)t0)[3]):lf[509]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12592,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_word)C_i_caddr(((C_word*)t0)[3]):(C_word)C_i_cadr(((C_word*)t0)[3]));
+C_trace("compiler.scm: 1544 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t3,t4);}
+
+/* k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12592(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_12592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12595,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_word)C_i_cdddr(((C_word*)t0)[2]):(C_word)C_i_cddr(((C_word*)t0)[2]));
+C_apply(4,0,t2,*((C_word*)lf[231]+1),t3);}
+
+/* k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12595(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12595,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_12598,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_12645,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_12645(t10,t6,((C_word*)t0)[2]);}
+
+/* loop2560 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_fcall f_12645(C_word t0,C_word 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_12645,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[508]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12674,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));
+C_trace("g25762577");
+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);}}
+
+/* k12672 in loop2560 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12674(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12674,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));
+C_trace("loop25602573");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12645(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));
+C_trace("loop25602573");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12645(t6,((C_word*)t0)[3],t5);}}
+
+/* k12596 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12598(C_word c,C_word t0,C_word t1){
+C_word 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_12598,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_12601,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_12608,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[128]))(3,*((C_word*)lf[128]+1),t7,((C_word*)t0)[2]);}
+
+/* k12606 in k12596 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12608,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_12610,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_12610(t5,((C_word*)t0)[2],t1);}
+
+/* loop2584 in k12606 in k12596 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+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 ab[7],*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=*((C_word*)lf[507]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12639,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));
+C_trace("g26002601");
+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);}}
+
+/* k12637 in loop2584 in k12606 in k12596 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12639(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12639,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));
+C_trace("loop25842597");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12610(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));
+C_trace("loop25842597");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12610(t6,((C_word*)t0)[3],t5);}}
+
+/* k12599 in k12596 in k12593 in k12590 in k12584 in ##compiler#expand-foreign-primitive in k5138 in k5135 */
+static void C_ccall f_12601(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[498]+1)))(9,*((C_word*)lf[498]+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 k5138 in k5135 */
+static void C_ccall f_12483(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_12483,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cadr(t2);
+t5=(C_word)C_i_caddr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12493,a[2]=t5,a[3]=t3,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_i_cdddr(t2);
+C_apply(4,0,t6,*((C_word*)lf[231]+1),t7);}
+
+/* k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_ccall f_12493(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12493,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_12496,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_12543,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_12543(t10,t6,((C_word*)t0)[2]);}
+
+/* loop2503 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_fcall f_12543(C_word t0,C_word 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_12543,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[508]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12572,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));
+C_trace("g25192520");
+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);}}
+
+/* k12570 in loop2503 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_ccall f_12572(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12572,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));
+C_trace("loop25032516");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12543(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));
+C_trace("loop25032516");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12543(t6,((C_word*)t0)[3],t5);}}
+
+/* k12494 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_ccall f_12496(C_word c,C_word t0,C_word t1){
+C_word 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_12496,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_12499,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_12506,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1537 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t7,((C_word*)t0)[2]);}
+
+/* k12504 in k12494 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12506,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_12508,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_12508(t5,((C_word*)t0)[2],t1);}
+
+/* loop2527 in k12504 in k12494 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_fcall f_12508(C_word t0,C_word 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_12508,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[507]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12537,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));
+C_trace("g25432544");
+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);}}
+
+/* k12535 in loop2527 in k12504 in k12494 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+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 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_12537,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));
+C_trace("loop25272540");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12508(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));
+C_trace("loop25272540");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12508(t6,((C_word*)t0)[3],t5);}}
+
+/* k12497 in k12494 in k12491 in ##compiler#expand-foreign-lambda* in k5138 in k5135 */
+static void C_ccall f_12499(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1538 create-foreign-stub");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[498]+1)))(9,*((C_word*)lf[498]+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 k5138 in k5135 */
+static void C_ccall f_12446(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_12446,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_caddr(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12453,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_symbolp(t4))){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12472,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1524 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t6,t4);}
+else{
+if(C_truep((C_word)C_i_stringp(t4))){
+t6=t5;
+f_12453(2,t6,t4);}
+else{
+C_trace("compiler.scm: 1526 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),t5,lf[506],t4);}}}
+
+/* k12470 in ##compiler#expand-foreign-lambda in k5138 in k5135 */
+static void C_ccall f_12472(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1524 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),((C_word*)t0)[2],t1);}
+
+/* k12451 in ##compiler#expand-foreign-lambda in k5138 in k5135 */
+static void C_ccall f_12453(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_cadr(((C_word*)t0)[4]);
+t3=(C_word)C_i_cdddr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 1529 create-foreign-stub");
+((C_proc9)C_retrieve_proc(*((C_word*)lf[498]+1)))(9,*((C_word*)lf[498]+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 k5138 in k5135 */
+static void C_ccall f_12202(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_12202,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
+t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12206,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: 1495 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t9,t2);}
+
+/* k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12206,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12209,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: 1496 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t2,((C_word*)t0)[2]);}
+
+/* k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12209(C_word c,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_12209,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12212,a[2]=((C_word*)t0)[2],a[3]=((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_i_length(t1);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_12440,tmp=(C_word)a,a+=2,tmp);
+C_trace("compiler.scm: 1497 list-tabulate");
+((C_proc4)C_retrieve_symbol_proc(lf[505]))(4,*((C_word*)lf[505]+1),t2,t3,t4);}
+
+/* a12439 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12440(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_12440,3,t0,t1,t2);}
+C_trace("compiler.scm: 1497 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t1,lf[504]);}
+
+/* k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12212(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_12212,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12215,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: 1498 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[503]);}
+
+/* k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12215(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_12215,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12218,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1499 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t2);}
+
+/* k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12218(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_12218,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12221,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: 1500 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[502]))(3,*((C_word*)lf[502]+1),t2,((C_word*)t0)[10]);}
+
+/* k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12221(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_12221,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_12224,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);
+C_trace("compiler.scm: 1501 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),t2,((C_word*)t0)[12],C_SCHEME_TRUE);}
+
+/* k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12224(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_12224,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_word)C_a_i_record(&a,9,lf[488],t2,t3,t4,t5,t6,t7,t8,t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,*((C_word*)lf[66]+1));
+t12=C_mutate((C_word*)lf[66]+1 /* (set! foreign-lambda-stubs ...) */,t11);
+t13=(C_truep(((C_word*)t0)[6])?(C_word)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_12234,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_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,lf[107],t15);
+t17=t14;
+f_12234(t17,(C_word)C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
+else{
+t15=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[13],C_SCHEME_END_OF_LIST);
+t16=t14;
+f_12234(t16,(C_word)C_a_i_cons(&a,2,lf[272],t15));}}
+
+/* k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_fcall f_12234(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12234,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_12237,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_12353,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_12353(t10,t6,((C_word*)t0)[8],((C_word*)t0)[2]);}
+
+/* loop2440 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_fcall f_12353(C_word t0,C_word 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_12353,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=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12395,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_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12392,a[2]=t8,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1509 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[255]))(4,*((C_word*)lf[255]+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);}}
+
+/* k12390 in loop2440 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12392(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1509 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[254]))(4,*((C_word*)lf[254]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k12393 in loop2440 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12395(C_word c,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_12395,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_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]=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_12366(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_12366(t5,t4);}}
+
+/* k12364 in k12393 in loop2440 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_fcall f_12366(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));
+C_trace("loop24402454");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_12353(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12237(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12248,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[499]:C_SCHEME_END_OF_LIST);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12260,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_eqp(((C_word*)t0)[5],C_fix(0));
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12270,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_a_i_cons(&a,2,lf[500],t1);
+C_trace("compiler.scm: 1514 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t6,((C_word*)t0)[3],t7);}
+else{
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12277,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: 1515 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t6,((C_word*)t0)[4]);}}
+
+/* k12275 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12277(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_12277,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12280,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: 1516 words");
+((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),t2,((C_word*)t0)[2]);}
+
+/* k12278 in k12275 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12280(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_12280,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(C_fix(2),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[501],t3);
+t5=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,lf[99],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[273],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)[8],t10);
+t12=(C_word)C_a_i_cons(&a,2,t11,C_SCHEME_END_OF_LIST);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12299,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_12303,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_12307,a[2]=((C_word*)t0)[4],a[3]=t14,tmp=(C_word)a,a+=4,tmp);
+t16=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],((C_word*)t0)[3]);
+C_trace("compiler.scm: 1519 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t15,((C_word*)t0)[2],t16);}
+
+/* k12305 in k12278 in k12275 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12307(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1519 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12301 in k12278 in k12275 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12303(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1518 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k12297 in k12278 in k12275 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12299(C_word c,C_word t0,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_12299,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)C_a_i_cons(&a,2,lf[159],t3);
+t5=(C_word)C_a_i_cons(&a,2,t4,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t6=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
+
+/* k12268 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12270(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1514 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k12258 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12260(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12260,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t3=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k12246 in k12235 in k12232 in k12222 in k12219 in k12216 in k12213 in k12210 in k12207 in k12204 in ##compiler#create-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12248(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_12248,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[172],t2));}
+
+/* foreign-stub-callback in k5138 in k5135 */
+static void C_ccall f_12193(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_12193,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(8)));}
+
+/* foreign-stub-cps in k5138 in k5135 */
+static void C_ccall f_12184(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_12184,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(7)));}
+
+/* foreign-stub-body in k5138 in k5135 */
+static void C_ccall f_12175(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_12175,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(6)));}
+
+/* foreign-stub-argument-names in k5138 in k5135 */
+static void C_ccall f_12166(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_12166,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(5)));}
+
+/* foreign-stub-argument-types in k5138 in k5135 */
+static void C_ccall f_12157(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_12157,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(4)));}
+
+/* foreign-stub-name in k5138 in k5135 */
+static void C_ccall f_12148(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_12148,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(3)));}
+
+/* foreign-stub-return-type in k5138 in k5135 */
+static void C_ccall f_12139(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_12139,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(2)));}
+
+/* foreign-stub-id in k5138 in k5135 */
+static void C_ccall f_12130(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_12130,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[488]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,C_fix(1)));}
+
+/* foreign-stub? in k5138 in k5135 */
+static void C_ccall f_12124(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_12124,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[488]));}
+
+/* make-foreign-stub in k5138 in k5135 */
+static void C_ccall f_12118(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_12118,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_record(&a,9,lf[488],t2,t3,t4,t5,t6,t7,t8,t9));}
+
+/* ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10418(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_10418,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_10421,tmp=(C_word)a,a+=2,tmp));
+t13=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10469,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_10475,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t15=C_set_block_item(t11,0,C_retrieve(lf[128]));
+t16=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10485,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_10485(t17,t1);}
+
+/* a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10485(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_10485,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10489,a[2]=((C_word*)t0)[2],a[3]=((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_word)C_i_pairp(((C_word*)t0)[6]))){
+t3=t2;
+f_10489(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 1266 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t2,lf[486],((C_word*)t0)[6]);}}
+
+/* k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 t4;
+C_word ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10489,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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)[6]);
+C_trace("compiler.scm: 1268 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t2,t3);}
+
+/* k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 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 ab[18],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10492,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10495,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_eqp(t1,lf[360]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10501,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1270 stripu");
+t6=((C_word*)((C_word*)t0)[5])[1];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
+else{
+t4=(C_word)C_eqp(t1,lf[367]);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10586,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: 1280 check-decl");
+f_10421(t5,((C_word*)t0)[6],C_fix(1),(C_word)C_a_i_list(&a,1,C_fix(1)));}
+else{
+t5=(C_word)C_eqp(t1,lf[8]);
+if(C_truep(t5)){
+t6=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[372]));
+t8=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,lf[373]);}
+else{
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10634,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10638,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+t9=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1289 stripa");
+t10=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t10,t8,t9);}}
+else{
+t6=(C_word)C_eqp(t1,lf[9]);
+if(C_truep(t6)){
+t7=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[375]));
+t9=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,lf[376]);}
+else{
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10663,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10667,a[2]=t8,tmp=(C_word)a,a+=3,tmp);
+t10=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1293 stripa");
+t11=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t11,t9,t10);}}
+else{
+t7=(C_word)C_eqp(t1,lf[378]);
+if(C_truep(t7)){
+t8=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t8))){
+t9=C_mutate((C_word*)lf[8]+1 /* (set! standard-bindings ...) */,C_retrieve(lf[372]));
+t10=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,C_retrieve(lf[375]));
+t11=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,lf[379]);}
+else{
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10692,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t10=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1299 stripa");
+t11=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t11,t9,t10);}}
+else{
+t8=(C_word)C_eqp(t1,lf[6]);
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10717,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: 1303 check-decl");
+f_10421(t9,((C_word*)t0)[6],C_fix(1),(C_word)C_a_i_list(&a,1,C_fix(1)));}
+else{
+t9=(C_word)C_eqp(t1,lf[383]);
+t10=(C_truep(t9)?t9:(C_word)C_eqp(t1,lf[384]));
+if(C_truep(t10)){
+t11=C_mutate((C_word*)lf[6]+1 /* (set! number-type ...) */,lf[383]);
+t12=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,lf[385]);}
+else{
+t11=(C_word)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[386]);}
+else{
+t12=(C_word)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[387]);}
+else{
+t13=(C_word)C_eqp(t1,lf[388]);
+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[389]);}
+else{
+t14=(C_word)C_eqp(t1,lf[390]);
+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[391]);}
+else{
+t15=(C_word)C_eqp(t1,lf[392]);
+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[393]);}
+else{
+t16=(C_word)C_eqp(t1,lf[394]);
+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[395]);}
+else{
+t17=(C_word)C_eqp(t1,lf[396]);
+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[397]);}
+else{
+t18=(C_word)C_eqp(t1,lf[398]);
+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[399]);}
+else{
+t19=(C_word)C_eqp(t1,lf[400]);
+if(C_truep(t19)){
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10801,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10805,a[2]=t20,tmp=(C_word)a,a+=3,tmp);
+t22=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1316 strip");
+t23=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t23,t21,t22);}
+else{
+t20=(C_word)C_eqp(t1,lf[403]);
+if(C_truep(t20)){
+t21=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10820,tmp=(C_word)a,a+=2,tmp);
+t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10855,a[2]=t21,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t23=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1318 stripa");
+t24=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t24,t22,t23);}
+else{
+t21=(C_word)C_eqp(t1,lf[405]);
+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[406]);}
+else{
+t22=(C_word)C_eqp(t1,lf[407]);
+if(C_truep(t22)){
+t23=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10875,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t24=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10917,tmp=(C_word)a,a+=2,tmp);
+t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10952,a[2]=t24,a[3]=t23,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1323 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t25,C_retrieve(lf[372]),C_retrieve(lf[375]));}
+else{
+t23=(C_word)C_eqp(t1,lf[408]);
+if(C_truep(t23)){
+t24=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10961,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t25=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1328 stripa");
+t26=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t26,t24,t25);}
+else{
+t24=(C_word)C_eqp(t1,lf[409]);
+if(C_truep(t24)){
+t25=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t26=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11052,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: 1333 every");
+((C_proc4)C_retrieve_symbol_proc(lf[412]))(4,*((C_word*)lf[412]+1),t26,*((C_word*)lf[413]+1),t25);}
+else{
+t25=(C_word)C_eqp(t1,lf[414]);
+if(C_truep(t25)){
+t26=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11076,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t27=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11080,a[2]=t26,tmp=(C_word)a,a+=3,tmp);
+t28=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1337 strip");
+t29=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t29,t27,t28);}
+else{
+t26=(C_word)C_eqp(t1,lf[416]);
+if(C_truep(t26)){
+t27=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11101,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11105,a[2]=t27,tmp=(C_word)a,a+=3,tmp);
+t29=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1339 strip");
+t30=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t30,t28,t29);}
+else{
+t27=(C_word)C_eqp(t1,lf[417]);
+if(C_truep(t27)){
+t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11122,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1342 pathname-strip-extension");
+((C_proc3)C_retrieve_symbol_proc(lf[420]))(3,*((C_word*)lf[420]+1),t28,*((C_word*)lf[25]+1));}
+else{
+t28=(C_word)C_eqp(t1,lf[421]);
+if(C_truep(t28)){
+t29=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
+t30=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t30+1)))(2,t30,lf[422]);}
+else{
+t29=(C_word)C_eqp(t1,lf[423]);
+if(C_truep(t29)){
+t30=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_FALSE);
+t31=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,lf[424]);}
+else{
+t30=(C_word)C_eqp(t1,lf[425]);
+if(C_truep(t30)){
+t31=C_set_block_item(lf[35] /* undefine-shadowed-macros */,0,C_SCHEME_FALSE);
+t32=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t32+1)))(2,t32,lf[426]);}
+else{
+t31=(C_word)C_eqp(t1,lf[427]);
+if(C_truep(t31)){
+t32=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11175,tmp=(C_word)a,a+=2,tmp);
+t33=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11210,a[2]=t32,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t34=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1348 stripa");
+t35=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t35,t33,t34);}
+else{
+t32=(C_word)C_eqp(t1,lf[429]);
+if(C_truep(t32)){
+t33=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11223,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: 1350 check-decl");
+f_10421(t33,((C_word*)t0)[6],C_fix(1),C_SCHEME_END_OF_LIST);}
+else{
+t33=(C_word)C_eqp(t1,lf[447]);
+t34=(C_truep(t33)?t33:(C_word)C_eqp(t1,lf[448]));
+if(C_truep(t34)){
+t35=C_set_block_item(lf[193] /* enable-runtime-macros */,0,C_SCHEME_TRUE);
+t36=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t36+1)))(2,t36,lf[449]);}
+else{
+t35=(C_word)C_eqp(t1,lf[450]);
+t36=(C_truep(t35)?t35:(C_word)C_eqp(t1,lf[451]));
+if(C_truep(t36)){
+t37=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11493,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+t38=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1396 stripa");
+t39=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t39,t37,t38);}
+else{
+t37=(C_word)C_eqp(t1,lf[453]);
+if(C_truep(t37)){
+t38=C_set_block_item(lf[15] /* block-compilation */,0,C_SCHEME_TRUE);
+t39=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11540,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t40=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1402 stripa");
+t41=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t41,t39,t40);}
+else{
+t38=(C_word)C_eqp(t1,lf[455]);
+if(C_truep(t38)){
+t39=C_set_block_item(lf[31] /* external-protos-first */,0,C_SCHEME_TRUE);
+t40=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t40+1)))(2,t40,lf[456]);}
+else{
+t39=(C_word)C_eqp(t1,lf[457]);
+if(C_truep(t39)){
+t40=C_set_block_item(lf[32] /* do-lambda-lifting */,0,C_SCHEME_TRUE);
+t41=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t41+1)))(2,t41,lf[458]);}
+else{
+t40=(C_word)C_eqp(t1,lf[435]);
+if(C_truep(t40)){
+t41=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t41))){
+t42=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
+t43=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t43+1)))(2,t43,lf[459]);}
+else{
+t42=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11602,tmp=(C_word)a,a+=2,tmp);
+t43=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11637,a[2]=t42,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t44=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1412 stripa");
+t45=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t45,t43,t44);}}
+else{
+t41=(C_word)C_eqp(t1,lf[461]);
+if(C_truep(t41)){
+t42=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11654,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: 1414 check-decl");
+f_10421(t42,((C_word*)t0)[6],C_fix(1),(C_word)C_a_i_list(&a,1,C_fix(1)));}
+else{
+t42=(C_word)C_eqp(t1,lf[464]);
+if(C_truep(t42)){
+t43=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t44=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11682,a[2]=((C_word*)t0)[6],a[3]=t2,a[4]=t43,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+C_trace("compiler.scm: 1423 every");
+((C_proc4)C_retrieve_symbol_proc(lf[412]))(4,*((C_word*)lf[412]+1),t44,*((C_word*)lf[467]+1),t43);}
+else{
+t43=(C_word)C_eqp(t1,lf[468]);
+if(C_truep(t43)){
+t44=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11699,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,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_11703,a[2]=t44,tmp=(C_word)a,a+=3,tmp);
+t50=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11707,a[2]=t49,a[3]=t46,a[4]=t48,tmp=(C_word)a,a+=5,tmp);
+t51=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1440 strip");
+t52=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t52,t50,t51);}
+else{
+t44=(C_word)C_eqp(t1,lf[472]);
+if(C_truep(t44)){
+t45=C_set_block_item(lf[21] /* emit-profile */,0,C_SCHEME_TRUE);
+t46=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t46))){
+t47=C_mutate((C_word*)lf[37]+1 /* (set! profiled-procedures ...) */,lf[177]);
+t48=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t48+1)))(2,t48,lf[473]);}
+else{
+t47=C_mutate((C_word*)lf[474]+1 /* (set! profiled-propcedures ...) */,lf[178]);
+t48=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11835,tmp=(C_word)a,a+=2,tmp);
+t49=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11870,a[2]=t48,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t50=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1449 stripa");
+t51=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t51,t49,t50);}}
+else{
+t45=(C_word)C_eqp(t1,lf[475]);
+if(C_truep(t45)){
+t46=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t46))){
+t47=C_set_block_item(lf[41] /* local-definitions */,0,C_SCHEME_TRUE);
+t48=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t48+1)))(2,t48,lf[476]);}
+else{
+t47=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11896,tmp=(C_word)a,a+=2,tmp);
+t48=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11931,a[2]=t47,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t49=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1456 stripa");
+t50=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t50,t48,t49);}}
+else{
+t46=(C_word)C_eqp(t1,lf[441]);
+if(C_truep(t46)){
+t47=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
+t48=C_set_block_item(lf[43] /* inline-locally */,0,C_SCHEME_TRUE);
+t49=(C_word)C_i_cdr(((C_word*)t0)[6]);
+if(C_truep((C_word)C_i_nullp(t49))){
+t50=C_set_block_item(lf[42] /* inline-globally */,0,C_SCHEME_TRUE);
+t51=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t51+1)))(2,t51,lf[478]);}
+else{
+t50=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11959,tmp=(C_word)a,a+=2,tmp);
+t51=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11994,a[2]=t50,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t52=(C_word)C_i_cdr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 1464 stripa");
+t53=((C_word*)((C_word*)t0)[3])[1];
+f_10469(t53,t51,t52);}}
+else{
+t47=(C_word)C_eqp(t1,lf[479]);
+if(C_truep(t47)){
+t48=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t49=C_SCHEME_UNDEFINED;
+t50=(*a=C_VECTOR_TYPE|1,a[1]=t49,tmp=(C_word)a,a+=2,tmp);
+t51=C_set_block_item(t50,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12017,a[2]=t50,tmp=(C_word)a,a+=3,tmp));
+t52=((C_word*)t50)[1];
+f_12017(t52,t2,t48);}
+else{
+t48=(C_word)C_eqp(t1,lf[483]);
+if(C_truep(t48)){
+t49=C_set_block_item(lf[45] /* do-scrutinize */,0,C_SCHEME_TRUE);
+t50=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t50+1)))(2,t50,lf[484]);}
+else{
+C_trace("compiler.scm: 1476 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t2,lf[242],lf[485],((C_word*)t0)[6]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+
+/* loop2339 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_12017(C_word t0,C_word 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_12017,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_12076,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_12032,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_listp(t4))){
+t6=(C_word)C_i_car(t4);
+if(C_truep((C_word)C_i_symbolp(t6))){
+t7=(C_word)C_i_length(t4);
+t8=t5;
+f_12032(t8,(C_word)C_eqp(C_fix(2),t7));}
+else{
+t7=t5;
+f_12032(t7,C_SCHEME_FALSE);}}
+else{
+t6=t5;
+f_12032(t6,C_SCHEME_FALSE);}}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12030 in loop2339 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_12032(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_12032,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12035,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[3]);
+t4=(C_word)C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1469 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[481],t4);}
+else{
+C_trace("compiler.scm: 1472 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[2],lf[242],lf[482],((C_word*)t0)[3]);}}
+
+/* k12033 in k12030 in loop2339 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_12035(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_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1470 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[2],t2,lf[480],C_SCHEME_TRUE);}
+
+/* k12074 in loop2339 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_12076(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_12017(t3,((C_word*)t0)[2],t2);}
+
+/* k11992 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11994(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11958 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11959(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_11959,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,lf[460]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11965,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11963 in a11958 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11965(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+
+/* k11929 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11931(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11895 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11896(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_11896,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11902,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[477],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[477],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11900 in a11895 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11902(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[477],t1);}
+
+/* k11868 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11870(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11834 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11835(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_11835,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11841,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[179],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[179],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11839 in a11834 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11841(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[179],t1);}
+
+/* k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11707(C_word c,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_11707,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_11709,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_11709(t5,((C_word*)t0)[2],t1);}
+
+/* loop2200 in k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_11709(C_word t0,C_word 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_11709,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_11807,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_11750,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11754,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1432 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t6,t4);}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11760,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_listp(t4))){
+t6=(C_word)C_i_length(t4);
+t7=(C_word)C_eqp(C_fix(2),t6);
+if(C_truep(t7)){
+t8=(C_word)C_i_car(t4);
+if(C_truep((C_word)C_i_symbolp(t8))){
+t9=(C_word)C_i_cadr(t4);
+t10=t5;
+f_11760(t10,(C_word)C_a_i_string(&a,1,t9));}
+else{
+t9=t5;
+f_11760(t9,C_SCHEME_FALSE);}}
+else{
+t8=t5;
+f_11760(t8,C_SCHEME_FALSE);}}
+else{
+t6=t5;
+f_11760(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);}}
+
+/* k11758 in loop2200 in k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_11760(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_11760,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[3]);
+t3=(C_word)C_i_cadr(((C_word*)t0)[3]);
+t4=((C_word*)t0)[2];
+f_11807(2,t4,(C_word)C_a_i_cons(&a,2,t2,t3));}
+else{
+C_trace("compiler.scm: 1437 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[2],lf[242],lf[471],((C_word*)t0)[3]);}}
+
+/* k11752 in loop2200 in k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11754(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1432 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1,lf[470]);}
+
+/* k11748 in loop2200 in k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11750(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_11750,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_11807(2,t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+
+/* k11805 in loop2200 in k11705 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11807(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11807,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));
+C_trace("loop22002213");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11709(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));
+C_trace("loop22002213");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11709(t6,((C_word*)t0)[3],t5);}}
+
+/* k11701 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11703(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1428 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[2],*((C_word*)lf[38]+1),t1);}
+
+/* k11697 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11699(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[469]);}
+
+/* k11680 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11682(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11682,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11686,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1424 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,((C_word*)t0)[4],*((C_word*)lf[36]+1));}
+else{
+C_trace("compiler.scm: 1425 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),((C_word*)t0)[3],lf[466],((C_word*)t0)[2]);}}
+
+/* k11684 in k11680 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11686(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[465]);}
+
+/* k11652 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11654(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_cadr(((C_word*)t0)[4]);
+if(C_truep((C_word)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[462]);}
+else{
+C_trace("compiler.scm: 1418 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[2],lf[242],lf[463],((C_word*)t0)[4]);}}
+
+/* k11635 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11637(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11601 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11602(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_11602,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,lf[460]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11608,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11606 in a11601 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11608(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[438],t1);}
+
+/* k11538 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11540(C_word c,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_11540,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_11545,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_11545(t5,((C_word*)t0)[2],t1);}
+
+/* loop2154 in k11538 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_11545(C_word t0,C_word 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_11545,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[454]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11555,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));
+C_trace("g21612162");
+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);}}
+
+/* k11553 in loop2154 in k11538 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11555(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_11545(t3,((C_word*)t0)[2],t2);}
+
+/* k11491 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11493(C_word c,C_word t0,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_11493,2,t0,t1);}
+if(C_truep((C_word)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[452]);}
+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_11505,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_11505(t5,((C_word*)t0)[2],t1);}}
+
+/* loop2140 in k11491 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_11505(C_word t0,C_word 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_11505,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[133]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11515,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));
+C_trace("g21472148");
+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);}}
+
+/* k11513 in loop2140 in k11491 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11515(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_11505(t3,((C_word*)t0)[2],t2);}
+
+/* k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11223(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_11223,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11226,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_cadr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1351 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t2,t3);}
+
+/* k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11226(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11226,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[8]);
+if(C_truep(t2)){
+t3=(C_word)C_i_cddr(((C_word*)t0)[7]);
+if(C_truep((C_word)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[430]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11243,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11247,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1357 stripa");
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_10469(t7,t5,t6);}}
+else{
+t3=(C_word)C_eqp(t1,lf[9]);
+if(C_truep(t3)){
+t4=(C_word)C_i_cddr(((C_word*)t0)[7]);
+if(C_truep((C_word)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[433]);}
+else{
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11272,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11276,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(C_word)C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1363 stripa");
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_10469(t8,t6,t7);}}
+else{
+t4=(C_word)C_eqp(t1,lf[435]);
+if(C_truep(t4)){
+t5=(C_word)C_i_cddr(((C_word*)t0)[7]);
+if(C_truep((C_word)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[436]);}
+else{
+t6=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11302,tmp=(C_word)a,a+=2,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11337,a[2]=t6,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1369 stripa");
+t9=((C_word*)((C_word*)t0)[5])[1];
+f_10469(t9,t7,t8);}}
+else{
+t5=(C_word)C_eqp(t1,lf[378]);
+if(C_truep(t5)){
+t6=(C_word)C_i_cddr(((C_word*)t0)[7]);
+if(C_truep((C_word)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[439]);}
+else{
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11362,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1375 stripa");
+t9=((C_word*)((C_word*)t0)[5])[1];
+f_10469(t9,t7,t8);}}
+else{
+t6=(C_word)C_eqp(t1,lf[441]);
+if(C_truep(t6)){
+t7=C_set_block_item(lf[46] /* enable-inline-files */,0,C_SCHEME_TRUE);
+t8=(C_word)C_i_cddr(((C_word*)t0)[7]);
+if(C_truep((C_word)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[442]);}
+else{
+t9=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_11397,tmp=(C_word)a,a+=2,tmp);
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11432,a[2]=t9,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t11=(C_word)C_i_cddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 1384 stripa");
+t12=((C_word*)((C_word*)t0)[5])[1];
+f_10469(t12,t10,t11);}}
+else{
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11443,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: 1386 check-decl");
+f_10421(t7,((C_word*)t0)[7],C_fix(1),(C_word)C_a_i_list(&a,1,C_fix(1)));}}}}}}
+
+/* k11441 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11443(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_11443,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11446,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)[3]);
+C_trace("compiler.scm: 1387 strip");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t4,t2,t3);}
+
+/* k11444 in k11441 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11446(C_word c,C_word 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[396]);
+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[444]);}
+else{
+t3=(C_word)C_eqp(t1,lf[388]);
+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[445]);}
+else{
+C_trace("compiler.scm: 1391 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[2],lf[242],lf[446],t1);}}}
+
+/* k11430 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11432(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11396 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11397(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_11397,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,lf[437]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11403,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[443],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11401 in a11396 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11403(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[443],t1);}
+
+/* k11360 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11362,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11366,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1376 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[432]))(5,*((C_word*)lf[432]+1),t2,*((C_word*)lf[144]+1),C_retrieve(lf[372]),t1);}
+
+/* k11364 in k11360 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11366(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_11366,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_11370,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1377 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[432]))(5,*((C_word*)lf[432]+1),t3,*((C_word*)lf[144]+1),C_retrieve(lf[375]),((C_word*)t0)[2]);}
+
+/* k11368 in k11364 in k11360 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11370(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[440]);}
+
+/* k11335 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11337(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11301 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11302(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_11302,3,t0,t1,t2);}
+t3=(C_word)C_a_i_list(&a,1,lf[437]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11308,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[438],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11306 in a11301 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11308(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[438],t1);}
+
+/* k11274 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11276(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1362 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[432]))(5,*((C_word*)lf[432]+1),((C_word*)t0)[2],*((C_word*)lf[144]+1),C_retrieve(lf[375]),t1);}
+
+/* k11270 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11272(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[434]);}
+
+/* k11245 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1356 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[432]))(5,*((C_word*)lf[432]+1),((C_word*)t0)[2],*((C_word*)lf[144]+1),C_retrieve(lf[372]),t1);}
+
+/* k11241 in k11224 in k11221 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11243(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[431]);}
+
+/* k11208 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11210(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11174 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11175(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_11175,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11181,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[428],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[428],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11179 in a11174 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11181(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[428],t1);}
+
+/* k11120 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11122(C_word c,C_word t0,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_11122,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11129,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11133,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11135,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("map");
+t6=*((C_word*)lf[274]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t4,t5);}
+
+/* a11134 in k11120 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11135(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_11135,3,t0,t1,t2);}
+t3=C_retrieve(lf[418]);
+C_trace("g20152016");
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,lf[419],((C_word*)t0)[2],t2);}
+
+/* k11131 in k11120 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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_trace("##sys#append");
+t2=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k11127 in k11120 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11129(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11129,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[417],t1);
+C_trace("compiler.scm: 1341 emit-control-file-item");
+((C_proc3)C_retrieve_symbol_proc(lf[415]))(3,*((C_word*)lf[415]+1),((C_word*)t0)[2],t2);}
+
+/* k11103 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11105(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k11099 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11101(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11101,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[416],t1);
+C_trace("compiler.scm: 1339 emit-control-file-item");
+((C_proc3)C_retrieve_symbol_proc(lf[415]))(3,*((C_word*)lf[415]+1),((C_word*)t0)[2],t2);}
+
+/* k11078 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11080(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k11074 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11076(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11076,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[414],t1);
+C_trace("compiler.scm: 1337 emit-control-file-item");
+((C_proc3)C_retrieve_symbol_proc(lf[415]))(3,*((C_word*)lf[415]+1),((C_word*)t0)[2],t2);}
+
+/* k11050 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11052,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11056,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1334 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,*((C_word*)lf[13]+1),((C_word*)t0)[4]);}
+else{
+C_trace("compiler.scm: 1335 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),((C_word*)t0)[3],lf[411],((C_word*)t0)[2]);}}
+
+/* k11054 in k11050 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11056(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[410]);}
+
+/* k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10961(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_10961,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10964,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_11002,tmp=(C_word)a,a+=2,tmp);
+C_trace("for-each");
+t4=*((C_word*)lf[404]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,t1);}
+
+/* a11001 in k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11002(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_11002,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11008,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k11006 in a11001 in k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_11008(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+
+/* k10962 in k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10964(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_10964,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10969,tmp=(C_word)a,a+=2,tmp);
+C_trace("for-each");
+t3=*((C_word*)lf[404]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* a10968 in k10962 in k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10969(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_10969,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10975,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k10973 in a10968 in k10962 in k10959 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10975(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k10950 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10952(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a10916 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10917(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_10917,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10923,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[268],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k10921 in a10916 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10923(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+
+/* k10873 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10875(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_10875,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10880,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10915,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1326 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,C_retrieve(lf[372]),C_retrieve(lf[375]));}
+
+/* k10913 in k10873 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10915(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a10879 in k10873 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10880(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_10880,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10886,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k10884 in a10879 in k10873 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10886(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k10853 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10855(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[404]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a10819 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10820(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_10820,3,t0,t1,t2);}
+t3=C_SCHEME_END_OF_LIST;
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10826,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t1,t2,lf[134],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k10824 in a10819 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10826(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k10803 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10805(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1316 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[2],t1,C_retrieve(lf[401]));}
+
+/* k10799 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10801(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[401]+1 /* (set! disabled-warnings ...) */,t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[402]);}
+
+/* k10715 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10717,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10721,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1304 strip");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_10475(t4,t2,t3);}
+
+/* k10719 in k10715 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10721(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[382]);}
+
+/* k10690 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10692,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10696,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1300 lset-intersection");
+((C_proc5)C_retrieve_symbol_proc(lf[381]))(5,*((C_word*)lf[381]+1),t2,*((C_word*)lf[144]+1),t1,C_retrieve(lf[372]));}
+
+/* k10694 in k10690 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10696,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_10700,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1301 lset-intersection");
+((C_proc5)C_retrieve_symbol_proc(lf[381]))(5,*((C_word*)lf[381]+1),t3,*((C_word*)lf[144]+1),((C_word*)t0)[2],C_retrieve(lf[375]));}
+
+/* k10698 in k10694 in k10690 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10700(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[380]);}
+
+/* k10665 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10667(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1293 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[2],t1,*((C_word*)lf[9]+1));}
+
+/* k10661 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 *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[377]);}
+
+/* k10636 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10638(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1289 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[2],t1,*((C_word*)lf[8]+1));}
+
+/* k10632 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10634(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[374]);}
+
+/* k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10586(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_10586,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10589,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1281 stripu");
+t4=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
+
+/* k10587 in k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10589(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_10589,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10592,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10613,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1282 stringify");
+((C_proc3)C_retrieve_symbol_proc(lf[363]))(3,*((C_word*)lf[363]+1),t3,t1);}
+
+/* k10611 in k10587 in k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10613(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1282 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),((C_word*)t0)[2],t1);}
+
+/* k10590 in k10587 in k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10592(C_word c,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_10592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10595,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_10599,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_word)C_i_string_equal_p(*((C_word*)lf[5]+1),t1);
+t5=t3;
+f_10599(t5,(C_word)C_i_not(t4));}
+else{
+t4=t3;
+f_10599(t4,C_SCHEME_FALSE);}}
+
+/* k10597 in k10590 in k10587 in k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10599(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: 1284 compiler-warning");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),((C_word*)t0)[4],lf[369],lf[370]);}
+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[371]);}}
+
+/* k10593 in k10590 in k10587 in k10584 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10595(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[368]);}
+
+/* k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10501,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10504,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_apply(4,0,t2,C_retrieve(lf[366]),t1);}
+
+/* k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10504(C_word c,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_10504,2,t0,t1);}
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[3]))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10513,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_10566,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10572,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1273 ##sys#hash-table-update!");
+((C_proc6)C_retrieve_symbol_proc(lf[145]))(6,*((C_word*)lf[145]+1),t2,*((C_word*)lf[84]+1),lf[364],t3,t4);}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[365]);}}
+
+/* a10571 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10572(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_10572,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* a10565 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10566(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_10566,3,t0,t1,t2);}
+t3=C_retrieve(lf[143]);
+C_trace("g17751776");
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[144]+1),((C_word*)t0)[2],t2);}
+
+/* k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 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_10513,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_10516,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_10522,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_10522(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1780 in k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10522(C_word t0,C_word 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_10522,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_10560,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=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10557,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1277 stringify");
+((C_proc3)C_retrieve_symbol_proc(lf[363]))(3,*((C_word*)lf[363]+1),t5,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10555 in loop1780 in k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10557(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1277 string->c-identifier");
+((C_proc3)C_retrieve_symbol_proc(lf[362]))(3,*((C_word*)lf[362]+1),((C_word*)t0)[2],t1);}
+
+/* k10558 in loop1780 in k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10560(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10560,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));
+C_trace("loop17801793");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10522(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));
+C_trace("loop17801793");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10522(t6,((C_word*)t0)[3],t5);}}
+
+/* k10514 in k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10516,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10520,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1278 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,*((C_word*)lf[11]+1),t1);}
+
+/* k10518 in k10514 in k10511 in k10502 in k10499 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10520(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[361]);}
+
+/* k10493 in k10490 in k10487 in a10484 in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10495(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[359]);}
+
+/* strip in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10475(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_10475,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1261 ##sys#strip-syntax");
+((C_proc4)C_retrieve_symbol_proc(lf[128]))(4,*((C_word*)lf[128]+1),t1,t2,((C_word*)t0)[2]);}
+
+/* stripa in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10469(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_10469,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1259 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[128]))(5,*((C_word*)lf[128]+1),t1,t2,((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* check-decl in ##compiler#process-declaration in k5138 in k5135 */
+static void C_fcall f_10421(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_10421,NULL,4,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(C_word)C_i_length(t5);
+t7=(C_word)C_fixnum_lessp(t6,t3);
+if(C_truep(t7)){
+if(C_truep(t7)){
+C_trace("compiler.scm: 1257 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t1,lf[358],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_10444,a[2]=t2,a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+if(C_truep((C_word)C_fixnum_greaterp(t6,C_fix(99999)))){
+C_trace("compiler.scm: 1257 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t1,lf[358],t2);}
+else{
+t9=C_SCHEME_UNDEFINED;
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
+else{
+t9=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t9))){
+t10=t8;
+f_10444(2,t10,(C_word)C_i_car(t4));}
+else{
+C_trace("##sys#error");
+t10=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t8,lf[0],t4);}}}}
+
+/* k10442 in check-decl in ##compiler#process-declaration in k5138 in k5135 */
+static void C_ccall f_10444(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_fixnum_greaterp(((C_word*)t0)[4],t1))){
+C_trace("compiler.scm: 1257 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),((C_word*)t0)[3],lf[358],((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 k5138 in k5135 */
+static void C_ccall f_5298(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 ab[60],*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_5298,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_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_set_block_item(t4,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5301,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t22=C_set_block_item(t6,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5340,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t23=C_set_block_item(t8,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5355,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t24=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5368,tmp=(C_word)a,a+=2,tmp));
+t25=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5428,a[2]=t6,tmp=(C_word)a,a+=3,tmp));
+t26=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5474,a[2]=t6,a[3]=t18,tmp=(C_word)a,a+=4,tmp));
+t27=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5644,tmp=(C_word)a,a+=2,tmp));
+t28=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5774,a[2]=t8,a[3]=t12,a[4]=t20,a[5]=t16,a[6]=t6,a[7]=t10,a[8]=t18,a[9]=t14,tmp=(C_word)a,a+=10,tmp));
+t29=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10328,a[2]=t18,tmp=(C_word)a,a+=3,tmp));
+t30=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10375,a[2]=t2,a[3]=t1,a[4]=t18,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_memq(lf[137],C_retrieve(lf[356])))){
+t31=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10413,a[2]=t2,a[3]=t30,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1238 newline");
+((C_proc2)C_retrieve_proc(*((C_word*)lf[357]+1)))(2,*((C_word*)lf[357]+1),t31);}
+else{
+t31=t30;
+f_10375(2,t31,C_SCHEME_UNDEFINED);}}
+
+/* k10411 in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1238 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[219]))(3,*((C_word*)lf[219]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10375(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_10375,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10378,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: 1239 ##sys#clear-trace-buffer");
+((C_proc2)C_retrieve_symbol_proc(lf[355]))(2,*((C_word*)lf[355]+1),t2);}
+
+/* k10376 in k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+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_10393,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_10397,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1243 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[213]+1)))(3,*((C_word*)lf[213]+1),t3,*((C_word*)lf[77]+1));}
+
+/* k10395 in k10376 in k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10397(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_10397,2,t0,t1);}
+t2=C_set_block_item(lf[77] /* pending-canonicalizations */,0,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10407,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: 1247 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,C_retrieve(lf[354]),*((C_word*)lf[9]+1));}
+
+/* k10405 in k10395 in k10376 in k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10407(C_word c,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_10407,2,t0,t1);}
+t2=C_mutate((C_word*)lf[9]+1 /* (set! extended-bindings ...) */,t1);
+t3=((C_word*)t0)[4];
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t5=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
+
+/* k10391 in k10376 in k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10393,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10389,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: 1249 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[194]))(2,*((C_word*)lf[194]+1),t3);}
+
+/* k10387 in k10391 in k10376 in k10373 in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10389(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1241 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1,C_SCHEME_FALSE);}
+
+/* mapwalk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_10328(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_10328,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_10334,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_10334(t12,t1,t2);}
+
+/* loop1692 in mapwalk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_10334(C_word t0,C_word 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_10334,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_10361,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_10368,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));
+C_trace("g17081709");
+t6=t3;
+f_10361(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10366 in loop1692 in mapwalk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10368(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10368,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));
+C_trace("loop16921705");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10334(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));
+C_trace("loop16921705");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10334(t6,((C_word*)t0)[3],t5);}}
+
+/* g1708 in loop1692 in mapwalk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_10361(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_10361,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1236 walk");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5774(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_5774,NULL,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_i_symbolp(t2))){
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5784,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,a[7]=((C_word*)t0)[9],tmp=(C_word)a,a+=8,tmp);
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5790,a[2]=t6,a[3]=t5,a[4]=t4,a[5]=t3,a[6]=t1,a[7]=((C_word*)t0)[9],a[8]=t2,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 513 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[119]))(3,*((C_word*)lf[119]+1),t7,t2);}
+else{
+if(C_truep((C_word)C_i_not_pair_p(t2))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5818,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 520 constant?");
+((C_proc3)C_retrieve_symbol_proc(lf[122]))(3,*((C_word*)lf[122]+1),t6,t2);}
+else{
+t6=(C_word)C_i_car(t2);
+if(C_truep((C_word)C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5837,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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]=t4,a[11]=t3,a[12]=((C_word*)t0)[8],a[13]=t2,tmp=(C_word)a,a+=14,tmp);
+C_trace("compiler.scm: 524 get-line");
+((C_proc3)C_retrieve_symbol_proc(lf[270]))(3,*((C_word*)lf[270]+1),t7,t2);}
+else{
+if(C_truep((C_word)C_i_listp(t2))){
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10256,a[2]=t5,a[3]=((C_word*)t0)[8],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_word)C_i_car(t2);
+C_trace("compiler.scm: 1221 constant?");
+((C_proc3)C_retrieve_symbol_proc(lf[122]))(3,*((C_word*)lf[122]+1),t7,t8);}
+else{
+C_trace("compiler.scm: 1219 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t1,lf[353],t2);}}}}}
+
+/* k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10256(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_10256,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10259,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: 1222 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[351]))(4,*((C_word*)lf[351]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10268,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: 1227 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[351]))(4,*((C_word*)lf[351]+1),t2,((C_word*)t0)[6],C_SCHEME_FALSE);}}
+
+/* k10266 in k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10268(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_10268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10271,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 1228 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t2);}
+
+/* k10269 in k10266 in k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10271(C_word c,C_word t0,C_word t1){
+C_word 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_10271,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=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10298,a[2]=((C_word*)t0)[2],a[3]=((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_word)C_i_cdr(((C_word*)t0)[7]);
+C_trace("##sys#append");
+t8=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t7,C_SCHEME_END_OF_LIST);}
+
+/* k10296 in k10269 in k10266 in k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10298(C_word c,C_word t0,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_10298,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],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,lf[160],t4);
+C_trace("compiler.scm: 1229 walk");
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t6,((C_word*)t0)[5],t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10257 in k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10259(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_10259,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10262,a[2]=((C_word*)t0)[2],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 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t2,lf[242],lf[352],((C_word*)t0)[4]);}
+
+/* k10260 in k10257 in k10254 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10262(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1224 mapwalk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_10328(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5837,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5840,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);
+C_trace("compiler.scm: 525 emit-syntax-trace-info");
+((C_proc4)C_retrieve_symbol_proc(lf[351]))(4,*((C_word*)lf[351]+1),t2,((C_word*)t0)[13],C_SCHEME_FALSE);}
+
+/* k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[20],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5840,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5843,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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((C_word)C_i_listp(((C_word*)t0)[14]))){
+t3=t2;
+f_5843(2,t3,C_SCHEME_UNDEFINED);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10226,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[14],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("open-output-string");
+((C_proc2)C_retrieve_symbol_proc(lf[265]))(2,*((C_word*)lf[265]+1),t3);}
+else{
+C_trace("compiler.scm: 529 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),t2,lf[350],((C_word*)t0)[14]);}}}
+
+/* k10224 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10226,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10229,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[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[349],t1);}
+
+/* k10227 in k10224 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10229(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_10229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10232,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[262]+1)))(4,*((C_word*)lf[262]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* k10230 in k10227 in k10224 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10232(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_10232,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10235,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[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[348],((C_word*)t0)[2]);}
+
+/* k10233 in k10230 in k10227 in k10224 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10235(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_10235,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10238,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[261]))(3,*((C_word*)lf[261]+1),t2,((C_word*)t0)[2]);}
+
+/* k10236 in k10233 in k10230 in k10227 in k10224 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10238(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 528 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5843,2,t0,t1);}
+t2=C_mutate((C_word*)lf[123]+1 /* (set! syntax-error-culprit ...) */,((C_word*)t0)[14]);
+t3=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_5847,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_i_car(((C_word*)t0)[14]);
+C_trace("compiler.scm: 531 lookup");
+t5=((C_word*)((C_word*)t0)[7])[1];
+f_5340(t5,t3,t4,((C_word*)t0)[11]);}
+
+/* k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5847(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_5847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5850,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]=t1,tmp=(C_word)a,a+=16,tmp);
+if(C_truep((C_word)C_i_symbolp(t1))){
+C_trace("compiler.scm: 532 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t2,t1,lf[107]);}
+else{
+t3=t2;
+f_5850(2,t3,C_SCHEME_FALSE);}}
+
+/* k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5850(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_5850,2,t0,t1);}
+t2=(C_truep(t1)?t1:((C_word*)t0)[15]);
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5856,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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]=((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: 533 ##sys#expand");
+((C_proc5)C_retrieve_symbol_proc(lf[347]))(5,*((C_word*)lf[347]+1),t3,((C_word*)t0)[14],((C_word*)t0)[11],*((C_word*)lf[47]+1));}
+
+/* k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5856(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_5856,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[15],t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_5868,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);
+if(C_truep(*((C_word*)lf[57]+1))){
+C_trace("compiler.scm: 537 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t3,*((C_word*)lf[56]+1),((C_word*)t0)[9]);}
+else{
+t4=t3;
+f_5868(2,t4,C_SCHEME_FALSE);}}
+else{
+C_trace("compiler.scm: 535 walk");
+t3=((C_word*)((C_word*)t0)[14])[1];
+f_5774(t3,((C_word*)t0)[10],t1,((C_word*)t0)[13],((C_word*)t0)[12],((C_word*)t0)[11]);}}
+
+/* k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5868,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5872,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[13],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[16],tmp=(C_word)a,a+=7,tmp);
+C_trace("g328329");
+t3=t2;
+f_5872(t3,((C_word*)t0)[11],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5890,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)[13],a[11]=((C_word*)t0)[14],a[12]=((C_word*)t0)[15],a[13]=((C_word*)t0)[16],a[14]=((C_word*)t0)[11],a[15]=((C_word*)t0)[10],tmp=(C_word)a,a+=16,tmp);
+if(C_truep(((C_word*)t0)[3])){
+C_trace("compiler.scm: 542 update-line-number-database!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[346]+1)))(4,*((C_word*)lf[346]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+else{
+t3=t2;
+f_5890(2,t3,C_SCHEME_UNDEFINED);}}}
+
+/* k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5890(C_word c,C_word t0,C_word 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_5890,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[15],lf[124]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5899,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],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 546 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t3,lf[124],((C_word*)t0)[13],lf[127],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[15],lf[99]);
+t4=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_5957,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)[11],a[11]=((C_word*)t0)[12],a[12]=((C_word*)t0)[10],a[13]=((C_word*)t0)[15],a[14]=((C_word*)t0)[13],a[15]=((C_word*)t0)[14],tmp=(C_word)a,a+=16,tmp);
+if(C_truep(t3)){
+t5=t4;
+f_5957(t5,t3);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[15],lf[242]);
+t6=t4;
+f_5957(t6,(C_truep(t5)?t5:(C_word)C_eqp(((C_word*)t0)[15],lf[202])));}}}
+
+/* k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5957(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_5957,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5960,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 555 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t2,((C_word*)t0)[13],((C_word*)t0)[14],lf[129],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[13],lf[130]);
+if(C_truep(t2)){
+if(C_truep(*((C_word*)lf[12]+1))){
+t3=((C_word*)t0)[15];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[131]);}
+else{
+t3=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 561 walk");
+t4=((C_word*)((C_word*)t0)[11])[1];
+f_5774(t4,((C_word*)t0)[15],t3,((C_word*)t0)[10],((C_word*)t0)[12],((C_word*)t0)[9]);}}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[13],lf[132]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6000,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 564 cadadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[138]+1)))(3,*((C_word*)lf[138]+1),t4,((C_word*)t0)[14]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[13],lf[139]);
+t5=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_6058,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)[12],a[11]=((C_word*)t0)[10],a[12]=((C_word*)t0)[11],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(t4)){
+t6=t5;
+f_6058(t6,t4);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[13],lf[345]);
+t7=t5;
+f_6058(t7,(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[13],lf[107])));}}}}}
+
+/* k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6058(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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 ab[21],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_6058,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[15];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[14]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[13],lf[101]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6079,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 577 caadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[140]+1)))(3,*((C_word*)lf[140]+1),t3,((C_word*)t0)[14]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[13],lf[105]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6108,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)[14],a[7]=((C_word*)t0)[15],tmp=(C_word)a,a+=8,tmp);
+t5=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 581 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t4,t5);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[13],lf[141]);
+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_6133,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+t10=(C_word)C_i_cdr(((C_word*)t0)[14]);
+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_6154,a[2]=t6,a[3]=t12,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
+t14=((C_word*)t12)[1];
+f_6154(t14,t9,t10);}
+else{
+t5=(C_word)C_eqp(((C_word*)t0)[13],lf[149]);
+if(C_truep(t5)){
+t6=(C_word)C_i_caddr(((C_word*)t0)[14]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6203,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+t8=(C_word)C_i_cadr(((C_word*)t0)[14]);
+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|3,a[1]=(C_word)f_6209,a[2]=t10,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
+t12=((C_word*)t10)[1];
+f_6209(t12,t7,t8);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[13],lf[159]);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(((C_word*)t0)[13],lf[160]));
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6290,a[2]=((C_word*)t0)[8],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 614 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t8,lf[159],((C_word*)t0)[14],lf[165],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t8=(C_word)C_eqp(((C_word*)t0)[13],lf[166]);
+t9=(C_truep(t8)?t8:(C_word)C_eqp(((C_word*)t0)[13],lf[167]));
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6502,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[14],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 629 ##sys#check-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[126]))(5,*((C_word*)lf[126]+1),t10,lf[166],((C_word*)t0)[14],lf[171]);}
+else{
+t10=(C_word)C_eqp(((C_word*)t0)[13],lf[172]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(((C_word*)t0)[13],lf[173]));
+if(C_truep(t11)){
+t12=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6659,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[8],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[7],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[9],a[10]=((C_word*)t0)[14],tmp=(C_word)a,a+=11,tmp);
+C_trace("compiler.scm: 644 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t12,lf[172],((C_word*)t0)[14],lf[185],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t12=(C_word)C_eqp(((C_word*)t0)[13],lf[186]);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6988,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[12],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 690 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t13,lf[186],((C_word*)t0)[14],lf[188],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t13=(C_word)C_eqp(((C_word*)t0)[13],lf[189]);
+if(C_truep(t13)){
+t14=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7075,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[11],a[7]=((C_word*)t0)[15],a[8]=((C_word*)t0)[12],tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 706 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t14,lf[189],((C_word*)t0)[14],lf[190],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t14=(C_word)C_eqp(((C_word*)t0)[13],lf[191]);
+t15=(C_truep(t14)?t14:(C_word)C_eqp(((C_word*)t0)[13],lf[192]));
+if(C_truep(t15)){
+t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7199,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[10],a[7]=((C_word*)t0)[11],a[8]=((C_word*)t0)[15],a[9]=((C_word*)t0)[12],tmp=(C_word)a,a+=10,tmp);
+t17=(C_word)C_i_car(((C_word*)t0)[14]);
+t18=(C_word)C_i_cadr(((C_word*)t0)[14]);
+if(C_truep((C_word)C_i_pairp(t18))){
+C_trace("compiler.scm: 724 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t16,t17,((C_word*)t0)[14],lf[199],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+C_trace("compiler.scm: 724 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t16,t17,((C_word*)t0)[14],lf[200],C_SCHEME_FALSE,((C_word*)t0)[10]);}}
+else{
+t16=(C_word)C_eqp(((C_word*)t0)[13],lf[201]);
+if(C_truep(t16)){
+t17=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t18=(C_word)C_i_caddr(((C_word*)t0)[14]);
+t19=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7354,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[12],a[8]=t18,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 753 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[128]))(5,*((C_word*)lf[128]+1),t19,t17,((C_word*)t0)[10],C_SCHEME_TRUE);}
+else{
+t17=(C_word)C_eqp(((C_word*)t0)[13],lf[206]);
+if(C_truep(t17)){
+t18=C_SCHEME_END_OF_LIST;
+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=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7444,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[14],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);
+t23=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t24=C_SCHEME_UNDEFINED;
+t25=(*a=C_VECTOR_TYPE|1,a[1]=t24,tmp=(C_word)a,a+=2,tmp);
+t26=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7551,a[2]=t19,a[3]=t25,a[4]=t21,a[5]=((C_word*)t0)[6],a[6]=((C_word*)t0)[10],tmp=(C_word)a,a+=7,tmp));
+t27=((C_word*)t25)[1];
+f_7551(t27,t22,t23);}
+else{
+t18=(C_word)C_eqp(((C_word*)t0)[13],lf[210]);
+if(C_truep(t18)){
+t19=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7628,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[12],a[7]=((C_word*)t0)[14],tmp=(C_word)a,a+=8,tmp);
+t20=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 794 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t19,t20);}
+else{
+t19=(C_word)C_eqp(((C_word*)t0)[13],lf[250]);
+if(C_truep(t19)){
+t20=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8122,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[15],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[14],tmp=(C_word)a,a+=7,tmp);
+t21=(C_word)C_i_cddr(((C_word*)t0)[14]);
+C_trace("##sys#append");
+t22=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t22+1)))(4,t22,t20,t21,C_SCHEME_END_OF_LIST);}
+else{
+t20=(C_word)C_eqp(((C_word*)t0)[13],lf[251]);
+if(C_truep(t20)){
+t21=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t22=(C_word)C_i_cddr(((C_word*)t0)[14]);
+t23=C_SCHEME_END_OF_LIST;
+t24=(*a=C_VECTOR_TYPE|1,a[1]=t23,tmp=(C_word)a,a+=2,tmp);
+t25=C_SCHEME_FALSE;
+t26=(*a=C_VECTOR_TYPE|1,a[1]=t25,tmp=(C_word)a,a+=2,tmp);
+t27=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8141,a[2]=((C_word*)t0)[10],a[3]=t22,a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[12],a[6]=t21,a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[15],tmp=(C_word)a,a+=9,tmp);
+t28=C_SCHEME_UNDEFINED;
+t29=(*a=C_VECTOR_TYPE|1,a[1]=t28,tmp=(C_word)a,a+=2,tmp);
+t30=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8224,a[2]=t24,a[3]=t29,a[4]=t26,tmp=(C_word)a,a+=5,tmp));
+t31=((C_word*)t29)[1];
+f_8224(t31,t27,t21);}
+else{
+t21=(C_word)C_eqp(((C_word*)t0)[13],lf[252]);
+t22=(C_truep(t21)?t21:(C_word)C_eqp(((C_word*)t0)[13],lf[169]));
+if(C_truep(t22)){
+t23=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8269,a[2]=((C_word*)t0)[7],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)[14],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 891 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t23,lf[252],((C_word*)t0)[14],lf[271],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t23=(C_word)C_eqp(((C_word*)t0)[13],lf[272]);
+if(C_truep(t23)){
+t24=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8602,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
+t25=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 943 unquotify");
+t26=((C_word*)((C_word*)t0)[4])[1];
+f_5428(t26,t24,t25,((C_word*)t0)[10]);}
+else{
+t24=(C_word)C_eqp(((C_word*)t0)[13],lf[273]);
+if(C_truep(t24)){
+t25=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8635,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],tmp=(C_word)a,a+=7,tmp);
+t26=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8649,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t27=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("map");
+t28=*((C_word*)lf[274]+1);
+((C_proc4)(void*)(*((C_word*)t28+1)))(4,t28,t25,t26,t27);}
+else{
+t25=(C_word)C_eqp(((C_word*)t0)[13],lf[253]);
+if(C_truep(t25)){
+t26=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t27=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8682,a[2]=((C_word*)t0)[15],a[3]=t26,tmp=(C_word)a,a+=4,tmp);
+t28=(C_word)C_i_caddr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 951 walk");
+t29=((C_word*)((C_word*)t0)[12])[1];
+f_5774(t29,t27,t28,((C_word*)t0)[11],((C_word*)t0)[10],C_SCHEME_FALSE);}
+else{
+t26=(C_word)C_eqp(((C_word*)t0)[13],lf[256]);
+if(C_truep(t26)){
+t27=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t28=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8711,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[14],a[6]=((C_word*)t0)[15],a[7]=t27,tmp=(C_word)a,a+=8,tmp);
+t29=(C_word)C_i_caddr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 956 walk");
+t30=((C_word*)((C_word*)t0)[12])[1];
+f_5774(t30,t28,t29,((C_word*)t0)[11],((C_word*)t0)[10],C_SCHEME_FALSE);}
+else{
+t27=(C_word)C_eqp(((C_word*)t0)[13],lf[275]);
+t28=(C_truep(t27)?t27:(C_word)C_eqp(((C_word*)t0)[13],lf[276]));
+if(C_truep(t28)){
+t29=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t30=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8742,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=t29,a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[12],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 961 eval/meta");
+f_5644(t30,t29);}
+else{
+t29=(C_word)C_eqp(((C_word*)t0)[13],lf[277]);
+t30=(C_truep(t29)?t29:(C_word)C_eqp(((C_word*)t0)[13],lf[278]));
+if(C_truep(t30)){
+t31=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8757,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+t32=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 965 eval/meta");
+f_5644(t31,t32);}
+else{
+t31=(C_word)C_eqp(((C_word*)t0)[13],lf[176]);
+t32=(C_truep(t31)?t31:(C_word)C_eqp(((C_word*)t0)[13],lf[152]));
+if(C_truep(t32)){
+t33=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8773,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)[15],a[7]=((C_word*)t0)[14],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 969 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t33,lf[176],((C_word*)t0)[14],lf[281],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+t33=(C_word)C_eqp(((C_word*)t0)[13],lf[282]);
+if(C_truep(t33)){
+t34=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8840,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 981 expand-foreign-lambda");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[283]+1)))(4,*((C_word*)lf[283]+1),t34,((C_word*)t0)[14],C_SCHEME_FALSE);}
+else{
+t34=(C_word)C_eqp(((C_word*)t0)[13],lf[284]);
+if(C_truep(t34)){
+t35=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8853,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 984 expand-foreign-lambda");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[283]+1)))(4,*((C_word*)lf[283]+1),t35,((C_word*)t0)[14],C_SCHEME_TRUE);}
+else{
+t35=(C_word)C_eqp(((C_word*)t0)[13],lf[285]);
+if(C_truep(t35)){
+t36=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8866,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 987 expand-foreign-lambda*");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[286]+1)))(4,*((C_word*)lf[286]+1),t36,((C_word*)t0)[14],C_SCHEME_FALSE);}
+else{
+t36=(C_word)C_eqp(((C_word*)t0)[13],lf[287]);
+if(C_truep(t36)){
+t37=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8879,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 990 expand-foreign-lambda*");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[286]+1)))(4,*((C_word*)lf[286]+1),t37,((C_word*)t0)[14],C_SCHEME_TRUE);}
+else{
+t37=(C_word)C_eqp(((C_word*)t0)[13],lf[288]);
+if(C_truep(t37)){
+t38=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8892,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[11],a[5]=((C_word*)t0)[15],a[6]=((C_word*)t0)[12],tmp=(C_word)a,a+=7,tmp);
+C_trace("compiler.scm: 993 expand-foreign-primitive");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[289]+1)))(3,*((C_word*)lf[289]+1),t38,((C_word*)t0)[14]);}
+else{
+t38=(C_word)C_eqp(((C_word*)t0)[13],lf[290]);
+if(C_truep(t38)){
+t39=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8901,a[2]=((C_word*)t0)[14],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+t40=(C_word)C_i_cadr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 996 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t39,t40);}
+else{
+t39=(C_word)C_eqp(((C_word*)t0)[13],lf[293]);
+if(C_truep(t39)){
+t40=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t41=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8958,a[2]=t40,a[3]=((C_word*)t0)[9],a[4]=((C_word*)t0)[10],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
+t42=(C_word)C_i_caddr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 1011 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t41,t42);}
+else{
+t40=(C_word)C_eqp(((C_word*)t0)[13],lf[298]);
+if(C_truep(t40)){
+t41=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t42=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9122,a[2]=t41,a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[14],tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 1034 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t42,t41);}
+else{
+t41=(C_word)C_eqp(((C_word*)t0)[13],lf[303]);
+if(C_truep(t41)){
+t42=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t43=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9178,a[2]=((C_word*)t0)[10],a[3]=t42,a[4]=((C_word*)t0)[9],a[5]=((C_word*)t0)[11],a[6]=((C_word*)t0)[15],a[7]=((C_word*)t0)[12],a[8]=((C_word*)t0)[14],tmp=(C_word)a,a+=9,tmp);
+t44=(C_word)C_i_caddr(((C_word*)t0)[14]);
+C_trace("compiler.scm: 1048 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t43,t44);}
+else{
+t42=(C_word)C_eqp(((C_word*)t0)[13],lf[307]);
+if(C_truep(t42)){
+t43=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t44=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9339,a[2]=t43,a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9343,a[2]=t44,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1074 cdaddr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[309]+1)))(3,*((C_word*)lf[309]+1),t45,((C_word*)t0)[14]);}
+else{
+t43=(C_word)C_eqp(((C_word*)t0)[13],lf[310]);
+if(C_truep(t43)){
+t44=(C_word)C_i_cadr(((C_word*)t0)[14]);
+t45=(C_word)C_i_caddr(((C_word*)t0)[14]);
+t46=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9358,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=((C_word*)t0)[15],a[6]=t44,tmp=(C_word)a,a+=7,tmp);
+t47=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9489,a[2]=t44,a[3]=t45,tmp=(C_word)a,a+=4,tmp);
+C_trace("call-with-current-continuation");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[239]+1)))(3,*((C_word*)lf[239]+1),t46,t47);}
+else{
+t44=(C_word)C_eqp(((C_word*)t0)[13],lf[317]);
+if(C_truep(t44)){
+t45=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9564,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],a[4]=((C_word*)t0)[12],tmp=(C_word)a,a+=5,tmp);
+t46=C_SCHEME_END_OF_LIST;
+t47=(*a=C_VECTOR_TYPE|1,a[1]=t46,tmp=(C_word)a,a+=2,tmp);
+t48=C_SCHEME_FALSE;
+t49=(*a=C_VECTOR_TYPE|1,a[1]=t48,tmp=(C_word)a,a+=2,tmp);
+t50=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9568,a[2]=t45,tmp=(C_word)a,a+=3,tmp);
+t51=(C_word)C_i_cdr(((C_word*)t0)[14]);
+t52=C_SCHEME_UNDEFINED;
+t53=(*a=C_VECTOR_TYPE|1,a[1]=t52,tmp=(C_word)a,a+=2,tmp);
+t54=C_set_block_item(t53,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9574,a[2]=t47,a[3]=t53,a[4]=t49,a[5]=((C_word*)t0)[10],tmp=(C_word)a,a+=6,tmp));
+t55=((C_word*)t53)[1];
+f_9574(t55,t50,t51);}
+else{
+t45=(C_word)C_eqp(((C_word*)t0)[13],lf[319]);
+if(C_truep(t45)){
+t46=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9623,a[2]=((C_word*)t0)[14],tmp=(C_word)a,a+=3,tmp);
+t47=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9633,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[3],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("##sys#call-with-values");
+C_call_with_values(4,0,((C_word*)t0)[15],t46,t47);}
+else{
+t46=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9944,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[14],a[5]=((C_word*)t0)[5],a[6]=((C_word*)t0)[13],a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
+t47=(C_word)C_eqp(lf[342],((C_word*)t0)[13]);
+if(C_truep(t47)){
+t48=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9984,a[2]=((C_word*)t0)[7],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)[14],tmp=(C_word)a,a+=8,tmp);
+C_trace("compiler.scm: 1200 ##sys#check-syntax");
+((C_proc7)C_retrieve_symbol_proc(lf[126]))(7,*((C_word*)lf[126]+1),t48,lf[342],((C_word*)t0)[14],lf[344],C_SCHEME_FALSE,((C_word*)t0)[10]);}
+else{
+C_trace("compiler.scm: 1216 handle-call");
+t48=t46;
+f_9944(t48,((C_word*)t0)[15]);}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+
+/* k9982 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9984(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9984,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+if(C_truep((C_word)C_i_symbolp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10117,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: 1203 lookup");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_5340(t4,t3,t2,((C_word*)t0)[4]);}
+else{
+t3=(C_word)C_a_i_cons(&a,2,lf[342],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[99],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_SCHEME_FALSE,t5);
+t7=(C_word)C_a_i_cons(&a,2,C_fix(0),t6);
+t8=(C_word)C_a_i_cons(&a,2,t2,t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[343],t8);
+C_trace("compiler.scm: 1214 walk");
+t10=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t10,((C_word*)t0)[3],t9,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
+
+/* k10115 in k9982 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_10117(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_10117,2,t0,t1);}
+t2=(C_word)C_i_assq(t1,*((C_word*)lf[76]+1));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10000,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("g16511652");
+t4=t3;
+f_10000(t4,((C_word*)t0)[3],t2);}
+else{
+t3=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[73]+1));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10046,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("g16591660");
+t5=t4;
+f_10046(t5,((C_word*)t0)[3],t3);}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[2],*((C_word*)lf[79]+1)))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10078,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1211 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t4,((C_word*)t0)[2]);}
+else{
+t4=(C_word)C_a_i_cons(&a,2,lf[342],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[99],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_SCHEME_FALSE,t6);
+t8=(C_word)C_a_i_cons(&a,2,C_fix(0),t7);
+t9=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[343],t9);
+C_trace("compiler.scm: 1213 walk");
+t11=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t11,((C_word*)t0)[3],t10,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}}}
+
+/* k10076 in k10115 in k9982 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10078,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[299],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*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_cons(&a,2,lf[101],t4));}
+
+/* g1659 in k10115 in k9982 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_10046(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_10046,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cdr(t2);
+C_trace("compiler.scm: 1209 walk");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t4,t1,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* g1651 in k10115 in k9982 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_10000(C_word t0,C_word 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_10000,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cadr(t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[342],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[99],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_SCHEME_FALSE,t6);
+t8=(C_word)C_a_i_cons(&a,2,C_fix(0),t7);
+t9=(C_word)C_a_i_cons(&a,2,t3,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[343],t9);
+C_trace("compiler.scm: 1205 walk");
+t11=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t11,t1,t10,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* handle-call in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9944(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_9944,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9948,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: 1189 mapwalk");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_10328(t3,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9946 in handle-call in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9948(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_9948,2,t0,t1);}
+t2=(C_word)C_i_car(t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9954,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: 1191 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t3,*((C_word*)lf[53]+1),t2);}
+
+/* k9952 in k9946 in handle-call in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9954(C_word c,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_9954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9957,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_9968,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_word)C_i_cdr(t1);
+C_trace("compiler.scm: 1196 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t3,((C_word*)t0)[5],((C_word*)t0)[4],t4);}
+else{
+C_trace("compiler.scm: 1196 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+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]);}}
+
+/* k9966 in k9952 in k9946 in handle-call in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9968,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 1193 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),((C_word*)t0)[3],*((C_word*)lf[53]+1),((C_word*)t0)[2],t2);}
+
+/* k9955 in k9952 in k9946 in handle-call in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9957(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]);}
+
+/* a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9633(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_9633,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t3);
+t5=(C_word)C_i_car(t2);
+t6=(C_word)C_i_cadr(t5);
+t7=(C_word)C_i_caddr(t2);
+t8=(C_word)C_i_cadr(t7);
+t9=(C_word)C_i_cadddr(t2);
+t10=(C_word)C_i_cadr(t9);
+t11=(C_word)C_i_cadr(t4);
+t12=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9652,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_9924,a[2]=t12,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1119 valid-c-identifier?");
+((C_proc3)C_retrieve_symbol_proc(lf[341]))(3,*((C_word*)lf[341]+1),t13,t6);}
+
+/* k9922 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9924(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_9924,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],*((C_word*)lf[79]+1));
+t3=C_mutate((C_word*)lf[79]+1 /* (set! callback-names ...) */,t2);
+t4=((C_word*)t0)[2];
+f_9652(2,t4,t3);}
+else{
+C_trace("compiler.scm: 1121 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[315]))(4,*((C_word*)lf[315]+1),((C_word*)t0)[2],lf[340],((C_word*)t0)[3]);}}
+
+/* k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9652(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9652,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9655,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_listp(((C_word*)t0)[12]);
+t4=(C_word)C_i_not(t3);
+if(C_truep(t4)){
+if(C_truep(t4)){
+C_trace("compiler.scm: 1126 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[120]))(5,*((C_word*)lf[120]+1),t2,lf[339],((C_word*)t0)[12],((C_word*)t0)[4]);}
+else{
+t5=t2;
+f_9655(2,t5,C_SCHEME_UNDEFINED);}}
+else{
+t5=(C_word)C_i_listp(((C_word*)t0)[4]);
+t6=(C_word)C_i_not(t5);
+if(C_truep(t6)){
+if(C_truep(t6)){
+C_trace("compiler.scm: 1126 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[120]))(5,*((C_word*)lf[120]+1),t2,lf[339],((C_word*)t0)[12],((C_word*)t0)[4]);}
+else{
+t7=t2;
+f_9655(2,t7,C_SCHEME_UNDEFINED);}}
+else{
+t7=(C_word)C_i_length(((C_word*)t0)[12]);
+t8=(C_word)C_i_length(((C_word*)t0)[4]);
+t9=(C_word)C_eqp(t7,t8);
+if(C_truep(t9)){
+t10=t2;
+f_9655(2,t10,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 1126 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[120]))(5,*((C_word*)lf[120]+1),t2,lf[339],((C_word*)t0)[12],((C_word*)t0)[4]);}}}}
+
+/* k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9655(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_9655,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9662,a[2]=((C_word*)t0)[13],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9666,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: 1130 mapwalk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_10328(t4,t3,((C_word*)t0)[2],((C_word*)t0)[10],((C_word*)t0)[9]);}
+
+/* k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9666(C_word c,C_word t0,C_word 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_9666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9674,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_9698,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_9839,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t7=((C_word*)t5)[1];
+f_9839(t7,t3,((C_word*)t0)[10],((C_word*)t0)[2]);}
+
+/* loop in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9839(C_word t0,C_word 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_9839,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{
+t4=(C_word)C_i_car(t2);
+t5=(C_word)C_i_car(t3);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9875,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_9879,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9883,a[2]=t4,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1143 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t8,t5);}}
+
+/* k9881 in loop in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9883(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1143 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k9877 in loop in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9879(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1142 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k9873 in loop in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9875(C_word c,C_word t0,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_9875,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9863,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cdr(((C_word*)t0)[4]);
+t5=(C_word)C_i_cdr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 1145 loop");
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_9839(t6,t3,t4,t5);}
+
+/* k9861 in k9873 in loop in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9863(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_9863,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));}
+
+/* k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9698(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9698,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9706,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_9718,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_9722,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[321]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[322]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[323]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[324]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9748,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cddr(((C_word*)t0)[4]);
+C_trace("##sys#append");
+t7=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+else{
+if(C_truep((C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[326]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[327]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[328]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[329]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[330]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[331]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))))){
+C_trace("compiler.scm: 1167 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[120]))(5,*((C_word*)lf[120]+1),t4,lf[332],((C_word*)t0)[5],((C_word*)t0)[3]);}
+else{
+if(C_truep((C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[333]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[334]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[335]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(((C_word*)t0)[5],lf[336]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9830,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_i_cddr(((C_word*)t0)[4]);
+C_trace("##sys#append");
+t7=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_END_OF_LIST);}
+else{
+t5=(C_word)C_i_cddr(((C_word*)t0)[4]);
+C_trace("##sys#append");
+t6=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t5,C_SCHEME_END_OF_LIST);}}}}
+
+/* k9828 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9830(C_word c,C_word t0,C_word t1){
+C_word 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_9830,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[160],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,lf[337],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9794,a[2]=((C_word*)t0)[4],a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1179 macro-alias");
+t8=((C_word*)((C_word*)t0)[3])[1];
+f_5355(t8,t7,lf[338],((C_word*)t0)[2]);}
+
+/* k9792 in k9828 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9794(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9794,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[337],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[325],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,lf[337],t4);
+t6=(C_word)C_a_i_cons(&a,2,t1,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)[3],t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[160],t8);
+t10=(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t11=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,((C_word*)t0)[2],t10,C_SCHEME_END_OF_LIST);}
+
+/* k9746 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[15],*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_SCHEME_END_OF_LIST,t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[160],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,lf[325],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t7=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,((C_word*)t0)[2],t6,C_SCHEME_END_OF_LIST);}
+
+/* k9720 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9722(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k9716 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9718(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_9718,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[160],t2);
+C_trace("compiler.scm: 1146 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[255]))(4,*((C_word*)lf[255]+1),((C_word*)t0)[3],t3,((C_word*)t0)[2]);}
+
+/* k9704 in k9696 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9706(C_word c,C_word t0,C_word t1){
+C_word 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_9706,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,lf[160],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,lf[173],t6);
+C_trace("compiler.scm: 1131 walk");
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k9672 in k9664 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9674,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t3=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k9660 in k9653 in k9650 in a9632 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9662(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_9662,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[319],t1));}
+
+/* a9622 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 *a;
+if(c!=2) C_bad_argc_2(c,2,t0);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9623,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 1113 split-at");
+((C_proc4)C_retrieve_symbol_proc(lf[320]))(4,*((C_word*)lf[320]+1),t1,t2,C_fix(4));}
+
+/* loop1544 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9574(C_word t0,C_word 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_9574,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_9601,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9608,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));
+C_trace("g15601561");
+t6=t3;
+f_9601(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k9606 in loop1544 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_9608,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));
+C_trace("loop15441557");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9574(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));
+C_trace("loop15441557");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9574(t6,((C_word*)t0)[3],t5);}}
+
+/* g1560 in loop1544 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9601(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_9601,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 1108 process-declaration");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[318]+1)))(4,*((C_word*)lf[318]+1),t1,t2,((C_word*)t0)[2]);}
+
+/* k9566 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9568(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k9562 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9564(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9564,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[152],t1);
+C_trace("compiler.scm: 1105 walk");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9489(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_9489,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9495,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_9507,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[238]))(4,*((C_word*)lf[238]+1),t1,t3,t4);}
+
+/* a9506 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9507(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_9507,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9513,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9537,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);}
+
+/* a9536 in a9506 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9537(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_9537r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_9537r(t0,t1,t2);}}
+
+static void C_ccall f_9537r(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_9543,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k14721477");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a9542 in a9536 in a9506 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9543(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_9543,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a9512 in a9506 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9513(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_9513,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9520,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 1086 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[314]))(3,*((C_word*)lf[314]+1),t2,((C_word*)t0)[2]);}
+
+/* k9518 in a9512 in a9506 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9520(C_word c,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_9520,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_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,*((C_word*)lf[78]+1),t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[160],t3);
+C_trace("compiler.scm: 1088 eval");
+((C_proc3)C_retrieve_symbol_proc(lf[148]))(3,*((C_word*)lf[148]+1),((C_word*)t0)[3],t4);}}
+
+/* a9494 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9495(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_9495,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9501,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("k14721477");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a9500 in a9494 in a9488 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9501(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_9501,2,t0,t1);}
+C_trace("compiler.scm: 1084 quit");
+((C_proc5)C_retrieve_symbol_proc(lf[315]))(5,*((C_word*)lf[315]+1),t1,lf[316],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9358(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_9358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9361,a[2]=((C_word*)t0)[2],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("g14751476");
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9361,2,t0,t1);}
+t2=C_set_block_item(lf[59] /* constants-used */,0,C_SCHEME_TRUE);
+t3=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[99],t3);
+t5=(C_word)C_a_i_list(&a,2,((C_word*)t0)[6],t4);
+t6=(C_word)C_a_i_cons(&a,2,t5,*((C_word*)lf[78]+1));
+t7=C_mutate((C_word*)lf[78]+1 /* (set! defconstant-bindings ...) */,t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9372,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: 1093 collapsable-literal?");
+((C_proc3)C_retrieve_symbol_proc(lf[314]))(3,*((C_word*)lf[314]+1),t8,t1);}
+
+/* k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9372(C_word c,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_9372,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9375,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[6]);
+C_trace("compiler.scm: 1094 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),t2,*((C_word*)lf[58]+1),((C_word*)t0)[5],t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9382,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: 1097 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t2,lf[313]);}}
+
+/* k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9382(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_9382,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9385,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)C_a_i_list(&a,1,t1);
+C_trace("compiler.scm: 1098 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),t2,*((C_word*)lf[58]+1),((C_word*)t0)[2],t3);}
+
+/* k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9385(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_9385,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9388,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 1099 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[133]))(3,*((C_word*)lf[133]+1),t2,((C_word*)t0)[6]);}
+
+/* k9386 in k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9388(C_word c,C_word t0,C_word t1){
+C_word 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_9388,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9418,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_9393,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[312],C_SCHEME_TRUE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=(C_word)C_i_car(t4);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[312],t7);}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k9391 in k9386 in k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9393(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[312],t1);}
+
+/* k9416 in k9386 in k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9418(C_word c,C_word t0,C_word t1){
+C_word 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_9418,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_9423,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=(C_word)C_i_car(t4);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k9421 in k9416 in k9386 in k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9423(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k9446 in k9416 in k9386 in k9383 in k9380 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9448(C_word c,C_word t0,C_word 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_9448,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[99],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)[6],t4);
+t6=(C_word)C_a_i_cons(&a,2,lf[294],t5);
+C_trace("compiler.scm: 1102 walk");
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t7,((C_word*)t0)[4],t6,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k9373 in k9370 in k9359 in k9356 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9375(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[311]);}
+
+/* k9341 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9343(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k9337 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9339(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_9339,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[173],t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9334,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1075 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),t3,*((C_word*)lf[56]+1),((C_word*)t0)[2],t2);}
+
+/* k9332 in k9337 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 *a;
+t2=C_set_block_item(lf[57] /* inline-table-used */,0,C_SCHEME_TRUE);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[308]);}
+
+/* k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9178,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9181,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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: 1049 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t2);}
+
+/* k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9181(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_9181,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9184,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1050 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t2);}
+
+/* k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9184(C_word c,C_word t0,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_9184,2,t0,t1);}
+t2=(C_word)C_i_cddddr(((C_word*)t0)[10]);
+t3=(C_word)C_i_pairp(t2);
+t4=(C_truep(t3)?(C_word)C_i_cadddr(((C_word*)t0)[10]):C_SCHEME_FALSE);
+t5=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9190,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: 1052 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),t5,((C_word*)t0)[9],((C_word*)t0)[3]);}
+
+/* k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9190(C_word c,C_word t0,C_word 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_9190,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[12],((C_word*)t0)[11],((C_word*)t0)[10]);
+t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[76]+1));
+t4=C_mutate((C_word*)lf[76]+1 /* (set! location-pointer-map ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9262,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_9301,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1056 estimate-foreign-result-location-size");
+((C_proc3)C_retrieve_symbol_proc(lf[306]))(3,*((C_word*)lf[306]+1),t6,((C_word*)t0)[10]);}
+
+/* k9299 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9301(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1056 words");
+((C_proc3)C_retrieve_symbol_proc(lf[305]))(3,*((C_word*)lf[305]+1),((C_word*)t0)[2],t1);}
+
+/* k9260 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9262(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9262,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(C_fix(2),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[304],t3);
+t5=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,lf[99],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[273],t8);
+t10=(C_word)C_a_i_list(&a,2,((C_word*)t0)[11],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+t12=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9225,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_9229,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_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t15=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],t14);
+t16=(C_word)C_a_i_cons(&a,2,lf[169],t15);
+t17=t13;
+f_9229(t17,(C_word)C_a_i_cons(&a,2,t16,C_SCHEME_END_OF_LIST));}
+else{
+t14=t13;
+f_9229(t14,C_SCHEME_END_OF_LIST);}}
+
+/* k9227 in k9260 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9229(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_9229,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9237,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: 1068 fifth");
+((C_proc3)C_retrieve_symbol_proc(lf[302]))(3,*((C_word*)lf[302]+1),t2,((C_word*)t0)[2]);}
+else{
+t3=(C_word)C_i_cadddr(((C_word*)t0)[2]);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t5=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[4],t1,t4);}}
+
+/* k9235 in k9227 in k9260 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9237,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t3=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k9223 in k9260 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9225(C_word c,C_word t0,C_word 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_9225,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)[9],t3);
+t5=(C_word)C_a_i_cons(&a,2,lf[159],t4);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9205,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: 1069 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9203 in k9223 in k9260 in k9188 in k9182 in k9179 in k9176 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9205(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1055 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9122(C_word c,C_word t0,C_word 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_9122,2,t0,t1);}
+t2=t1;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=(C_word)C_i_caddr(((C_word*)t0)[4]);
+t5=(C_word)C_i_cadddr(((C_word*)t0)[4]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9131,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: 1037 make-random-name");
+((C_proc2)C_retrieve_symbol_proc(lf[89]))(2,*((C_word*)lf[89]+1),t6);}
+
+/* k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9131(C_word c,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_9131,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9134,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_9134(t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9162,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_9166,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1038 fifth");
+((C_proc3)C_retrieve_symbol_proc(lf[302]))(3,*((C_word*)lf[302]+1),t4,((C_word*)t0)[2]);}}
+
+/* k9164 in k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9166(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 1038 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),((C_word*)t0)[2],t1);}
+
+/* k9160 in k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_9134(t3,t2);}
+
+/* k9132 in k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9134(C_word t0,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_9134,NULL,2,t0,t1);}
+t2=(C_word)C_a_i_vector(&a,3,((C_word*)((C_word*)t0)[7])[1],((C_word*)t0)[6],((C_word*)t0)[5]);
+t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[68]+1));
+t4=C_mutate((C_word*)lf[68]+1 /* (set! external-variables ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9154,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: 1041 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),t5,lf[301],((C_word*)((C_word*)t0)[7])[1]);}
+
+/* k9152 in k9132 in k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9154,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],lf[299],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[65]+1));
+t4=C_mutate((C_word*)lf[65]+1 /* (set! foreign-variables ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9146,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1043 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t5,((C_word*)t0)[2],((C_word*)t0)[4],*((C_word*)lf[73]+1));}
+
+/* k9144 in k9152 in k9132 in k9129 in k9120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9146(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[73]+1 /* (set! external-to-pointer ...) */,t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[300]);}
+
+/* k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8958(C_word c,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_8958,2,t0,t1);}
+t2=(C_word)C_i_cdddr(((C_word*)t0)[8]);
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8970,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: 1014 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t3);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9106,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 1029 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),t3,*((C_word*)lf[64]+1),((C_word*)t0)[2],t1);}}
+
+/* k9104 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9106(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[297]);}
+
+/* k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8970(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_8970,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8973,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1015 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t2);}
+
+/* k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8973(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_8973,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8976,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_word)C_a_i_vector(&a,3,((C_word*)t0)[3],((C_word*)t0)[9],t1);
+C_trace("compiler.scm: 1016 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[296]))(5,*((C_word*)lf[296]+1),t2,*((C_word*)lf[64]+1),((C_word*)t0)[2],t3);}
+
+/* k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8976(C_word c,C_word t0,C_word t1){
+C_word 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_8976,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_8981,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=(C_word)C_i_car(t4);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k8979 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8981(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9006(C_word c,C_word t0,C_word t1){
+C_word 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_9006,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9036,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_9011,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],C_SCHEME_TRUE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=(C_word)C_i_car(t4);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t2,t3,lf[134],t7);}
+else{
+C_trace("##sys#error");
+t7=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k9009 in k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9011(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k9034 in k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9036(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_9036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,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],tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 1019 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[133]))(3,*((C_word*)lf[133]+1),t2,((C_word*)t0)[8]);}
+
+/* k9037 in k9034 in k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9042,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1020 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[133]))(3,*((C_word*)lf[133]+1),t2,((C_word*)t0)[7]);}
+
+/* k9040 in k9037 in k9034 in k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_9042(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9042,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[9]);
+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)[8],t3);
+t5=(C_word)C_a_i_cons(&a,2,lf[294],t4);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9073,a[2]=((C_word*)t0)[2],a[3]=((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_word)C_i_cdr(((C_word*)t0)[9]);
+if(C_truep((C_word)C_i_pairp(t7))){
+t8=(C_word)C_i_cadr(((C_word*)t0)[9]);
+t9=t6;
+f_9073(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+else{
+t8=t6;
+f_9073(t8,(C_word)C_a_i_cons(&a,2,lf[295],C_SCHEME_END_OF_LIST));}}
+
+/* k9071 in k9040 in k9037 in k9034 in k9004 in k8974 in k8971 in k8968 in k8956 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_9073(C_word t0,C_word 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_9073,NULL,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[294],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,lf[152],t5);
+C_trace("compiler.scm: 1021 walk");
+t7=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t7,((C_word*)t0)[5],t6,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8899 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8901(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_8901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8904,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)C_i_caddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 997 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t2,t3);}
+
+/* k8902 in k8899 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8904,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8907,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_cdddr(((C_word*)t0)[2]);
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=t2;
+f_8907(2,t4,(C_word)C_i_cadddr(((C_word*)t0)[2]));}
+else{
+C_trace("compiler.scm: 1000 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t2,((C_word*)t0)[4]);}}
+
+/* k8905 in k8902 in k8899 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8907(C_word c,C_word t0,C_word 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_8907,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8919,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)C_i_stringp(t1))){
+t3=t1;
+t4=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t3);
+t5=(C_word)C_a_i_cons(&a,2,t4,*((C_word*)lf[65]+1));
+t6=C_mutate((C_word*)lf[65]+1 /* (set! foreign-variables ...) */,t5);
+t7=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,lf[292]);}
+else{
+C_trace("compiler.scm: 1005 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t2,t1);}}
+
+/* k8917 in k8905 in k8902 in k8899 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8919(C_word c,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_8919,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,3,((C_word*)t0)[4],((C_word*)t0)[3],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[65]+1));
+t4=C_mutate((C_word*)lf[65]+1 /* (set! foreign-variables ...) */,t3);
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,lf[291]);}
+
+/* k8890 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8892(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 993 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8877 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8879(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 990 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8864 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8866(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 987 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8851 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 984 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8838 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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_trace("compiler.scm: 981 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8773(C_word c,C_word t0,C_word t1){
+C_word 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_8773,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8786,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)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_8792,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_8792(t8,t3,t4);}
+else{
+t3=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[280]);}}
+
+/* fold in k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8792(C_word t0,C_word 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_8792,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_nullp(t4))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8812,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 976 walk");
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_5774(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_8819,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 977 walk");
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t6,t5,t3,((C_word*)t0)[5],((C_word*)t0)[4],C_SCHEME_FALSE);}}
+
+/* k8817 in fold in k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8819,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8823,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 977 fold");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_8792(t3,t2,((C_word*)t0)[2]);}
+
+/* k8821 in k8817 in fold in k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8823(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_8823,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));}
+
+/* k8810 in fold in k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8812(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_8812,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));}
+
+/* k8784 in k8771 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8786(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 971 canonicalize-begin-body");
+((C_proc3)C_retrieve_symbol_proc(lf[245]))(3,*((C_word*)lf[245]+1),((C_word*)t0)[2],t1);}
+
+/* k8755 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8757(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[279]);}
+
+/* k8740 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8742(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 962 walk");
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_5774(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8709 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8711(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_8711,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8719,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_cadddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 957 walk");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k8717 in k8709 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8719(C_word c,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_8719,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)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[256],t4));}
+
+/* k8680 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8682(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_8682,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[253],t3));}
+
+/* a8648 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8649(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_8649,3,t0,t1,t2);}
+C_trace("g13321333");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5428(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* k8633 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8639,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_8643,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_i_cddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 948 mapwalk");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_10328(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8641 in k8633 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8643(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8637 in k8633 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8639(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_8639,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[273],t2));}
+
+/* k8600 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8602,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8606,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_8610,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_i_cddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 943 mapwalk");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_10328(t5,t3,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8608 in k8600 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8610(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[168]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8604 in k8600 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8606(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_8606,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[272],t2));}
+
+/* k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8269(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_8269,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8275,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: 893 lookup");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_5340(t4,t3,t2,((C_word*)t0)[4]);}
+
+/* k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8275(C_word c,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_8275,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_8278,a[2]=((C_word*)t0)[2],a[3]=((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: 894 get-line");
+((C_proc3)C_retrieve_symbol_proc(lf[270]))(3,*((C_word*)lf[270]+1),t4,((C_word*)t0)[7]);}
+
+/* k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8278(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_8278,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8284,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_word)C_i_memq(((C_word*)((C_word*)t0)[7])[1],C_retrieve(lf[115])))){
+C_trace("compiler.scm: 897 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t3,lf[117],lf[269],((C_word*)((C_word*)t0)[7])[1]);}
+else{
+t4=t3;
+f_8284(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8284(C_word c,C_word t0,C_word t1){
+C_word 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_8284,2,t0,t1);}
+t2=(C_word)C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[65]+1));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8291,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("g12161217");
+t4=t3;
+f_8291(t4,((C_word*)t0)[4],t2);}
+else{
+t3=(C_word)C_i_assq(((C_word*)((C_word*)t0)[9])[1],*((C_word*)lf[76]+1));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8367,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("g12261227");
+t5=t4;
+f_8367(t5,((C_word*)t0)[4],t3);}
+else{
+t4=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8439,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_word)C_i_memq(((C_word*)((C_word*)t0)[9])[1],((C_word*)t0)[7]))){
+t5=t4;
+f_8439(2,t5,C_SCHEME_UNDEFINED);}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8510,a[2]=t4,a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 924 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t5,((C_word*)((C_word*)t0)[9])[1],lf[107]);}}}}
+
+/* k8508 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8510(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_8510,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8513,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_8513(2,t3,t1);}
+else{
+C_trace("compiler.scm: 925 ##sys#alias-global-hook");
+((C_proc4)C_retrieve_symbol_proc(lf[106]))(4,*((C_word*)lf[106]+1),t2,((C_word*)((C_word*)t0)[3])[1],C_SCHEME_TRUE);}}
+
+/* k8511 in k8508 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8513(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8513,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_8546,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_8521,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t5))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[268],C_SCHEME_TRUE);}
+else{
+t7=(C_word)C_i_cdr(t5);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=(C_word)C_i_car(t5);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[268],t8);}
+else{
+C_trace("##sys#error");
+t8=*((C_word*)lf[135]+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_8439(2,t4,t3);}}
+
+/* k8519 in k8511 in k8508 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8521(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[268],t1);}
+
+/* k8544 in k8511 in k8508 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8546(C_word c,C_word t0,C_word 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_8546,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_8551,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[2],t2,lf[134],C_SCHEME_TRUE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[2],t2,lf[134],t6);}
+else{
+C_trace("##sys#error");
+t6=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k8549 in k8544 in k8511 in k8508 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8551(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8439(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_8439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8442,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_8478,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: 929 ##sys#macro?");
+((C_proc3)C_retrieve_symbol_proc(lf[267]))(3,*((C_word*)lf[267]+1),t3,((C_word*)((C_word*)t0)[9])[1]);}
+
+/* k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8478(C_word c,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_8478,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8481,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_8491,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_8494,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[265]))(2,*((C_word*)lf[265]+1),t4);}
+else{
+C_trace("compiler.scm: 930 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[116]))(6,*((C_word*)lf[116]+1),t2,lf[117],lf[260],((C_word*)((C_word*)t0)[3])[1],lf[266]);}}
+else{
+t2=((C_word*)t0)[4];
+f_8442(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k8492 in k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8494(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_8494,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8497,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[263]+1)))(4,*((C_word*)lf[263]+1),t2,lf[264],t1);}
+
+/* k8495 in k8492 in k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8497(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_8497,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8500,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[262]+1)))(4,*((C_word*)lf[262]+1),t2,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* k8498 in k8495 in k8492 in k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8500(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[261]))(3,*((C_word*)lf[261]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8489 in k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8491(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 930 compiler-warning");
+((C_proc6)C_retrieve_symbol_proc(lf[116]))(6,*((C_word*)lf[116]+1),((C_word*)t0)[3],lf[117],lf[260],((C_word*)((C_word*)t0)[2])[1],t1);}
+
+/* k8479 in k8476 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8481(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: 934 ##sys#undefine-macro!");
+((C_proc3)C_retrieve_symbol_proc(lf[259]))(3,*((C_word*)lf[259]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[3];
+f_8442(2,t3,t2);}}
+
+/* k8440 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8442(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_8442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8445,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_8472,a[2]=((C_word*)t0)[8],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 935 keyword?");
+((C_proc3)C_retrieve_symbol_proc(lf[119]))(3,*((C_word*)lf[119]+1),t3,((C_word*)((C_word*)t0)[8])[1]);}
+
+/* k8470 in k8440 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8472(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: 936 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[3],lf[242],lf[258],((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t2=((C_word*)t0)[3];
+f_8445(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k8443 in k8440 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8448,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_i_pairp(((C_word*)((C_word*)t0)[8])[1]))){
+C_trace("compiler.scm: 938 syntax-error");
+((C_proc5)C_retrieve_symbol_proc(lf[120]))(5,*((C_word*)lf[120]+1),t2,lf[252],lf[257],((C_word*)((C_word*)t0)[8])[1]);}
+else{
+t3=t2;
+f_8448(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k8446 in k8443 in k8440 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8448(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_8448,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8463,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 940 walk");
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t3,t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8461 in k8446 in k8443 in k8440 in k8437 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8463(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_8463,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)[3])[1],t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,lf[252],t3));}
+
+/* g1226 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_8367,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_caddr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8374,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: 914 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t4);}
+
+/* k8372 in g1226 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8374(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_8374,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8433,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: 916 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[255]))(4,*((C_word*)lf[255]+1),t2,((C_word*)t0)[2],((C_word*)t0)[8]);}
+
+/* k8431 in k8372 in g1226 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_8433,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)[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],C_SCHEME_END_OF_LIST);
+t6=(C_word)C_i_cadr(((C_word*)t0)[6]);
+t7=(*a=C_CLOSURE_TYPE|8,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]=t4,a[7]=t5,a[8]=t6,tmp=(C_word)a,a+=9,tmp);
+C_trace("compiler.scm: 920 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[254]))(4,*((C_word*)lf[254]+1),t7,((C_word*)t0)[8],((C_word*)t0)[7]);}
+
+/* k8419 in k8431 in k8372 in g1226 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8421(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8421,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)[8],t2);
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],t3);
+t5=(C_word)C_a_i_cons(&a,2,lf[256],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)[6],t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[159],t7);
+C_trace("compiler.scm: 915 walk");
+t9=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t9,((C_word*)t0)[4],t8,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* g1216 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8291(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_8291,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cadr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8298,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: 904 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[97]))(2,*((C_word*)lf[97]+1),t4);}
+
+/* k8296 in g1216 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8298(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_8298,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8357,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: 906 foreign-type-convert-argument");
+((C_proc4)C_retrieve_symbol_proc(lf[255]))(4,*((C_word*)lf[255]+1),t2,((C_word*)t0)[2],((C_word*)t0)[7]);}
+
+/* k8355 in k8296 in g1216 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8357(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8357,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)[8],t2);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+t5=(C_word)C_i_caddr(((C_word*)t0)[7]);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,t5,t6);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8337,a[2]=((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: 909 foreign-type-check");
+((C_proc4)C_retrieve_symbol_proc(lf[254]))(4,*((C_word*)lf[254]+1),t8,((C_word*)t0)[8],((C_word*)t0)[6]);}
+
+/* k8335 in k8355 in k8296 in g1216 in k8282 in k8276 in k8273 in k8267 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8337(C_word c,C_word t0,C_word t1){
+C_word 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_8337,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,lf[253],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,lf[159],t6);
+C_trace("compiler.scm: 905 walk");
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t8,((C_word*)t0)[4],t7,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* loop1141 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8224(C_word t0,C_word 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_8224,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[97]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8253,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));
+C_trace("g11571158");
+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);}}
+
+/* k8251 in loop1141 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8253(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8253,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));
+C_trace("loop11411154");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8224(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));
+C_trace("loop11411154");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8224(t6,((C_word*)t0)[3],t5);}}
+
+/* k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8141(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_8141,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8144,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_8173,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_8175,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_8175(t11,t7,((C_word*)t0)[6],t1);}
+
+/* loop1165 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8175(C_word t0,C_word 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_8175,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[163]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8208,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));
+C_trace("g11851186");
+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);}}
+
+/* k8206 in loop1165 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8208(C_word c,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_8208,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_8188,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_8188(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_8188(t5,t4);}}
+
+/* k8186 in k8206 in loop1165 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8188(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));
+C_trace("loop11651179");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8175(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k8171 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8173(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 881 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k8142 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8144(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_8144,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8147,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_8165,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: 884 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t3,((C_word*)t0)[2],t1,*((C_word*)lf[47]+1));}
+
+/* k8163 in k8142 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8165(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_8165,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8169,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: 885 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8167 in k8163 in k8142 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8169(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 883 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k8145 in k8142 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8147(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_8147,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8150,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: 887 set-real-names!");
+f_5368(t2,((C_word*)t0)[5],((C_word*)t0)[2]);}
+
+/* k8148 in k8145 in k8142 in k8139 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8150(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_8150,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],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[173],t3));}
+
+/* k8120 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8122(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_8122,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[173],t1);
+t3=(C_word)C_i_cadr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 875 walk");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t4,((C_word*)t0)[4],t2,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
+
+/* k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7628,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[7]);
+t3=(C_word)C_eqp(C_SCHEME_TRUE,t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7634,a[2]=((C_word*)t0)[2],a[3]=((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);
+if(C_truep(t3)){
+t5=t4;
+f_7634(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_8005,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t10=(C_word)C_i_caddr(((C_word*)t0)[7]);
+C_trace("compiler.scm: 809 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t9,t10);}}
+
+/* k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8005(C_word c,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_8005,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_8007,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_8007(t5,((C_word*)t0)[2],t1);}
+
+/* loop945 in k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8007(C_word t0,C_word 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_8007,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_8034,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8085,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));
+C_trace("g961962");
+t6=t3;
+f_8034(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8083 in loop945 in k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_8085(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8085,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));
+C_trace("loop945958");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8007(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));
+C_trace("loop945958");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8007(t6,((C_word*)t0)[3],t5);}}
+
+/* g961 in loop945 in k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8034(C_word 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_8034,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_8047,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_8058,tmp=(C_word)a,a+=2,tmp);
+t5=t3;
+f_8047(t5,f_8058(t2));}
+else{
+t4=t3;
+f_8047(t4,C_SCHEME_FALSE);}}}
+
+/* loop in g961 in loop945 in k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static C_word C_fcall f_8058(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_word)C_i_nullp(t1);
+if(C_truep(t2)){
+return(t2);}
+else{
+t3=(C_word)C_i_car(t1);
+if(C_truep((C_word)C_i_symbolp(t3))){
+t4=(C_word)C_i_cdr(t1);
+t6=t4;
+t1=t6;
+goto loop;}
+else{
+return(C_SCHEME_FALSE);}}}
+
+/* k8045 in g961 in loop945 in k8003 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_8047(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: 806 ##sys#syntax-error-hook");
+((C_proc6)C_retrieve_symbol_proc(lf[246]))(6,*((C_word*)lf[246]+1),((C_word*)t0)[4],lf[247],lf[249],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7634(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_7634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7637,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_7995,a[2]=((C_word*)t0)[7],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 810 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[109]))(2,*((C_word*)lf[109]+1),t3);}
+
+/* k7993 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7995(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: 811 ##sys#syntax-error-hook");
+((C_proc5)C_retrieve_symbol_proc(lf[246]))(5,*((C_word*)lf[246]+1),((C_word*)t0)[3],lf[247],lf[248],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_7637(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7637(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_7637,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,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],a[8]=((C_word*)t0)[9],tmp=(C_word)a,a+=9,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7911,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],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);}
+
+/* a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7911(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[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_7911,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7919,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=C_retrieve(lf[109]);
+t6=C_retrieve(lf[110]);
+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|9,a[1]=(C_word)f_7923,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t4,a[7]=t5,a[8]=t6,a[9]=t8,tmp=(C_word)a,a+=10,tmp);
+C_trace("compiler.scm: 864 ##sys#meta-macro-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[114]))(2,*((C_word*)lf[114]+1),t9);}
+
+/* k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_7923,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_7924,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_7942,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_7944,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[113]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,t4,t6,t4);}
+
+/* a7943 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7944(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7944,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_7950,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_7950(t9,t1,((C_word*)t0)[2]);}
+
+/* loop1108 in a7943 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7950(C_word t0,C_word 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_7950,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_7977,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_7988,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));
+C_trace("g11241125");
+t6=t3;
+f_7977(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7986 in loop1108 in a7943 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7988(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7988,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));
+C_trace("loop11081121");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7950(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));
+C_trace("loop11081121");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7950(t6,((C_word*)t0)[3],t5);}}
+
+/* g1124 in loop1108 in a7943 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7977(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_7977,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7985,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: 870 ##sys#current-meta-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[112]))(2,*((C_word*)lf[112]+1),t3);}
+
+/* k7983 in g1124 in loop1108 in a7943 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7985(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 867 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* k7940 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7942(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 862 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* swap1085 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7924(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_7924,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7928,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("g108810891096");
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k7926 in swap1085 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7928(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_7928,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7931,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("g108810891096");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k7929 in k7926 in swap1085 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7931(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_7931,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_7935,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("g109010911097");
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7933 in k7929 in k7926 in swap1085 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7935(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_7935,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7938,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g109010911097");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k7936 in k7933 in k7929 in k7926 in swap1085 in k7921 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7938(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);}
+
+/* k7917 in a7910 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7919(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 861 canonicalize-begin-body");
+((C_proc3)C_retrieve_symbol_proc(lf[245]))(3,*((C_word*)lf[245]+1),((C_word*)t0)[2],t1);}
+
+/* a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[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_7642,2,t0,t1);}
+t2=C_retrieve(lf[109]);
+t3=C_retrieve(lf[194]);
+t4=C_retrieve(lf[110]);
+t5=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7646,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: 814 ##sys#register-module");
+((C_proc4)C_retrieve_symbol_proc(lf[244]))(4,*((C_word*)lf[244]+1),t5,((C_word*)t0)[7],((C_word*)t0)[2]);}
+
+/* k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7646(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_7646,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[211]);
+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_7647,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_7674,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[113]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,((C_word*)t0)[2],t8,t9,t8);}
+
+/* a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7674(C_word c,C_word t0,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_7674,2,t0,t1);}
+t2=(C_word)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_7684,a[2]=((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_7684(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+
+/* loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7684(C_word t0,C_word 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_7684,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7694,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_7741,tmp=(C_word)a,a+=2,tmp);
+C_trace("call-with-current-continuation");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[239]+1)))(3,*((C_word*)lf[239]+1),t4,t5);}
+else{
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7795,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_word)C_i_pairp(t2))){
+if(C_truep((C_word)C_i_nullp(t3))){
+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_7905,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: 843 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[93]+1)))(3,*((C_word*)lf[93]+1),t6,t2);}
+else{
+t6=t4;
+f_7795(2,t6,C_SCHEME_UNDEFINED);}}
+else{
+t5=t4;
+f_7795(2,t5,C_SCHEME_UNDEFINED);}}
+else{
+t5=t4;
+f_7795(2,t5,C_SCHEME_UNDEFINED);}}}
+
+/* k7903 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7905(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_7905,2,t0,t1);}
+if(C_truep((C_word)C_i_symbolp(t1))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7848,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_7901,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: 844 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[93]+1)))(3,*((C_word*)lf[93]+1),t3,((C_word*)t0)[4]);}
+else{
+t2=((C_word*)t0)[6];
+f_7795(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k7899 in k7903 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7901(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 844 lookup");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_5340(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k7846 in k7903 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7848(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_7848,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7851,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_7851(2,t3,t1);}
+else{
+C_trace("compiler.scm: 844 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[93]+1)))(3,*((C_word*)lf[93]+1),t2,((C_word*)t0)[2]);}}
+
+/* k7849 in k7846 in k7903 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7851(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_word)C_eqp(t2,lf[240]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t2,lf[241]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t3=((C_word*)t0)[3];
+f_7795(2,t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(C_word)C_i_assq(lf[240],C_retrieve(lf[211]));
+t4=(C_word)C_i_cdr(t3);
+t5=(C_word)C_eqp(t1,t4);
+if(C_truep(t5)){
+t6=((C_word*)t0)[3];
+f_7795(2,t6,C_SCHEME_UNDEFINED);}
+else{
+t6=(C_word)C_i_assq(lf[241],C_retrieve(lf[211]));
+t7=(C_word)C_i_cdr(t6);
+t8=(C_word)C_eqp(t1,t7);
+if(C_truep(t8)){
+t9=((C_word*)t0)[3];
+f_7795(2,t9,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 849 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[3],lf[242],lf[243],((C_word*)t0)[2]);}}}}
+
+/* k7793 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t5;
+C_word t6;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7795,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7810,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_word)C_i_car(((C_word*)t0)[7]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7818,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: 858 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[194]))(2,*((C_word*)lf[194]+1),t5);}
+
+/* k7816 in k7793 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7818(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 855 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* k7808 in k7793 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7810(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7810,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+C_trace("compiler.scm: 853 loop");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_7684(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7741(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_7741,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7747,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7766,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("with-exception-handler");
+((C_proc4)C_retrieve_symbol_proc(lf[238]))(4,*((C_word*)lf[238]+1),t1,t3,t4);}
+
+/* a7765 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7766(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_7766,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_7772,tmp=(C_word)a,a+=2,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7782,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);}
+
+/* a7781 in a7765 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7782(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_7782r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7782r(t0,t1,t2);}}
+
+static void C_ccall f_7782r(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_7788,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k10321037");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a7787 in a7781 in a7765 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7788(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_7788,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a7771 in a7765 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7772(C_word 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_7772,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7780,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 825 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[109]))(2,*((C_word*)lf[109]+1),t2);}
+
+/* k7778 in a7771 in a7765 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7780(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 825 ##sys#finalize-module");
+((C_proc3)C_retrieve_symbol_proc(lf[237]))(3,*((C_word*)lf[237]+1),((C_word*)t0)[2],t1);}
+
+/* a7746 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7747(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_7747,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7753,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("k10321037");
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a7752 in a7746 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_7753,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7757,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7764,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 823 current-error-port");
+((C_proc2)C_retrieve_symbol_proc(lf[236]))(2,*((C_word*)lf[236]+1),t3);}
+
+/* k7762 in a7752 in a7746 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7764(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 823 print-error-message");
+((C_proc4)C_retrieve_symbol_proc(lf[235]))(4,*((C_word*)lf[235]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k7755 in a7752 in a7746 in a7740 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7757(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 824 exit");
+((C_proc3)C_retrieve_symbol_proc(lf[234]))(3,*((C_word*)lf[234]+1),((C_word*)t0)[2],C_fix(1));}
+
+/* k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7694(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_7694,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7697,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("g10351036");
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7697(C_word c,C_word t0,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_7697,2,t0,t1);}
+t2=*((C_word*)lf[39]+1);
+t3=(C_truep(t2)?t2:(C_word)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_7704,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("g10541055");
+t5=t4;
+f_7704(t5,((C_word*)t0)[2],t3);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7725,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 835 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[213]+1)))(3,*((C_word*)lf[213]+1),t4,((C_word*)t0)[3]);}}
+
+/* k7723 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7725(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_7725,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7729,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: 834 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_7736,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 838 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[109]))(2,*((C_word*)lf[109]+1),t3);}}
+
+/* k7734 in k7723 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7736(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 838 ##sys#compiled-module-registration");
+((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[2],t1);}
+
+/* k7727 in k7723 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7729(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 834 values");
+C_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7704(C_word t0,C_word 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_7704,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7708,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_5686,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_5769,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 490 symbol->string");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[233]+1)))(3,*((C_word*)lf[233]+1),t6,t4);}
+else{
+t6=t5;
+f_5686(2,t6,(C_word)C_i_cdr(t2));}}
+
+/* k5767 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5769(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 490 string-append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[231]+1)))(4,*((C_word*)lf[231]+1),((C_word*)t0)[2],t1,lf[232]);}
+
+/* k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5689,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_5762,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 492 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[109]))(2,*((C_word*)lf[109]+1),t3);}
+
+/* k5760 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5762(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 492 ##sys#compiled-module-registration");
+((C_proc3)C_retrieve_symbol_proc(lf[230]))(3,*((C_word*)lf[230]+1),((C_word*)t0)[2],t1);}
+
+/* k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5689(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_5689,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5692,a[2]=((C_word*)t0)[2],a[3]=((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_5755,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 494 file-exists?");
+((C_proc3)C_retrieve_symbol_proc(lf[229]))(3,*((C_word*)lf[229]+1),t3,((C_word*)t0)[5]);}
+
+/* k5753 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5755(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: 495 read-file");
+((C_proc3)C_retrieve_symbol_proc(lf[228]))(3,*((C_word*)lf[228]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_5692(2,t2,C_SCHEME_FALSE);}}
+
+/* k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5692(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_5692,2,t0,t1);}
+if(C_truep((C_word)C_i_equalp(((C_word*)t0)[7],t1))){
+if(C_truep(*((C_word*)lf[50]+1))){
+C_trace("compiler.scm: 498 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[6],lf[214],((C_word*)t0)[5],lf[215],((C_word*)t0)[4],lf[216]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f20258,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 831 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[213]+1)))(3,*((C_word*)lf[213]+1),t2,((C_word*)t0)[2]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5707,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: 502 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),t2,lf[225],((C_word*)t0)[5],lf[226],((C_word*)t0)[4],lf[227]);}
+else{
+t3=t2;
+f_5707(2,t3,C_SCHEME_UNDEFINED);}}}
+
+/* k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5707(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_5707,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5712,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 504 with-output-to-file");
+((C_proc4)C_retrieve_symbol_proc(lf[224]))(4,*((C_word*)lf[224]+1),((C_word*)t0)[2],((C_word*)t0)[3],t2);}
+
+/* a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5712(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_5712,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5716,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_5749,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 507 chicken-version");
+((C_proc2)C_retrieve_symbol_proc(lf[223]))(2,*((C_word*)lf[223]+1),t3);}
+
+/* k5747 in a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5749(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 506 print");
+((C_proc7)C_retrieve_proc(*((C_word*)lf[4]+1)))(7,*((C_word*)lf[4]+1),((C_word*)t0)[3],lf[220],((C_word*)t0)[2],lf[221],t1,lf[222]);}
+
+/* k5714 in a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5716(C_word c,C_word t0,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_5716,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5719,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_5724,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_5724(t6,t2,((C_word*)t0)[2]);}
+
+/* loop257 in k5714 in a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5724(C_word t0,C_word 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_5724,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[219]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5734,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));
+C_trace("g264265");
+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);}}
+
+/* k5732 in loop257 in k5714 in a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5724(t3,((C_word*)t0)[2],t2);}
+
+/* k5717 in k5714 in a5711 in k5705 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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: 509 print");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[4]+1)))(3,*((C_word*)lf[4]+1),((C_word*)t0)[2],lf[218]);}
+
+/* f20258 in k5690 in k5687 in k5684 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f20258(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 830 values");
+C_values(4,0,((C_word*)t0)[2],t1,lf[217]);}
+
+/* k7706 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7708(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7708,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7715,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 831 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[213]+1)))(3,*((C_word*)lf[213]+1),t2,((C_word*)t0)[2]);}
+
+/* k7713 in k7706 in g1054 in k7695 in k7692 in loop in a7673 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7715(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 830 values");
+C_values(4,0,((C_word*)t0)[2],t1,lf[212]);}
+
+/* swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7647(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_7647,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7651,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("g9969971008");
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7651,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7654,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("g9969971008");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
+
+/* k7652 in k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7654(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_7654,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_7658,a[2]=((C_word*)t0)[2],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("g9989991009");
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7656 in k7652 in k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7658(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_7658,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7661,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("g9989991009");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k7659 in k7656 in k7652 in k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7661(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_7661,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_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("g100010011010");
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7663 in k7659 in k7656 in k7652 in k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7665,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7668,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g100010011010");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k7666 in k7663 in k7659 in k7656 in k7652 in k7649 in swap993 in k7644 in a7641 in k7635 in k7632 in k7626 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7668(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);}
+
+/* loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7551(C_word t0,C_word 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_7551,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_7578,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_7615,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));
+C_trace("g899900");
+t6=t3;
+f_7578(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7613 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_7615,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));
+C_trace("loop883896");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7551(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));
+C_trace("loop883896");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7551(t6,((C_word*)t0)[3],t5);}}
+
+/* g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7578(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_7578,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7582,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: 772 ##sys#check-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[126]))(5,*((C_word*)lf[126]+1),t3,lf[208],t2,lf[209]);}
+
+/* k7580 in g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7582(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_7582,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7585,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_i_car(((C_word*)t0)[3]);
+C_trace("compiler.scm: 773 ##sys#strip-syntax");
+((C_proc5)C_retrieve_symbol_proc(lf[128]))(5,*((C_word*)lf[128]+1),t2,t3,((C_word*)t0)[5],C_SCHEME_TRUE);}
+
+/* k7583 in k7580 in g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7585(C_word c,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_7585,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7600,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_7604,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_i_cadr(((C_word*)t0)[3]);
+C_trace("compiler.scm: 776 eval/meta");
+f_5644(t3,t4);}
+
+/* k7602 in k7583 in k7580 in g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7604(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 776 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+
+/* k7598 in k7583 in k7580 in g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7600(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_7600,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7596,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: 777 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t3,((C_word*)t0)[2],lf[203]);}
+
+/* k7594 in k7598 in k7583 in k7580 in g899 in loop883 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7596(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_7596,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7444(C_word c,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_7444,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7449,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7491,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_7505,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 779 dynamic-wind");
+((C_proc5)C_retrieve_symbol_proc(lf[207]))(5,*((C_word*)lf[207]+1),((C_word*)t0)[2],t2,t3,t4);}
+
+/* a7504 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_7505,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_7511,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_7511(t5,t1,((C_word*)t0)[2]);}
+
+/* loop923 in a7504 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7511(C_word t0,C_word 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_7511,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_7534,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_car(t4);
+t6=(C_word)C_i_caddr(t4);
+C_trace("compiler.scm: 790 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t5,lf[203],t6);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7532 in loop923 in a7504 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7534(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_7511(t3,((C_word*)t0)[2],t2);}
+
+/* a7490 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7491(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_7491,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7499,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)C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 786 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
+
+/* k7497 in a7490 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7499(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 785 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a7448 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_7449,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_7455,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_7455(t5,t1,((C_word*)t0)[2]);}
+
+/* loop909 in a7448 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7455(C_word t0,C_word 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_7455,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_7478,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_car(t4);
+t6=(C_word)C_i_cadr(t4);
+C_trace("compiler.scm: 782 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t5,lf[203],t6);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7476 in loop909 in a7448 in k7442 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7478(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_7455(t3,((C_word*)t0)[2],t2);}
+
+/* k7352 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7354(C_word c,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_7354,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7357,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_7427,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7435,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 757 eval/meta");
+f_5644(t4,((C_word*)t0)[8]);}
+
+/* k7433 in k7352 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7435(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 757 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+
+/* k7425 in k7352 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7427,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7431,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: 758 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[194]))(2,*((C_word*)lf[194]+1),t2);}
+
+/* k7429 in k7425 in k7352 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7431(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7431,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 754 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[203],t2);}
+
+/* k7355 in k7352 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7357(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[42],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7357,2,t0,t1);}
+if(C_truep(C_retrieve(lf[193]))){
+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,lf[202],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[203],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[99],t4);
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,lf[187],t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[194],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,t7,t9);
+t11=(C_word)C_a_i_cons(&a,2,lf[204],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,t5,t12);
+t14=(C_word)C_a_i_cons(&a,2,t3,t13);
+t15=(C_word)C_a_i_cons(&a,2,lf[96],t14);
+C_trace("compiler.scm: 759 walk");
+t16=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t16,((C_word*)t0)[5],t15,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+C_trace("compiler.scm: 759 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],lf[205],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7199,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,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]=((C_word*)t0)[8],a[9]=((C_word*)t0)[9],tmp=(C_word)a,a+=10,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+if(C_truep((C_word)C_i_pairp(t3))){
+C_trace("compiler.scm: 730 caadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[140]+1)))(3,*((C_word*)lf[140]+1),t2,((C_word*)t0)[4]);}
+else{
+t4=t2;
+f_7202(2,t4,(C_word)C_i_cadr(((C_word*)t0)[4]));}}
+
+/* k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7202,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7205,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+t3=(C_word)C_i_cadr(((C_word*)t0)[4]);
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7296,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 732 cdadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[198]+1)))(3,*((C_word*)lf[198]+1),t4,((C_word*)t0)[4]);}
+else{
+t4=t2;
+f_7205(t4,(C_word)C_i_caddr(((C_word*)t0)[4]));}}
+
+/* k7294 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7296(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_7296,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7300,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cddr(((C_word*)t0)[2]);
+C_trace("##sys#append");
+t4=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k7298 in k7294 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7300(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_7300,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+t3=((C_word*)t0)[2];
+f_7205(t3,(C_word)C_a_i_cons(&a,2,lf[173],t2));}
+
+/* k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7205(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_7205,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7208,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);
+C_trace("compiler.scm: 734 lookup");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_5340(t3,t2,((C_word*)t0)[10],((C_word*)t0)[6]);}
+
+/* k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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|11,a[1]=(C_word)f_7211,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=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7282,a[2]=((C_word*)t0)[9],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 735 ##sys#current-module");
+((C_proc2)C_retrieve_symbol_proc(lf[109]))(2,*((C_word*)lf[109]+1),t3);}
+
+/* k7280 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7282(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 735 ##sys#register-syntax-export");
+((C_proc5)C_retrieve_symbol_proc(lf[197]))(5,*((C_word*)lf[197]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7211,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7214,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|5,a[1]=(C_word)f_7270,a[2]=((C_word*)t0)[10],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: 738 ##sys#current-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[194]))(2,*((C_word*)lf[194]+1),t3);}
+
+/* k7268 in k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7270(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_7270,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7274,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_7278,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 739 eval/meta");
+f_5644(t3,((C_word*)t0)[2]);}
+
+/* k7276 in k7268 in k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7278(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 739 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+
+/* k7272 in k7268 in k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7274(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 736 ##sys#extend-macro-environment");
+((C_proc5)C_retrieve_symbol_proc(lf[195]))(5,*((C_word*)lf[195]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7214,2,t0,t1);}
+t2=C_retrieve(lf[193]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7224,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(t2)){
+t4=t3;
+f_7224(t4,t2);}
+else{
+t4=(C_word)C_i_car(((C_word*)t0)[2]);
+t5=t3;
+f_7224(t5,(C_word)C_eqp(lf[192],t4));}}
+
+/* k7222 in k7212 in k7209 in k7206 in k7203 in k7200 in k7197 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7224(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7224,NULL,2,t0,t1);}
+if(C_truep(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,lf[99],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[194],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,lf[187],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,t3,t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[195],t9);
+C_trace("compiler.scm: 740 walk");
+t11=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t11,((C_word*)t0)[5],t10,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+C_trace("compiler.scm: 740 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],lf[196],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7075(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7075,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_7078,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_word)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_7133,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_7133(t11,t6,t7);}
+
+/* loop807 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7133(C_word t0,C_word 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_7133,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_7160,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7183,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));
+C_trace("g823824");
+t6=t3;
+f_7160(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7181 in loop807 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7183(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7183,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));
+C_trace("loop807820");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7133(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));
+C_trace("loop807820");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7133(t6,((C_word*)t0)[3],t5);}}
+
+/* g823 in loop807 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7160(C_word t0,C_word 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_7160,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7172,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7176,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cadr(t2);
+C_trace("compiler.scm: 712 eval/meta");
+f_5644(t5,t6);}
+
+/* k7174 in g823 in loop807 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7176(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 711 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+
+/* k7170 in g823 in loop807 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7172(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_7172,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,((C_word*)t0)[2],C_SCHEME_FALSE,t1));}
+
+/* k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7078(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_7078,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7081,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: 714 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,t1,((C_word*)t0)[2]);}
+
+/* k7079 in k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7081(C_word c,C_word t0,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_7081,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7084,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_7097,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_7097(t6,t2,((C_word*)t0)[2]);}
+
+/* loop832 in k7079 in k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7097(C_word t0,C_word 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_7097,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_7105,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_7105(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);}}
+
+/* g839 in loop832 in k7079 in k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static C_word C_fcall f_7105(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]));}
+
+/* k7082 in k7079 in k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7084(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_7084,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7091,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)C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 720 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t2,t3,((C_word*)t0)[4],*((C_word*)lf[47]+1));}
+
+/* k7089 in k7082 in k7079 in k7076 in k7073 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7091(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 719 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6988(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_6988,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6991,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_7006,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+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|6,a[1]=(C_word)f_7012,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_7012(t12,t7,t8);}
+
+/* loop780 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7012(C_word t0,C_word 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_7012,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_7039,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_7062,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));
+C_trace("g796797");
+t6=t3;
+f_7039(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7060 in loop780 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7062(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7062,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));
+C_trace("loop780793");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7012(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));
+C_trace("loop780793");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7012(t6,((C_word*)t0)[3],t5);}}
+
+/* g796 in loop780 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_7039(C_word t0,C_word 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_7039,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7051,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_7055,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_i_cadr(t2);
+C_trace("compiler.scm: 697 eval/meta");
+f_5644(t5,t6);}
+
+/* k7053 in g796 in loop780 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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("compiler.scm: 696 ##sys#er-transformer");
+((C_proc3)C_retrieve_symbol_proc(lf[187]))(3,*((C_word*)lf[187]+1),((C_word*)t0)[2],t1);}
+
+/* k7049 in g796 in loop780 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7051(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_7051,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k7004 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_7006(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 691 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k6989 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6991(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_6991,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6998,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_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 701 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t2,t3,t1,*((C_word*)lf[47]+1));}
+
+/* k6996 in k6989 in k6986 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6998(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 700 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6659(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6659,2,t0,t1);}
+t2=(C_word)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_word)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_6668,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_6965,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: 647 ##sys#extended-lambda-list?");
+((C_proc3)C_retrieve_symbol_proc(lf[184]))(3,*((C_word*)lf[184]+1),t9,((C_word*)t4)[1]);}
+
+/* k6963 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6965,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6970,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_6976,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_6668(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* a6975 in k6963 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6976(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_6976,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);}
+
+/* a6969 in k6963 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6970(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_6970,2,t0,t1);}
+C_trace("compiler.scm: 650 ##sys#expand-extended-lambda-list");
+((C_proc6)C_retrieve_symbol_proc(lf[183]))(6,*((C_word*)lf[183]+1),t1,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],*((C_word*)lf[135]+1),((C_word*)t0)[2]);}
+
+/* k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6668(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_6668,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6673,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: 652 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[182]))(4,*((C_word*)lf[182]+1),((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t2);}
+
+/* a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6673(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_6673,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_6677,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_6929,a[2]=t6,a[3]=t11,a[4]=t8,tmp=(C_word)a,a+=5,tmp));
+t13=((C_word*)t11)[1];
+f_6929(t13,t9,t2);}
+
+/* loop656 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6929(C_word t0,C_word 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_6929,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[97]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6958,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));
+C_trace("g672673");
+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);}}
+
+/* k6956 in loop656 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6958(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6958,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));
+C_trace("loop656669");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6929(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));
+C_trace("loop656669");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6929(t6,((C_word*)t0)[3],t5);}}
+
+/* k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6677(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_6677,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6680,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_6878,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_6880,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_6880(t11,t7,((C_word*)t0)[7],t1);}
+
+/* loop680 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6880(C_word t0,C_word 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_6880,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[163]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6913,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));
+C_trace("g700701");
+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);}}
+
+/* k6911 in loop680 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6913(C_word c,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_6913,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_6893,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_6893(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_6893(t5,t4);}}
+
+/* k6891 in k6911 in loop680 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6893(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));
+C_trace("loop680694");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_6880(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k6876 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6878(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 656 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6680(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_6680,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_6683,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: 657 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t2,((C_word*)((C_word*)t0)[2])[1],t1,*((C_word*)lf[47]+1));}
+
+/* k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6683,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6686,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_6874,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: 658 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t3,((C_word*)t0)[8],((C_word*)t0)[2]);}
+
+/* k6872 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6874(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 658 walk");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t2,((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[17],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6689,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_6870,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: 662 posq");
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t3,((C_word*)t0)[3],((C_word*)t0)[4]);}
+else{
+C_trace("compiler.scm: 660 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[180]))(5,*((C_word*)lf[180]+1),t2,((C_word*)t0)[5],((C_word*)t0)[2],C_SCHEME_FALSE);}}
+
+/* k6868 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6870(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_list_ref(((C_word*)t0)[4],t1);
+C_trace("compiler.scm: 660 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[180]))(5,*((C_word*)lf[180]+1),((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2],t2);}
+
+/* k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6689(C_word c,C_word t0,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_6689,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[11],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,lf[172],t3);
+t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6695,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: 664 set-real-names!");
+f_5368(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6695(C_word c,C_word t0,C_word 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_6695,2,t0,t1);}
+t2=(C_word)C_i_not(((C_word*)t0)[10]);
+t3=(C_truep(t2)?t2:(C_word)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_6710,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_6818,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_6845,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 668 lookup");
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_5340(t7,t6,((C_word*)t0)[2],((C_word*)t0)[9]);}}
+
+/* k6843 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 *a;
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[3];
+f_6818(t3,(C_word)C_eqp(lf[172],t2));}
+else{
+t2=((C_word*)t0)[3];
+f_6818(t2,(C_word)C_eqp(lf[172],((C_word*)t0)[2]));}}
+
+/* k6816 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6818(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_word)C_eqp(*((C_word*)lf[37]+1),lf[177]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+f_6710(2,t3,t2);}
+else{
+t3=(C_word)C_eqp(*((C_word*)lf[37]+1),lf[178]);
+if(C_truep(t3)){
+t4=((C_word*)t0)[2];
+C_trace("##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),((C_word*)t0)[3],t4,lf[179]);}
+else{
+t4=((C_word*)t0)[3];
+f_6710(2,t4,C_SCHEME_FALSE);}}}
+else{
+t2=((C_word*)t0)[3];
+f_6710(2,t2,C_SCHEME_FALSE);}}
+else{
+t2=((C_word*)t0)[3];
+f_6710(2,t2,C_SCHEME_FALSE);}}
+
+/* k6708 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6710(C_word c,C_word t0,C_word t1){
+C_word 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_6710,2,t0,t1);}
+if(C_truep(t1)){
+C_trace("compiler.scm: 674 expand-profile-lambda");
+((C_proc5)C_retrieve_symbol_proc(lf[174]))(5,*((C_word*)lf[174]+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_6719,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_word)C_i_length(((C_word*)t0)[4]);
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(1)))){
+t4=(C_word)C_i_car(((C_word*)t0)[4]);
+if(C_truep((C_word)C_i_symbolp(t4))){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6741,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_6797,a[2]=((C_word*)t0)[4],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_i_car(((C_word*)t0)[4]);
+C_trace("compiler.scm: 678 lookup");
+t8=((C_word*)((C_word*)t0)[3])[1];
+f_5340(t8,t6,t7,((C_word*)t0)[2]);}
+else{
+t5=t2;
+f_6719(t5,C_SCHEME_FALSE);}}
+else{
+t4=t2;
+f_6719(t4,C_SCHEME_FALSE);}}}
+
+/* k6795 in k6708 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6797(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_6741(t3,(C_word)C_eqp(lf[176],t2));}
+else{
+t2=(C_word)C_i_car(((C_word*)t0)[2]);
+t3=((C_word*)t0)[3];
+f_6741(t3,(C_word)C_eqp(lf[176],t2));}}
+
+/* k6739 in k6708 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6741(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6741,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cadr(((C_word*)t0)[5]);
+t3=(C_word)C_i_stringp(t2);
+if(C_truep(t3)){
+t4=((C_word*)t0)[4];
+f_6719(t4,t3);}
+else{
+if(C_truep((C_word)C_i_listp(t2))){
+t4=(C_word)C_i_length(t2);
+t5=(C_word)C_eqp(t4,C_fix(2));
+if(C_truep(t5)){
+t6=(C_word)C_i_car(t2);
+if(C_truep((C_word)C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6775,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_car(t2);
+C_trace("compiler.scm: 684 lookup");
+t9=((C_word*)((C_word*)t0)[3])[1];
+f_5340(t9,t7,t8,((C_word*)t0)[2]);}
+else{
+t7=((C_word*)t0)[4];
+f_6719(t7,C_SCHEME_FALSE);}}
+else{
+t6=((C_word*)t0)[4];
+f_6719(t6,C_SCHEME_FALSE);}}
+else{
+t4=((C_word*)t0)[4];
+f_6719(t4,C_SCHEME_FALSE);}}}
+else{
+t2=((C_word*)t0)[4];
+f_6719(t2,C_SCHEME_FALSE);}}
+
+/* k6773 in k6739 in k6708 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6775(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_6719(t3,(C_word)C_eqp(lf[99],t2));}
+else{
+t2=(C_word)C_i_car(((C_word*)t0)[2]);
+t3=((C_word*)t0)[3];
+f_6719(t3,(C_word)C_eqp(lf[99],t2));}}
+
+/* k6717 in k6708 in k6693 in k6687 in k6684 in k6681 in k6678 in k6675 in a6672 in k6666 in k6657 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6719(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_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 685 process-lambda-documentation");
+((C_proc5)C_retrieve_symbol_proc(lf[175]))(5,*((C_word*)lf[175]+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]);}}
+
+/* k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word 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_6502,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[7]);
+t3=(C_word)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_6523,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_6605,a[2]=t5,a[3]=t10,a[4]=t7,tmp=(C_word)a,a+=5,tmp));
+t12=((C_word*)t10)[1];
+f_6605(t12,t8,t2);}
+
+/* loop583 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6605(C_word t0,C_word 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_6605,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_list(&a,2,t4,lf[170]);
+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));
+C_trace("loop583596");
+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));
+C_trace("loop583596");
+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);}}
+
+/* k6521 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6523(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_6523,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6527,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_6531,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_6549,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_6549(t11,t7,((C_word*)t0)[2]);}
+
+/* loop607 in k6521 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6549(C_word t0,C_word 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_6549,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,t5,C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,t4,t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[169],t7);
+t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
+t10=(C_word)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_word)C_slot(t2,C_fix(1));
+C_trace("loop607620");
+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_word)C_slot(t2,C_fix(1));
+C_trace("loop607620");
+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);}}
+
+/* k6529 in k6521 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6531(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_6531,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6547,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("##sys#append");
+t3=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k6545 in k6529 in k6521 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6547,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[160],t2);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+C_trace("##sys#append");
+t5=*((C_word*)lf[168]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
+
+/* k6525 in k6521 in k6500 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6527(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_6527,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,lf[160],t2);
+C_trace("compiler.scm: 632 walk");
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t4,((C_word*)t0)[5],t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6290(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_6290,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[8]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6296,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: 616 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[164]))(3,*((C_word*)lf[164]+1),t3,t2);}
+
+/* k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6296(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6296,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_6299,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_6457,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_6457(t10,t6,t1);}
+
+/* loop486 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6457(C_word t0,C_word 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_6457,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[97]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6486,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));
+C_trace("g502503");
+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);}}
+
+/* k6484 in loop486 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_6486,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));
+C_trace("loop486499");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6457(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));
+C_trace("loop486499");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6457(t6,((C_word*)t0)[3],t5);}}
+
+/* k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6299(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_6299,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6302,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_6406,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_6408,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_6408(t11,t7,((C_word*)t0)[2],t1);}
+
+/* loop510 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6408(C_word t0,C_word 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_6408,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[163]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6441,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));
+C_trace("g530531");
+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);}}
+
+/* k6439 in loop510 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6441(C_word c,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_6441,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_6421,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_6421(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_6421(t5,t4);}}
+
+/* k6419 in k6439 in loop510 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6421(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));
+C_trace("loop510524");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_6408(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k6404 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6406(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 618 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6302(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_6302,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_6305,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: 619 set-real-names!");
+f_5368(t2,((C_word*)t0)[8],((C_word*)t0)[2]);}
+
+/* k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6305(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6305,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_6316,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_6338,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_6338(t10,t6,((C_word*)t0)[6],((C_word*)t0)[2]);}
+
+/* loop541 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6338(C_word t0,C_word 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_6338,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=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6369,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_6388,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));
+C_trace("g561562");
+t10=t6;
+f_6369(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);}}
+
+/* k6386 in loop541 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6388,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_6351,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_6351(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_6351(t5,t4);}}
+
+/* k6349 in k6386 in loop541 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6351(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));
+C_trace("loop541555");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_6338(t5,((C_word*)t0)[2],t3,t4);}
+
+/* g561 in loop541 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6369(C_word t0,C_word 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_6369,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6377,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_cadr(t3);
+t6=(C_word)C_i_car(t3);
+C_trace("compiler.scm: 622 walk");
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t7,t4,t5,((C_word*)t0)[3],((C_word*)t0)[2],t6);}
+
+/* k6375 in g561 in loop541 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6377(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_6377,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*)t0)[2],t1));}
+
+/* k6314 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6316(C_word c,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_6316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6324,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_6328,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_word)C_i_cddr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 624 ##sys#canonicalize-body");
+((C_proc5)C_retrieve_symbol_proc(lf[162]))(5,*((C_word*)lf[162]+1),t3,t4,((C_word*)t0)[6],*((C_word*)lf[47]+1));}
+
+/* k6326 in k6314 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6328(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_6328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6332,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: 625 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[161]+1)))(4,*((C_word*)lf[161]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6330 in k6326 in k6314 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6332(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 624 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6322 in k6314 in k6303 in k6300 in k6297 in k6294 in k6288 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6324(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_6324,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[159],t3));}
+
+/* loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6209(C_word 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_6209,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[150]);}
+else{
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6224,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_6230,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);}}
+
+/* a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6230(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_6230,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6234,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_6256,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_6234(2,t7,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 608 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t4,lf[153],lf[154],((C_word*)t0)[2]);}}
+else{
+if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[2]))){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6268,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 603 feature?");
+((C_proc3)C_retrieve_symbol_proc(lf[158]))(3,*((C_word*)lf[158]+1),t6,((C_word*)t0)[2]);}
+else{
+C_trace("compiler.scm: 608 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),t4,lf[153],lf[154],((C_word*)t0)[2]);}}}
+
+/* k6266 in a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6268(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_6268,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+if(C_truep(t2)){
+t3=((C_word*)t0)[4];
+f_6234(2,t3,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 608 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[4],lf[153],lf[154],((C_word*)t0)[3]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6278,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 605 ##sys#canonicalize-extension-path");
+((C_proc4)C_retrieve_symbol_proc(lf[156]))(4,*((C_word*)lf[156]+1),t2,((C_word*)t0)[3],lf[157]);}}
+
+/* k6276 in k6266 in a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6278(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 604 ##sys#find-extension");
+((C_proc4)C_retrieve_symbol_proc(lf[155]))(4,*((C_word*)lf[155]+1),((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* k6254 in a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6256(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_6234(2,t2,C_SCHEME_UNDEFINED);}
+else{
+C_trace("compiler.scm: 608 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[3],lf[153],lf[154],((C_word*)t0)[2]);}}
+
+/* k6232 in a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6234(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_6234,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6249,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)[3]);
+C_trace("compiler.scm: 610 loop");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_6209(t4,t2,t3);}
+
+/* k6247 in k6232 in a6229 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6249(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_6249,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[152],t3));}
+
+/* a6223 in loop in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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);}
+C_trace("compiler.scm: 600 ##sys#do-the-right-thing");
+((C_proc5)C_retrieve_symbol_proc(lf[151]))(5,*((C_word*)lf[151]+1),t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
+
+/* k6201 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6203(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 595 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop409 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_6154(C_word t0,C_word 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_6154,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[148]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6183,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));
+C_trace("g425426");
+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);}}
+
+/* k6181 in loop409 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 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_6183,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));
+C_trace("loop409422");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6154(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));
+C_trace("loop409422");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6154(t6,((C_word*)t0)[3],t5);}}
+
+/* k6131 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6133,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6136,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_apply(4,0,t2,C_retrieve(lf[147]),t1);}
+
+/* k6134 in k6131 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6136,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6139,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6141,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6147,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 587 ##sys#hash-table-update!");
+((C_proc6)C_retrieve_symbol_proc(lf[145]))(6,*((C_word*)lf[145]+1),t2,*((C_word*)lf[84]+1),lf[146],t3,t4);}
+
+/* a6146 in k6134 in k6131 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6147(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_6147,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* a6140 in k6134 in k6131 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6141(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_6141,3,t0,t1,t2);}
+t3=C_retrieve(lf[143]);
+C_trace("g437438");
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[144]+1),t2,((C_word*)t0)[2]);}
+
+/* k6137 in k6134 in k6131 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6139(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[142]);}
+
+/* k6106 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6108(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_6108,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6116,a[2]=((C_word*)t0)[7],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_caddr(((C_word*)t0)[6]);
+C_trace("compiler.scm: 582 walk");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t4,t2,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6114 in k6106 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6116,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[105],t3));}
+
+/* k6077 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6079(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_6079,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6087,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_6091,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 577 cadadr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[138]+1)))(3,*((C_word*)lf[138]+1),t3,((C_word*)t0)[2]);}
+
+/* k6089 in k6077 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6091(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 577 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),((C_word*)t0)[2],t1);}
+
+/* k6085 in k6077 in k6056 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6087(C_word c,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_6087,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)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_word)C_a_i_cons(&a,2,lf[101],t4));}
+
+/* k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6000,2,t0,t1);}
+t2=(C_word)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_word)C_i_cdr(t2));}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6012,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 567 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t3,lf[137]);}}
+
+/* k6010 in k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6012(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_6012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6016,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 568 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[136]))(5,*((C_word*)lf[136]+1),t2,((C_word*)t0)[2],t1,*((C_word*)lf[54]+1));}
+
+/* k6014 in k6010 in k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6016,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_6046,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_6021,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t5))){
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[134],C_SCHEME_TRUE);}
+else{
+t7=(C_word)C_i_cdr(t5);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=(C_word)C_i_car(t5);
+C_trace("##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),t3,t4,lf[134],t8);}
+else{
+C_trace("##sys#error");
+t8=*((C_word*)lf[135]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
+
+/* k6019 in k6014 in k6010 in k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6021(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[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[134],t1);}
+
+/* k6044 in k6014 in k6010 in k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6046(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_6046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6049,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 570 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[133]))(3,*((C_word*)lf[133]+1),t2,((C_word*)t0)[2]);}
+
+/* k6047 in k6044 in k6014 in k6010 in k5998 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_6049(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]);}
+
+/* k5958 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5971,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[2]);
+C_trace("compiler.scm: 556 ##sys#strip-syntax");
+((C_proc3)C_retrieve_symbol_proc(lf[128]))(3,*((C_word*)lf[128]+1),t2,t3);}
+
+/* k5969 in k5958 in k5955 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5971(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_5971,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[99],t2));}
+
+/* k5897 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5899(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_5899,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5910,a[2]=((C_word*)t0)[2],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_cadr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 548 walk");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k5908 in k5897 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5918,a[2]=((C_word*)t0)[2],a[3]=((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_word)C_i_caddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 549 walk");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k5916 in k5908 in k5897 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5918(C_word c,C_word t0,C_word t1){
+C_word 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_5918,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5926,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_cdddr(((C_word*)t0)[5]);
+if(C_truep((C_word)C_i_nullp(t3))){
+t4=(C_word)C_a_i_cons(&a,2,lf[125],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,t1,t4);
+t6=(C_word)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_word)C_a_i_cons(&a,2,lf[124],t6));}
+else{
+t4=(C_word)C_i_cadddr(((C_word*)t0)[5]);
+C_trace("compiler.scm: 552 walk");
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_5774(t5,t2,t4,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}}
+
+/* k5924 in k5916 in k5908 in k5897 in k5888 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5926,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)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[124],t4));}
+
+/* g328 in k5866 in k5854 in k5848 in k5845 in k5841 in k5838 in k5835 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5872(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_5872,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t4=(C_word)C_a_i_cons(&a,2,t2,t3);
+C_trace("compiler.scm: 539 walk");
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t5,t1,t4,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k5816 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5818,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)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_word)C_a_i_cons(&a,2,lf[99],t2));}
+else{
+C_trace("compiler.scm: 522 syntax-error");
+((C_proc4)C_retrieve_symbol_proc(lf[120]))(4,*((C_word*)lf[120]+1),((C_word*)t0)[2],lf[121],((C_word*)t0)[3]);}}
+
+/* k5788 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5790,2,t0,t1);}
+if(C_truep(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,lf[99],t2);
+C_trace("compiler.scm: 518 resolve-variable");
+t4=((C_word*)((C_word*)t0)[7])[1];
+f_5474(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_word)C_i_memq(((C_word*)t0)[8],C_retrieve(lf[115])))){
+C_trace("compiler.scm: 515 compiler-warning");
+((C_proc5)C_retrieve_symbol_proc(lf[116]))(5,*((C_word*)lf[116]+1),((C_word*)t0)[2],lf[117],lf[118],((C_word*)t0)[8]);}
+else{
+C_trace("compiler.scm: 518 resolve-variable");
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_5474(t2,((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}}
+
+/* k5782 in walk in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5784(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 518 resolve-variable");
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_5474(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 k5138 in k5135 */
+static void C_fcall f_5644(C_word 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_5644,NULL,2,t1,t2);}
+t3=C_retrieve(lf[109]);
+t4=C_retrieve(lf[110]);
+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_5648,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: 481 ##sys#meta-macro-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[114]))(2,*((C_word*)lf[114]+1),t7);}
+
+/* k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5648(C_word c,C_word t0,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_5648,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_5649,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_5669,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("##sys#dynamic-wind");
+t6=*((C_word*)lf[113]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,((C_word*)t0)[2],t4,t5,t4);}
+
+/* a5668 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5669(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_5669,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5673,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5680,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 485 ##sys#current-meta-environment");
+((C_proc2)C_retrieve_symbol_proc(lf[112]))(2,*((C_word*)lf[112]+1),t3);}
+
+/* k5678 in a5668 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5680(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 482 ##sys#compile-to-closure");
+((C_proc5)C_retrieve_symbol_proc(lf[111]))(5,*((C_word*)lf[111]+1),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
+
+/* k5671 in a5668 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5673(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("g235236");
+t2=t1;
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* swap214 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5649(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_5649,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5653,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("g217218225");
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k5651 in swap214 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5653(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_5653,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5656,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("g217218225");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k5654 in k5651 in swap214 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5656(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_5656,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_5660,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("g219220226");
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k5658 in k5654 in k5651 in swap214 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5660(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_5660,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5663,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+C_trace("g219220226");
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k5661 in k5658 in k5654 in k5651 in swap214 in k5646 in eval/meta in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5663(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 k5138 in k5135 */
+static void C_fcall f_5474(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_5474,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5478,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: 448 lookup");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_5340(t7,t6,t2,t4);}
+
+/* k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+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 t4;
+C_word t5;
+C_word ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5478,2,t0,t1);}
+t2=C_retrieve(lf[100]);
+if(C_truep((C_word)C_i_symbolp(t1))){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5490,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[59]+1))){
+C_trace("compiler.scm: 451 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t3,*((C_word*)lf[58]+1),t1);}
+else{
+t4=t3;
+f_5490(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);}}
+
+/* k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5490(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_5490,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5494,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("g174175");
+t3=t2;
+f_5494(t3,((C_word*)t0)[3],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5508,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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[57]+1))){
+C_trace("compiler.scm: 453 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[108]))(4,*((C_word*)lf[108]+1),t2,*((C_word*)lf[56]+1),((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_5508(2,t3,C_SCHEME_FALSE);}}}
+
+/* k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5508(C_word c,C_word t0,C_word t1){
+C_word 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_5508,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5512,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("g180181");
+t3=t2;
+f_5512(t3,((C_word*)t0)[3],t1);}
+else{
+t2=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[65]+1));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5526,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("g184185");
+t4=t3;
+f_5526(t4,((C_word*)t0)[3],t2);}
+else{
+t3=(C_word)C_i_assq(((C_word*)t0)[2],*((C_word*)lf[76]+1));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5573,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("g196197");
+t5=t4;
+f_5573(t5,((C_word*)t0)[3],t3);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5616,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: 475 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t4,((C_word*)t0)[2],lf[107]);}}}}
+
+/* k5614 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5616(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_word)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: 476 ##sys#alias-global-hook");
+((C_proc4)C_retrieve_symbol_proc(lf[106]))(4,*((C_word*)lf[106]+1),((C_word*)t0)[4],((C_word*)t0)[3],C_SCHEME_FALSE);}}}
+
+/* g196 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5573(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_5573,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_caddr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5580,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: 468 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t4,t3);}
+
+/* k5578 in g196 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5580(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5580,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_i_cadr(((C_word*)t0)[7]);
+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=(C_word)C_a_i_cons(&a,2,lf[105],t5);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5590,a[2]=((C_word*)t0)[2],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_5594,a[2]=((C_word*)t0)[8],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 472 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t8,t1,t6);}
+
+/* k5592 in k5578 in g196 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5594(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 471 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k5588 in k5578 in g196 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5590(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 470 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* g184 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5526(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_5526,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cadr(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5533,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: 458 final-foreign-type");
+((C_proc3)C_retrieve_symbol_proc(lf[104]))(3,*((C_word*)lf[104]+1),t4,t3);}
+
+/* k5531 in g184 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5533(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5533,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[8]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],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,t4,C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,lf[101],t5);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5543,a[2]=((C_word*)t0)[2],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_5547,a[2]=((C_word*)t0)[7],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 462 finish-foreign-result");
+((C_proc4)C_retrieve_symbol_proc(lf[103]))(4,*((C_word*)lf[103]+1),t8,t1,t6);}
+
+/* k5545 in k5531 in g184 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5547(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 461 foreign-type-convert-result");
+((C_proc4)C_retrieve_symbol_proc(lf[102]))(4,*((C_word*)lf[102]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k5541 in k5531 in g184 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5543(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 460 walk");
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_5774(t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* g180 in k5506 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5512(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_5512,NULL,3,t0,t1,t2);}
+C_trace("compiler.scm: 454 walk");
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t3,t1,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* g174 in k5488 in k5476 in resolve-variable in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5494(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_5494,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+C_trace("compiler.scm: 452 walk");
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_5774(t4,t1,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* unquotify in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5428(C_word t0,C_word 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_5428,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_listp(t2))){
+t4=(C_word)C_i_length(t2);
+t5=(C_word)C_eqp(C_fix(2),t4);
+if(C_truep(t5)){
+t6=(C_word)C_i_car(t2);
+if(C_truep((C_word)C_i_symbolp(t6))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5460,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_car(t2);
+C_trace("compiler.scm: 443 lookup");
+t9=((C_word*)((C_word*)t0)[2])[1];
+f_5340(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);}}
+
+/* k5458 in unquotify in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5460(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_eqp(lf[99],t1);
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)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 k5138 in k5135 */
+static void C_fcall f_5368(C_word 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_5368,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_5374,a[2]=t5,tmp=(C_word)a,a+=3,tmp));
+t7=((C_word*)t5)[1];
+f_5374(t7,t1,t2,t3);}
+
+/* loop130 in set-real-names! in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5374(C_word t0,C_word 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_5374,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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5389,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_slot(t3,C_fix(0));
+C_trace("compiler.scm: 432 set-real-name!");
+((C_proc4)C_retrieve_symbol_proc(lf[98]))(4,*((C_word*)lf[98]+1),t6,t7,t8);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* k5387 in loop130 in set-real-names! in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5389(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_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_5374(t4,((C_word*)t0)[2],t2,t3);}
+
+/* macro-alias in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5355(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_5355,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5359,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: 427 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[97]))(3,*((C_word*)lf[97]+1),t4,t2);}
+
+/* k5357 in macro-alias in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5359(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_5359,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5362,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_5366,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 428 lookup");
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_5340(t4,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k5364 in k5357 in macro-alias in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5366(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("compiler.scm: 428 ##sys#put!");
+((C_proc5)C_retrieve_symbol_proc(lf[96]))(5,*((C_word*)lf[96]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[95],t1);}
+
+/* k5360 in k5357 in macro-alias in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5362(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 k5138 in k5135 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_5340,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5344,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 422 find-id");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_5301(t5,t4,t2,t3);}
+
+/* k5342 in lookup in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5344(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_5344,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_5350,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("compiler.scm: 423 ##sys#get");
+((C_proc4)C_retrieve_symbol_proc(lf[94]))(4,*((C_word*)lf[94]+1),t2,((C_word*)t0)[2],lf[95]);}}
+
+/* k5348 in k5342 in lookup in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5350(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 k5138 in k5135 */
+static void C_fcall f_5301(C_word 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_5301,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_5314,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_5338,a[2]=t3,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("compiler.scm: 418 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[93]+1)))(3,*((C_word*)lf[93]+1),t5,t3);}}
+
+/* k5336 in find-id in ##compiler#canonicalize-expression in k5138 in k5135 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5338,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[4],t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5334,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+C_trace("compiler.scm: 418 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),t3,((C_word*)t0)[2]);}
+else{
+t3=((C_word*)t0)[3];
+f_5314(t3,C_SCHEME_FALSE);}}
+
+/* k5332 in k5336 in find-id in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_ccall f_5334(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_5314(t2,(C_word)C_i_symbolp(t1));}
+
+/* k5312 in find-id in ##compiler#canonicalize-expression in k5138 in k5135 */
+static void C_fcall f_5314(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: 418 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[92]+1)))(3,*((C_word*)lf[92]+1),((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+C_trace("compiler.scm: 419 find-id");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_5301(t3,((C_word*)t0)[5],((C_word*)t0)[2],t2);}}
+
+/* ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5237(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_5237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5241,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[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[53]+1),C_SCHEME_END_OF_LIST);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5296,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[88]+1)))(4,*((C_word*)lf[88]+1),t3,*((C_word*)lf[16]+1),C_SCHEME_END_OF_LIST);}}
+
+/* k5294 in ##compiler#initialize-compiler in k5138 in k5135 */
+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 *a;
+t2=C_mutate((C_word*)lf[53]+1 /* (set! line-number-database-2 ...) */,t1);
+t3=((C_word*)t0)[2];
+f_5241(2,t3,t2);}
+
+/* k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5241(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_5241,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5244,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[56]+1))){
+C_trace("compiler.scm: 397 vector-fill!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[56]+1),C_SCHEME_END_OF_LIST);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5289,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[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
+
+/* k5287 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5289(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[56]+1 /* (set! inline-table ...) */,t1);
+t3=((C_word*)t0)[2];
+f_5244(2,t3,t2);}
+
+/* k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5244(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_5244,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5247,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[58]+1))){
+C_trace("compiler.scm: 400 vector-fill!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t2,*((C_word*)lf[58]+1),C_SCHEME_END_OF_LIST);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5282,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[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}}
+
+/* k5280 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5282(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[58]+1 /* (set! constant-table ...) */,t1);
+t3=((C_word*)t0)[2];
+f_5247(2,t3,t2);}
+
+/* k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5251,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[89]))(3,*((C_word*)lf[89]+1),t2,lf[90]);}
+
+/* k5249 in k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5251,2,t0,t1);}
+t2=C_mutate((C_word*)lf[72]+1 /* (set! profile-info-vector-name ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5255,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[88]+1)))(4,*((C_word*)lf[88]+1),t3,C_fix(997),C_SCHEME_END_OF_LIST);}
+
+/* k5253 in k5249 in k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5255(C_word c,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_5255,2,t0,t1);}
+t2=C_mutate((C_word*)lf[75]+1 /* (set! real-name-table ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5258,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[84]+1))){
+C_trace("compiler.scm: 405 vector-fill!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),t3,*((C_word*)lf[84]+1),C_SCHEME_END_OF_LIST);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5275,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[88]+1)))(4,*((C_word*)lf[88]+1),t4,C_fix(301),C_SCHEME_END_OF_LIST);}}
+
+/* k5273 in k5253 in k5249 in k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+static void C_ccall f_5275(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[84]+1 /* (set! file-requirements ...) */,t1);
+t3=((C_word*)t0)[2];
+f_5258(2,t3,t2);}
+
+/* k5256 in k5253 in k5249 in k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5258,2,t0,t1);}
+if(C_truep(*((C_word*)lf[64]+1))){
+C_trace("compiler.scm: 408 vector-fill!");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[87]+1)))(4,*((C_word*)lf[87]+1),((C_word*)t0)[2],*((C_word*)lf[64]+1),C_SCHEME_END_OF_LIST);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5268,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[88]+1)))(4,*((C_word*)lf[88]+1),t2,C_fix(301),C_SCHEME_END_OF_LIST);}}
+
+/* k5266 in k5256 in k5253 in k5249 in k5245 in k5242 in k5239 in ##compiler#initialize-compiler in k5138 in k5135 */
+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 *a;
+t2=C_mutate((C_word*)lf[64]+1 /* (set! foreign-type-table ...) */,t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* d in k5138 in k5135 */
+static void C_ccall f_5142(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_5142r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_5142r(t0,t1,t2,t3);}}
+
+static void C_ccall f_5142r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+if(C_truep((C_word)C_i_nullp(t3))){
+C_trace("compiler.scm: 268 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[1112] = {
+{"toplevel:compiler_scm",(void*)C_compiler_toplevel},
+{"f_5137:compiler_scm",(void*)f_5137},
+{"f_5140:compiler_scm",(void*)f_5140},
+{"f_17711:compiler_scm",(void*)f_17711},
+{"f_19181:compiler_scm",(void*)f_19181},
+{"f_19184:compiler_scm",(void*)f_19184},
+{"f_19187:compiler_scm",(void*)f_19187},
+{"f_19190:compiler_scm",(void*)f_19190},
+{"f_19193:compiler_scm",(void*)f_19193},
+{"f_19096:compiler_scm",(void*)f_19096},
+{"f_19123:compiler_scm",(void*)f_19123},
+{"f_19064:compiler_scm",(void*)f_19064},
+{"f_19080:compiler_scm",(void*)f_19080},
+{"f_19087:compiler_scm",(void*)f_19087},
+{"f_19094:compiler_scm",(void*)f_19094},
+{"f_19068:compiler_scm",(void*)f_19068},
+{"f_19078:compiler_scm",(void*)f_19078},
+{"f_19050:compiler_scm",(void*)f_19050},
+{"f_19058:compiler_scm",(void*)f_19058},
+{"f_18970:compiler_scm",(void*)f_18970},
+{"f_18977:compiler_scm",(void*)f_18977},
+{"f_19039:compiler_scm",(void*)f_19039},
+{"f_19029:compiler_scm",(void*)f_19029},
+{"f_19003:compiler_scm",(void*)f_19003},
+{"f_18989:compiler_scm",(void*)f_18989},
+{"f_18924:compiler_scm",(void*)f_18924},
+{"f_18930:compiler_scm",(void*)f_18930},
+{"f_18964:compiler_scm",(void*)f_18964},
+{"f_18957:compiler_scm",(void*)f_18957},
+{"f_17838:compiler_scm",(void*)f_17838},
+{"f_18913:compiler_scm",(void*)f_18913},
+{"f_18804:compiler_scm",(void*)f_18804},
+{"f_18830:compiler_scm",(void*)f_18830},
+{"f_18863:compiler_scm",(void*)f_18863},
+{"f_18866:compiler_scm",(void*)f_18866},
+{"f_18885:compiler_scm",(void*)f_18885},
+{"f_18873:compiler_scm",(void*)f_18873},
+{"f_18841:compiler_scm",(void*)f_18841},
+{"f_18852:compiler_scm",(void*)f_18852},
+{"f_18820:compiler_scm",(void*)f_18820},
+{"f_18749:compiler_scm",(void*)f_18749},
+{"f_18752:compiler_scm",(void*)f_18752},
+{"f_18755:compiler_scm",(void*)f_18755},
+{"f_18775:compiler_scm",(void*)f_18775},
+{"f_18737:compiler_scm",(void*)f_18737},
+{"f_18638:compiler_scm",(void*)f_18638},
+{"f_18708:compiler_scm",(void*)f_18708},
+{"f_18727:compiler_scm",(void*)f_18727},
+{"f_18702:compiler_scm",(void*)f_18702},
+{"f_18686:compiler_scm",(void*)f_18686},
+{"f_18659:compiler_scm",(void*)f_18659},
+{"f_18662:compiler_scm",(void*)f_18662},
+{"f_18604:compiler_scm",(void*)f_18604},
+{"f_18616:compiler_scm",(void*)f_18616},
+{"f_18555:compiler_scm",(void*)f_18555},
+{"f_18573:compiler_scm",(void*)f_18573},
+{"f_18558:compiler_scm",(void*)f_18558},
+{"f_18570:compiler_scm",(void*)f_18570},
+{"f_18397:compiler_scm",(void*)f_18397},
+{"f_18531:compiler_scm",(void*)f_18531},
+{"f_18520:compiler_scm",(void*)f_18520},
+{"f_18436:compiler_scm",(void*)f_18436},
+{"f_18516:compiler_scm",(void*)f_18516},
+{"f_18442:compiler_scm",(void*)f_18442},
+{"f_18448:compiler_scm",(void*)f_18448},
+{"f_18480:compiler_scm",(void*)f_18480},
+{"f_18472:compiler_scm",(void*)f_18472},
+{"f_18401:compiler_scm",(void*)f_18401},
+{"f_18422:compiler_scm",(void*)f_18422},
+{"f_18351:compiler_scm",(void*)f_18351},
+{"f_18363:compiler_scm",(void*)f_18363},
+{"f_18367:compiler_scm",(void*)f_18367},
+{"f_18355:compiler_scm",(void*)f_18355},
+{"f_18154:compiler_scm",(void*)f_18154},
+{"f_18281:compiler_scm",(void*)f_18281},
+{"f_18287:compiler_scm",(void*)f_18287},
+{"f_18312:compiler_scm",(void*)f_18312},
+{"f_18161:compiler_scm",(void*)f_18161},
+{"f_18272:compiler_scm",(void*)f_18272},
+{"f_18164:compiler_scm",(void*)f_18164},
+{"f_18167:compiler_scm",(void*)f_18167},
+{"f_18170:compiler_scm",(void*)f_18170},
+{"f_18214:compiler_scm",(void*)f_18214},
+{"f_18240:compiler_scm",(void*)f_18240},
+{"f_18221:compiler_scm",(void*)f_18221},
+{"f_18225:compiler_scm",(void*)f_18225},
+{"f_18198:compiler_scm",(void*)f_18198},
+{"f_18082:compiler_scm",(void*)f_18082},
+{"f_18097:compiler_scm",(void*)f_18097},
+{"f_18066:compiler_scm",(void*)f_18066},
+{"f_18036:compiler_scm",(void*)f_18036},
+{"f_18010:compiler_scm",(void*)f_18010},
+{"f_18006:compiler_scm",(void*)f_18006},
+{"f_18002:compiler_scm",(void*)f_18002},
+{"f_17976:compiler_scm",(void*)f_17976},
+{"f_17972:compiler_scm",(void*)f_17972},
+{"f_17946:compiler_scm",(void*)f_17946},
+{"f_17920:compiler_scm",(void*)f_17920},
+{"f_17765:compiler_scm",(void*)f_17765},
+{"f_17825:compiler_scm",(void*)f_17825},
+{"f_17769:compiler_scm",(void*)f_17769},
+{"f_17804:compiler_scm",(void*)f_17804},
+{"f_17811:compiler_scm",(void*)f_17811},
+{"f_17772:compiler_scm",(void*)f_17772},
+{"f_17775:compiler_scm",(void*)f_17775},
+{"f_17791:compiler_scm",(void*)f_17791},
+{"f_17714:compiler_scm",(void*)f_17714},
+{"f_17718:compiler_scm",(void*)f_17718},
+{"f_17744:compiler_scm",(void*)f_17744},
+{"f_17760:compiler_scm",(void*)f_17760},
+{"f_17702:compiler_scm",(void*)f_17702},
+{"f_17693:compiler_scm",(void*)f_17693},
+{"f_17684:compiler_scm",(void*)f_17684},
+{"f_17675:compiler_scm",(void*)f_17675},
+{"f_17666:compiler_scm",(void*)f_17666},
+{"f_17657:compiler_scm",(void*)f_17657},
+{"f_17648:compiler_scm",(void*)f_17648},
+{"f_17639:compiler_scm",(void*)f_17639},
+{"f_17630:compiler_scm",(void*)f_17630},
+{"f_17621:compiler_scm",(void*)f_17621},
+{"f_17612:compiler_scm",(void*)f_17612},
+{"f_17603:compiler_scm",(void*)f_17603},
+{"f_17594:compiler_scm",(void*)f_17594},
+{"f_17585:compiler_scm",(void*)f_17585},
+{"f_17576:compiler_scm",(void*)f_17576},
+{"f_17570:compiler_scm",(void*)f_17570},
+{"f_17564:compiler_scm",(void*)f_17564},
+{"f_15804:compiler_scm",(void*)f_15804},
+{"f_17531:compiler_scm",(void*)f_17531},
+{"f_17534:compiler_scm",(void*)f_17534},
+{"f_17537:compiler_scm",(void*)f_17537},
+{"f_17540:compiler_scm",(void*)f_17540},
+{"f_17543:compiler_scm",(void*)f_17543},
+{"f_17558:compiler_scm",(void*)f_17558},
+{"f_17556:compiler_scm",(void*)f_17556},
+{"f_17546:compiler_scm",(void*)f_17546},
+{"f_17340:compiler_scm",(void*)f_17340},
+{"f_17347:compiler_scm",(void*)f_17347},
+{"f_17351:compiler_scm",(void*)f_17351},
+{"f_17372:compiler_scm",(void*)f_17372},
+{"f_17294:compiler_scm",(void*)f_17294},
+{"f_17300:compiler_scm",(void*)f_17300},
+{"f_17334:compiler_scm",(void*)f_17334},
+{"f_17327:compiler_scm",(void*)f_17327},
+{"f_16269:compiler_scm",(void*)f_16269},
+{"f_16303:compiler_scm",(void*)f_16303},
+{"f_16342:compiler_scm",(void*)f_16342},
+{"f_17180:compiler_scm",(void*)f_17180},
+{"f_17176:compiler_scm",(void*)f_17176},
+{"f_16965:compiler_scm",(void*)f_16965},
+{"f_16971:compiler_scm",(void*)f_16971},
+{"f_17068:compiler_scm",(void*)f_17068},
+{"f_17112:compiler_scm",(void*)f_17112},
+{"f_17088:compiler_scm",(void*)f_17088},
+{"f_17092:compiler_scm",(void*)f_17092},
+{"f_16975:compiler_scm",(void*)f_16975},
+{"f_16982:compiler_scm",(void*)f_16982},
+{"f_17051:compiler_scm",(void*)f_17051},
+{"f_17055:compiler_scm",(void*)f_17055},
+{"f_17023:compiler_scm",(void*)f_17023},
+{"f_17011:compiler_scm",(void*)f_17011},
+{"f_16476:compiler_scm",(void*)f_16476},
+{"f_16938:compiler_scm",(void*)f_16938},
+{"f_16480:compiler_scm",(void*)f_16480},
+{"f_16903:compiler_scm",(void*)f_16903},
+{"f_16932:compiler_scm",(void*)f_16932},
+{"f_16852:compiler_scm",(void*)f_16852},
+{"f_16854:compiler_scm",(void*)f_16854},
+{"f_16887:compiler_scm",(void*)f_16887},
+{"f_16867:compiler_scm",(void*)f_16867},
+{"f_16483:compiler_scm",(void*)f_16483},
+{"f_16486:compiler_scm",(void*)f_16486},
+{"f_16492:compiler_scm",(void*)f_16492},
+{"f_16498:compiler_scm",(void*)f_16498},
+{"f_16504:compiler_scm",(void*)f_16504},
+{"f_16819:compiler_scm",(void*)f_16819},
+{"f_16822:compiler_scm",(void*)f_16822},
+{"f_16507:compiler_scm",(void*)f_16507},
+{"f_16761:compiler_scm",(void*)f_16761},
+{"f_16788:compiler_scm",(void*)f_16788},
+{"f_16746:compiler_scm",(void*)f_16746},
+{"f_16742:compiler_scm",(void*)f_16742},
+{"f_16629:compiler_scm",(void*)f_16629},
+{"f_16661:compiler_scm",(void*)f_16661},
+{"f_16667:compiler_scm",(void*)f_16667},
+{"f_16711:compiler_scm",(void*)f_16711},
+{"f_16665:compiler_scm",(void*)f_16665},
+{"f_16640:compiler_scm",(void*)f_16640},
+{"f_16632:compiler_scm",(void*)f_16632},
+{"f_16625:compiler_scm",(void*)f_16625},
+{"f_16575:compiler_scm",(void*)f_16575},
+{"f_16613:compiler_scm",(void*)f_16613},
+{"f_16602:compiler_scm",(void*)f_16602},
+{"f_16610:compiler_scm",(void*)f_16610},
+{"f_16536:compiler_scm",(void*)f_16536},
+{"f_16566:compiler_scm",(void*)f_16566},
+{"f_16558:compiler_scm",(void*)f_16558},
+{"f_16554:compiler_scm",(void*)f_16554},
+{"f_16550:compiler_scm",(void*)f_16550},
+{"f_16539:compiler_scm",(void*)f_16539},
+{"f_16375:compiler_scm",(void*)f_16375},
+{"f_16378:compiler_scm",(void*)f_16378},
+{"f_16459:compiler_scm",(void*)f_16459},
+{"f_16401:compiler_scm",(void*)f_16401},
+{"f_16443:compiler_scm",(void*)f_16443},
+{"f_16431:compiler_scm",(void*)f_16431},
+{"f_16363:compiler_scm",(void*)f_16363},
+{"f_16315:compiler_scm",(void*)f_16315},
+{"f_16321:compiler_scm",(void*)f_16321},
+{"f_15834:compiler_scm",(void*)f_15834},
+{"f_15868:compiler_scm",(void*)f_15868},
+{"f_16211:compiler_scm",(void*)f_16211},
+{"f_16226:compiler_scm",(void*)f_16226},
+{"f_16219:compiler_scm",(void*)f_16219},
+{"f_16172:compiler_scm",(void*)f_16172},
+{"f_17396:compiler_scm",(void*)f_17396},
+{"f_17449:compiler_scm",(void*)f_17449},
+{"f_17480:compiler_scm",(void*)f_17480},
+{"f_17490:compiler_scm",(void*)f_17490},
+{"f_17475:compiler_scm",(void*)f_17475},
+{"f_17440:compiler_scm",(void*)f_17440},
+{"f_17394:compiler_scm",(void*)f_17394},
+{"f_16185:compiler_scm",(void*)f_16185},
+{"f_16188:compiler_scm",(void*)f_16188},
+{"f_16199:compiler_scm",(void*)f_16199},
+{"f_16126:compiler_scm",(void*)f_16126},
+{"f_16008:compiler_scm",(void*)f_16008},
+{"f_16014:compiler_scm",(void*)f_16014},
+{"f_16031:compiler_scm",(void*)f_16031},
+{"f_16034:compiler_scm",(void*)f_16034},
+{"f_16037:compiler_scm",(void*)f_16037},
+{"f_16076:compiler_scm",(void*)f_16076},
+{"f_16055:compiler_scm",(void*)f_16055},
+{"f_16062:compiler_scm",(void*)f_16062},
+{"f_16040:compiler_scm",(void*)f_16040},
+{"f_16043:compiler_scm",(void*)f_16043},
+{"f_16046:compiler_scm",(void*)f_16046},
+{"f_15953:compiler_scm",(void*)f_15953},
+{"f_15958:compiler_scm",(void*)f_15958},
+{"f_15973:compiler_scm",(void*)f_15973},
+{"f_15966:compiler_scm",(void*)f_15966},
+{"f_15889:compiler_scm",(void*)f_15889},
+{"f_15906:compiler_scm",(void*)f_15906},
+{"f_15921:compiler_scm",(void*)f_15921},
+{"f_15914:compiler_scm",(void*)f_15914},
+{"f_15893:compiler_scm",(void*)f_15893},
+{"f_15904:compiler_scm",(void*)f_15904},
+{"f_15879:compiler_scm",(void*)f_15879},
+{"f_15823:compiler_scm",(void*)f_15823},
+{"f_15832:compiler_scm",(void*)f_15832},
+{"f_15813:compiler_scm",(void*)f_15813},
+{"f_15818:compiler_scm",(void*)f_15818},
+{"f_15807:compiler_scm",(void*)f_15807},
+{"f_13727:compiler_scm",(void*)f_13727},
+{"f_13731:compiler_scm",(void*)f_13731},
+{"f_14691:compiler_scm",(void*)f_14691},
+{"f_14695:compiler_scm",(void*)f_14695},
+{"f_14698:compiler_scm",(void*)f_14698},
+{"f_14711:compiler_scm",(void*)f_14711},
+{"f_15659:compiler_scm",(void*)f_15659},
+{"f_15667:compiler_scm",(void*)f_15667},
+{"f_14715:compiler_scm",(void*)f_14715},
+{"f_15637:compiler_scm",(void*)f_15637},
+{"f_15610:compiler_scm",(void*)f_15610},
+{"f_14726:compiler_scm",(void*)f_14726},
+{"f_15607:compiler_scm",(void*)f_15607},
+{"f_15552:compiler_scm",(void*)f_15552},
+{"f_15555:compiler_scm",(void*)f_15555},
+{"f_15583:compiler_scm",(void*)f_15583},
+{"f_15561:compiler_scm",(void*)f_15561},
+{"f_14729:compiler_scm",(void*)f_14729},
+{"f_14732:compiler_scm",(void*)f_14732},
+{"f_15474:compiler_scm",(void*)f_15474},
+{"f_15478:compiler_scm",(void*)f_15478},
+{"f_15537:compiler_scm",(void*)f_15537},
+{"f_15496:compiler_scm",(void*)f_15496},
+{"f_15501:compiler_scm",(void*)f_15501},
+{"f_15416:compiler_scm",(void*)f_15416},
+{"f_15454:compiler_scm",(void*)f_15454},
+{"f_15420:compiler_scm",(void*)f_15420},
+{"f_15437:compiler_scm",(void*)f_15437},
+{"f_15429:compiler_scm",(void*)f_15429},
+{"f_15410:compiler_scm",(void*)f_15410},
+{"f_15371:compiler_scm",(void*)f_15371},
+{"f_15365:compiler_scm",(void*)f_15365},
+{"f_15363:compiler_scm",(void*)f_15363},
+{"f_15355:compiler_scm",(void*)f_15355},
+{"f_15323:compiler_scm",(void*)f_15323},
+{"f_15329:compiler_scm",(void*)f_15329},
+{"f_14735:compiler_scm",(void*)f_14735},
+{"f_15270:compiler_scm",(void*)f_15270},
+{"f_15279:compiler_scm",(void*)f_15279},
+{"f_14738:compiler_scm",(void*)f_14738},
+{"f_15139:compiler_scm",(void*)f_15139},
+{"f_15162:compiler_scm",(void*)f_15162},
+{"f_15205:compiler_scm",(void*)f_15205},
+{"f_15241:compiler_scm",(void*)f_15241},
+{"f_15213:compiler_scm",(void*)f_15213},
+{"f_15238:compiler_scm",(void*)f_15238},
+{"f_15234:compiler_scm",(void*)f_15234},
+{"f_15220:compiler_scm",(void*)f_15220},
+{"f_15223:compiler_scm",(void*)f_15223},
+{"f_15166:compiler_scm",(void*)f_15166},
+{"f_15172:compiler_scm",(void*)f_15172},
+{"f_14741:compiler_scm",(void*)f_14741},
+{"f_15107:compiler_scm",(void*)f_15107},
+{"f_15093:compiler_scm",(void*)f_15093},
+{"f_15100:compiler_scm",(void*)f_15100},
+{"f_15081:compiler_scm",(void*)f_15081},
+{"f_14744:compiler_scm",(void*)f_14744},
+{"f_14961:compiler_scm",(void*)f_14961},
+{"f_15042:compiler_scm",(void*)f_15042},
+{"f_14967:compiler_scm",(void*)f_14967},
+{"f_15032:compiler_scm",(void*)f_15032},
+{"f_15024:compiler_scm",(void*)f_15024},
+{"f_15020:compiler_scm",(void*)f_15020},
+{"f_15016:compiler_scm",(void*)f_15016},
+{"f_14970:compiler_scm",(void*)f_14970},
+{"f_14973:compiler_scm",(void*)f_14973},
+{"f_14747:compiler_scm",(void*)f_14747},
+{"f_14775:compiler_scm",(void*)f_14775},
+{"f_14801:compiler_scm",(void*)f_14801},
+{"f_14827:compiler_scm",(void*)f_14827},
+{"f_14833:compiler_scm",(void*)f_14833},
+{"f_14750:compiler_scm",(void*)f_14750},
+{"f_14756:compiler_scm",(void*)f_14756},
+{"f_14760:compiler_scm",(void*)f_14760},
+{"f_14701:compiler_scm",(void*)f_14701},
+{"f_14705:compiler_scm",(void*)f_14705},
+{"f_14666:compiler_scm",(void*)f_14666},
+{"f_14676:compiler_scm",(void*)f_14676},
+{"f_14684:compiler_scm",(void*)f_14684},
+{"f_14652:compiler_scm",(void*)f_14652},
+{"f_14660:compiler_scm",(void*)f_14660},
+{"f_14646:compiler_scm",(void*)f_14646},
+{"f_14468:compiler_scm",(void*)f_14468},
+{"f_14481:compiler_scm",(void*)f_14481},
+{"f_14597:compiler_scm",(void*)f_14597},
+{"f_14607:compiler_scm",(void*)f_14607},
+{"f_14493:compiler_scm",(void*)f_14493},
+{"f_14574:compiler_scm",(void*)f_14574},
+{"f_14581:compiler_scm",(void*)f_14581},
+{"f_14538:compiler_scm",(void*)f_14538},
+{"f_14541:compiler_scm",(void*)f_14541},
+{"f_14547:compiler_scm",(void*)f_14547},
+{"f_14496:compiler_scm",(void*)f_14496},
+{"f_14499:compiler_scm",(void*)f_14499},
+{"f_14434:compiler_scm",(void*)f_14434},
+{"f_14440:compiler_scm",(void*)f_14440},
+{"f_14455:compiler_scm",(void*)f_14455},
+{"f_14448:compiler_scm",(void*)f_14448},
+{"f_13740:compiler_scm",(void*)f_13740},
+{"f_13777:compiler_scm",(void*)f_13777},
+{"f_14390:compiler_scm",(void*)f_14390},
+{"f_14384:compiler_scm",(void*)f_14384},
+{"f_14348:compiler_scm",(void*)f_14348},
+{"f_14351:compiler_scm",(void*)f_14351},
+{"f_14286:compiler_scm",(void*)f_14286},
+{"f_14340:compiler_scm",(void*)f_14340},
+{"f_14289:compiler_scm",(void*)f_14289},
+{"f_14312:compiler_scm",(void*)f_14312},
+{"f_14292:compiler_scm",(void*)f_14292},
+{"f_14295:compiler_scm",(void*)f_14295},
+{"f_14298:compiler_scm",(void*)f_14298},
+{"f_14146:compiler_scm",(void*)f_14146},
+{"f_14265:compiler_scm",(void*)f_14265},
+{"f_14153:compiler_scm",(void*)f_14153},
+{"f_14233:compiler_scm",(void*)f_14233},
+{"f_14251:compiler_scm",(void*)f_14251},
+{"f_14241:compiler_scm",(void*)f_14241},
+{"f_14245:compiler_scm",(void*)f_14245},
+{"f_14156:compiler_scm",(void*)f_14156},
+{"f_14159:compiler_scm",(void*)f_14159},
+{"f_14218:compiler_scm",(void*)f_14218},
+{"f_14162:compiler_scm",(void*)f_14162},
+{"f_14165:compiler_scm",(void*)f_14165},
+{"f_14168:compiler_scm",(void*)f_14168},
+{"f_14200:compiler_scm",(void*)f_14200},
+{"f_14171:compiler_scm",(void*)f_14171},
+{"f_14080:compiler_scm",(void*)f_14080},
+{"f_14099:compiler_scm",(void*)f_14099},
+{"f_14114:compiler_scm",(void*)f_14114},
+{"f_14107:compiler_scm",(void*)f_14107},
+{"f_14084:compiler_scm",(void*)f_14084},
+{"f_14097:compiler_scm",(void*)f_14097},
+{"f_14088:compiler_scm",(void*)f_14088},
+{"f_14013:compiler_scm",(void*)f_14013},
+{"f_14018:compiler_scm",(void*)f_14018},
+{"f_14045:compiler_scm",(void*)f_14045},
+{"f_14048:compiler_scm",(void*)f_14048},
+{"f_14051:compiler_scm",(void*)f_14051},
+{"f_14036:compiler_scm",(void*)f_14036},
+{"f_13891:compiler_scm",(void*)f_13891},
+{"f_13976:compiler_scm",(void*)f_13976},
+{"f_13906:compiler_scm",(void*)f_13906},
+{"f_13957:compiler_scm",(void*)f_13957},
+{"f_13914:compiler_scm",(void*)f_13914},
+{"f_13933:compiler_scm",(void*)f_13933},
+{"f_13868:compiler_scm",(void*)f_13868},
+{"f_13871:compiler_scm",(void*)f_13871},
+{"f_13832:compiler_scm",(void*)f_13832},
+{"f_13789:compiler_scm",(void*)f_13789},
+{"f_13820:compiler_scm",(void*)f_13820},
+{"f_13718:compiler_scm",(void*)f_13718},
+{"f_13709:compiler_scm",(void*)f_13709},
+{"f_13700:compiler_scm",(void*)f_13700},
+{"f_13691:compiler_scm",(void*)f_13691},
+{"f_13682:compiler_scm",(void*)f_13682},
+{"f_13676:compiler_scm",(void*)f_13676},
+{"f_13670:compiler_scm",(void*)f_13670},
+{"f_12811:compiler_scm",(void*)f_12811},
+{"f_13632:compiler_scm",(void*)f_13632},
+{"f_13540:compiler_scm",(void*)f_13540},
+{"f_13546:compiler_scm",(void*)f_13546},
+{"f_13566:compiler_scm",(void*)f_13566},
+{"f_13584:compiler_scm",(void*)f_13584},
+{"f_13593:compiler_scm",(void*)f_13593},
+{"f_13626:compiler_scm",(void*)f_13626},
+{"f_13614:compiler_scm",(void*)f_13614},
+{"f_13560:compiler_scm",(void*)f_13560},
+{"f_13519:compiler_scm",(void*)f_13519},
+{"f_13525:compiler_scm",(void*)f_13525},
+{"f_13343:compiler_scm",(void*)f_13343},
+{"f_13347:compiler_scm",(void*)f_13347},
+{"f_13350:compiler_scm",(void*)f_13350},
+{"f_13429:compiler_scm",(void*)f_13429},
+{"f_13420:compiler_scm",(void*)f_13420},
+{"f_13416:compiler_scm",(void*)f_13416},
+{"f_13381:compiler_scm",(void*)f_13381},
+{"f_13387:compiler_scm",(void*)f_13387},
+{"f_13404:compiler_scm",(void*)f_13404},
+{"f_13400:compiler_scm",(void*)f_13400},
+{"f_13379:compiler_scm",(void*)f_13379},
+{"f_12871:compiler_scm",(void*)f_12871},
+{"f_12913:compiler_scm",(void*)f_12913},
+{"f_13254:compiler_scm",(void*)f_13254},
+{"f_13439:compiler_scm",(void*)f_13439},
+{"f_13442:compiler_scm",(void*)f_13442},
+{"f_13513:compiler_scm",(void*)f_13513},
+{"f_13504:compiler_scm",(void*)f_13504},
+{"f_13500:compiler_scm",(void*)f_13500},
+{"f_13488:compiler_scm",(void*)f_13488},
+{"f_13209:compiler_scm",(void*)f_13209},
+{"f_13245:compiler_scm",(void*)f_13245},
+{"f_13140:compiler_scm",(void*)f_13140},
+{"f_13149:compiler_scm",(void*)f_13149},
+{"f_13183:compiler_scm",(void*)f_13183},
+{"f_13179:compiler_scm",(void*)f_13179},
+{"f_13127:compiler_scm",(void*)f_13127},
+{"f_13050:compiler_scm",(void*)f_13050},
+{"f_13073:compiler_scm",(void*)f_13073},
+{"f_13094:compiler_scm",(void*)f_13094},
+{"f_12925:compiler_scm",(void*)f_12925},
+{"f_12928:compiler_scm",(void*)f_12928},
+{"f_13035:compiler_scm",(void*)f_13035},
+{"f_13026:compiler_scm",(void*)f_13026},
+{"f_13022:compiler_scm",(void*)f_13022},
+{"f_12981:compiler_scm",(void*)f_12981},
+{"f_12998:compiler_scm",(void*)f_12998},
+{"f_13002:compiler_scm",(void*)f_13002},
+{"f_12975:compiler_scm",(void*)f_12975},
+{"f_12929:compiler_scm",(void*)f_12929},
+{"f_12946:compiler_scm",(void*)f_12946},
+{"f_12814:compiler_scm",(void*)f_12814},
+{"f_12818:compiler_scm",(void*)f_12818},
+{"f_12848:compiler_scm",(void*)f_12848},
+{"f_12865:compiler_scm",(void*)f_12865},
+{"f_12842:compiler_scm",(void*)f_12842},
+{"f_12721:compiler_scm",(void*)f_12721},
+{"f_12753:compiler_scm",(void*)f_12753},
+{"f_12772:compiler_scm",(void*)f_12772},
+{"f_12795:compiler_scm",(void*)f_12795},
+{"f_12778:compiler_scm",(void*)f_12778},
+{"f_12724:compiler_scm",(void*)f_12724},
+{"f_12730:compiler_scm",(void*)f_12730},
+{"f_12740:compiler_scm",(void*)f_12740},
+{"f_12582:compiler_scm",(void*)f_12582},
+{"f_12586:compiler_scm",(void*)f_12586},
+{"f_12592:compiler_scm",(void*)f_12592},
+{"f_12595:compiler_scm",(void*)f_12595},
+{"f_12645:compiler_scm",(void*)f_12645},
+{"f_12674:compiler_scm",(void*)f_12674},
+{"f_12598:compiler_scm",(void*)f_12598},
+{"f_12608:compiler_scm",(void*)f_12608},
+{"f_12610:compiler_scm",(void*)f_12610},
+{"f_12639:compiler_scm",(void*)f_12639},
+{"f_12601:compiler_scm",(void*)f_12601},
+{"f_12483:compiler_scm",(void*)f_12483},
+{"f_12493:compiler_scm",(void*)f_12493},
+{"f_12543:compiler_scm",(void*)f_12543},
+{"f_12572:compiler_scm",(void*)f_12572},
+{"f_12496:compiler_scm",(void*)f_12496},
+{"f_12506:compiler_scm",(void*)f_12506},
+{"f_12508:compiler_scm",(void*)f_12508},
+{"f_12537:compiler_scm",(void*)f_12537},
+{"f_12499:compiler_scm",(void*)f_12499},
+{"f_12446:compiler_scm",(void*)f_12446},
+{"f_12472:compiler_scm",(void*)f_12472},
+{"f_12453:compiler_scm",(void*)f_12453},
+{"f_12202:compiler_scm",(void*)f_12202},
+{"f_12206:compiler_scm",(void*)f_12206},
+{"f_12209:compiler_scm",(void*)f_12209},
+{"f_12440:compiler_scm",(void*)f_12440},
+{"f_12212:compiler_scm",(void*)f_12212},
+{"f_12215:compiler_scm",(void*)f_12215},
+{"f_12218:compiler_scm",(void*)f_12218},
+{"f_12221:compiler_scm",(void*)f_12221},
+{"f_12224:compiler_scm",(void*)f_12224},
+{"f_12234:compiler_scm",(void*)f_12234},
+{"f_12353:compiler_scm",(void*)f_12353},
+{"f_12392:compiler_scm",(void*)f_12392},
+{"f_12395:compiler_scm",(void*)f_12395},
+{"f_12366:compiler_scm",(void*)f_12366},
+{"f_12237:compiler_scm",(void*)f_12237},
+{"f_12277:compiler_scm",(void*)f_12277},
+{"f_12280:compiler_scm",(void*)f_12280},
+{"f_12307:compiler_scm",(void*)f_12307},
+{"f_12303:compiler_scm",(void*)f_12303},
+{"f_12299:compiler_scm",(void*)f_12299},
+{"f_12270:compiler_scm",(void*)f_12270},
+{"f_12260:compiler_scm",(void*)f_12260},
+{"f_12248:compiler_scm",(void*)f_12248},
+{"f_12193:compiler_scm",(void*)f_12193},
+{"f_12184:compiler_scm",(void*)f_12184},
+{"f_12175:compiler_scm",(void*)f_12175},
+{"f_12166:compiler_scm",(void*)f_12166},
+{"f_12157:compiler_scm",(void*)f_12157},
+{"f_12148:compiler_scm",(void*)f_12148},
+{"f_12139:compiler_scm",(void*)f_12139},
+{"f_12130:compiler_scm",(void*)f_12130},
+{"f_12124:compiler_scm",(void*)f_12124},
+{"f_12118:compiler_scm",(void*)f_12118},
+{"f_10418:compiler_scm",(void*)f_10418},
+{"f_10485:compiler_scm",(void*)f_10485},
+{"f_10489:compiler_scm",(void*)f_10489},
+{"f_10492:compiler_scm",(void*)f_10492},
+{"f_12017:compiler_scm",(void*)f_12017},
+{"f_12032:compiler_scm",(void*)f_12032},
+{"f_12035:compiler_scm",(void*)f_12035},
+{"f_12076:compiler_scm",(void*)f_12076},
+{"f_11994:compiler_scm",(void*)f_11994},
+{"f_11959:compiler_scm",(void*)f_11959},
+{"f_11965:compiler_scm",(void*)f_11965},
+{"f_11931:compiler_scm",(void*)f_11931},
+{"f_11896:compiler_scm",(void*)f_11896},
+{"f_11902:compiler_scm",(void*)f_11902},
+{"f_11870:compiler_scm",(void*)f_11870},
+{"f_11835:compiler_scm",(void*)f_11835},
+{"f_11841:compiler_scm",(void*)f_11841},
+{"f_11707:compiler_scm",(void*)f_11707},
+{"f_11709:compiler_scm",(void*)f_11709},
+{"f_11760:compiler_scm",(void*)f_11760},
+{"f_11754:compiler_scm",(void*)f_11754},
+{"f_11750:compiler_scm",(void*)f_11750},
+{"f_11807:compiler_scm",(void*)f_11807},
+{"f_11703:compiler_scm",(void*)f_11703},
+{"f_11699:compiler_scm",(void*)f_11699},
+{"f_11682:compiler_scm",(void*)f_11682},
+{"f_11686:compiler_scm",(void*)f_11686},
+{"f_11654:compiler_scm",(void*)f_11654},
+{"f_11637:compiler_scm",(void*)f_11637},
+{"f_11602:compiler_scm",(void*)f_11602},
+{"f_11608:compiler_scm",(void*)f_11608},
+{"f_11540:compiler_scm",(void*)f_11540},
+{"f_11545:compiler_scm",(void*)f_11545},
+{"f_11555:compiler_scm",(void*)f_11555},
+{"f_11493:compiler_scm",(void*)f_11493},
+{"f_11505:compiler_scm",(void*)f_11505},
+{"f_11515:compiler_scm",(void*)f_11515},
+{"f_11223:compiler_scm",(void*)f_11223},
+{"f_11226:compiler_scm",(void*)f_11226},
+{"f_11443:compiler_scm",(void*)f_11443},
+{"f_11446:compiler_scm",(void*)f_11446},
+{"f_11432:compiler_scm",(void*)f_11432},
+{"f_11397:compiler_scm",(void*)f_11397},
+{"f_11403:compiler_scm",(void*)f_11403},
+{"f_11362:compiler_scm",(void*)f_11362},
+{"f_11366:compiler_scm",(void*)f_11366},
+{"f_11370:compiler_scm",(void*)f_11370},
+{"f_11337:compiler_scm",(void*)f_11337},
+{"f_11302:compiler_scm",(void*)f_11302},
+{"f_11308:compiler_scm",(void*)f_11308},
+{"f_11276:compiler_scm",(void*)f_11276},
+{"f_11272:compiler_scm",(void*)f_11272},
+{"f_11247:compiler_scm",(void*)f_11247},
+{"f_11243:compiler_scm",(void*)f_11243},
+{"f_11210:compiler_scm",(void*)f_11210},
+{"f_11175:compiler_scm",(void*)f_11175},
+{"f_11181:compiler_scm",(void*)f_11181},
+{"f_11122:compiler_scm",(void*)f_11122},
+{"f_11135:compiler_scm",(void*)f_11135},
+{"f_11133:compiler_scm",(void*)f_11133},
+{"f_11129:compiler_scm",(void*)f_11129},
+{"f_11105:compiler_scm",(void*)f_11105},
+{"f_11101:compiler_scm",(void*)f_11101},
+{"f_11080:compiler_scm",(void*)f_11080},
+{"f_11076:compiler_scm",(void*)f_11076},
+{"f_11052:compiler_scm",(void*)f_11052},
+{"f_11056:compiler_scm",(void*)f_11056},
+{"f_10961:compiler_scm",(void*)f_10961},
+{"f_11002:compiler_scm",(void*)f_11002},
+{"f_11008:compiler_scm",(void*)f_11008},
+{"f_10964:compiler_scm",(void*)f_10964},
+{"f_10969:compiler_scm",(void*)f_10969},
+{"f_10975:compiler_scm",(void*)f_10975},
+{"f_10952:compiler_scm",(void*)f_10952},
+{"f_10917:compiler_scm",(void*)f_10917},
+{"f_10923:compiler_scm",(void*)f_10923},
+{"f_10875:compiler_scm",(void*)f_10875},
+{"f_10915:compiler_scm",(void*)f_10915},
+{"f_10880:compiler_scm",(void*)f_10880},
+{"f_10886:compiler_scm",(void*)f_10886},
+{"f_10855:compiler_scm",(void*)f_10855},
+{"f_10820:compiler_scm",(void*)f_10820},
+{"f_10826:compiler_scm",(void*)f_10826},
+{"f_10805:compiler_scm",(void*)f_10805},
+{"f_10801:compiler_scm",(void*)f_10801},
+{"f_10717:compiler_scm",(void*)f_10717},
+{"f_10721:compiler_scm",(void*)f_10721},
+{"f_10692:compiler_scm",(void*)f_10692},
+{"f_10696:compiler_scm",(void*)f_10696},
+{"f_10700:compiler_scm",(void*)f_10700},
+{"f_10667:compiler_scm",(void*)f_10667},
+{"f_10663:compiler_scm",(void*)f_10663},
+{"f_10638:compiler_scm",(void*)f_10638},
+{"f_10634:compiler_scm",(void*)f_10634},
+{"f_10586:compiler_scm",(void*)f_10586},
+{"f_10589:compiler_scm",(void*)f_10589},
+{"f_10613:compiler_scm",(void*)f_10613},
+{"f_10592:compiler_scm",(void*)f_10592},
+{"f_10599:compiler_scm",(void*)f_10599},
+{"f_10595:compiler_scm",(void*)f_10595},
+{"f_10501:compiler_scm",(void*)f_10501},
+{"f_10504:compiler_scm",(void*)f_10504},
+{"f_10572:compiler_scm",(void*)f_10572},
+{"f_10566:compiler_scm",(void*)f_10566},
+{"f_10513:compiler_scm",(void*)f_10513},
+{"f_10522:compiler_scm",(void*)f_10522},
+{"f_10557:compiler_scm",(void*)f_10557},
+{"f_10560:compiler_scm",(void*)f_10560},
+{"f_10516:compiler_scm",(void*)f_10516},
+{"f_10520:compiler_scm",(void*)f_10520},
+{"f_10495:compiler_scm",(void*)f_10495},
+{"f_10475:compiler_scm",(void*)f_10475},
+{"f_10469:compiler_scm",(void*)f_10469},
+{"f_10421:compiler_scm",(void*)f_10421},
+{"f_10444:compiler_scm",(void*)f_10444},
+{"f_5298:compiler_scm",(void*)f_5298},
+{"f_10413:compiler_scm",(void*)f_10413},
+{"f_10375:compiler_scm",(void*)f_10375},
+{"f_10378:compiler_scm",(void*)f_10378},
+{"f_10397:compiler_scm",(void*)f_10397},
+{"f_10407:compiler_scm",(void*)f_10407},
+{"f_10393:compiler_scm",(void*)f_10393},
+{"f_10389:compiler_scm",(void*)f_10389},
+{"f_10328:compiler_scm",(void*)f_10328},
+{"f_10334:compiler_scm",(void*)f_10334},
+{"f_10368:compiler_scm",(void*)f_10368},
+{"f_10361:compiler_scm",(void*)f_10361},
+{"f_5774:compiler_scm",(void*)f_5774},
+{"f_10256:compiler_scm",(void*)f_10256},
+{"f_10268:compiler_scm",(void*)f_10268},
+{"f_10271:compiler_scm",(void*)f_10271},
+{"f_10298:compiler_scm",(void*)f_10298},
+{"f_10259:compiler_scm",(void*)f_10259},
+{"f_10262:compiler_scm",(void*)f_10262},
+{"f_5837:compiler_scm",(void*)f_5837},
+{"f_5840:compiler_scm",(void*)f_5840},
+{"f_10226:compiler_scm",(void*)f_10226},
+{"f_10229:compiler_scm",(void*)f_10229},
+{"f_10232:compiler_scm",(void*)f_10232},
+{"f_10235:compiler_scm",(void*)f_10235},
+{"f_10238:compiler_scm",(void*)f_10238},
+{"f_5843:compiler_scm",(void*)f_5843},
+{"f_5847:compiler_scm",(void*)f_5847},
+{"f_5850:compiler_scm",(void*)f_5850},
+{"f_5856:compiler_scm",(void*)f_5856},
+{"f_5868:compiler_scm",(void*)f_5868},
+{"f_5890:compiler_scm",(void*)f_5890},
+{"f_5957:compiler_scm",(void*)f_5957},
+{"f_6058:compiler_scm",(void*)f_6058},
+{"f_9984:compiler_scm",(void*)f_9984},
+{"f_10117:compiler_scm",(void*)f_10117},
+{"f_10078:compiler_scm",(void*)f_10078},
+{"f_10046:compiler_scm",(void*)f_10046},
+{"f_10000:compiler_scm",(void*)f_10000},
+{"f_9944:compiler_scm",(void*)f_9944},
+{"f_9948:compiler_scm",(void*)f_9948},
+{"f_9954:compiler_scm",(void*)f_9954},
+{"f_9968:compiler_scm",(void*)f_9968},
+{"f_9957:compiler_scm",(void*)f_9957},
+{"f_9633:compiler_scm",(void*)f_9633},
+{"f_9924:compiler_scm",(void*)f_9924},
+{"f_9652:compiler_scm",(void*)f_9652},
+{"f_9655:compiler_scm",(void*)f_9655},
+{"f_9666:compiler_scm",(void*)f_9666},
+{"f_9839:compiler_scm",(void*)f_9839},
+{"f_9883:compiler_scm",(void*)f_9883},
+{"f_9879:compiler_scm",(void*)f_9879},
+{"f_9875:compiler_scm",(void*)f_9875},
+{"f_9863:compiler_scm",(void*)f_9863},
+{"f_9698:compiler_scm",(void*)f_9698},
+{"f_9830:compiler_scm",(void*)f_9830},
+{"f_9794:compiler_scm",(void*)f_9794},
+{"f_9748:compiler_scm",(void*)f_9748},
+{"f_9722:compiler_scm",(void*)f_9722},
+{"f_9718:compiler_scm",(void*)f_9718},
+{"f_9706:compiler_scm",(void*)f_9706},
+{"f_9674:compiler_scm",(void*)f_9674},
+{"f_9662:compiler_scm",(void*)f_9662},
+{"f_9623:compiler_scm",(void*)f_9623},
+{"f_9574:compiler_scm",(void*)f_9574},
+{"f_9608:compiler_scm",(void*)f_9608},
+{"f_9601:compiler_scm",(void*)f_9601},
+{"f_9568:compiler_scm",(void*)f_9568},
+{"f_9564:compiler_scm",(void*)f_9564},
+{"f_9489:compiler_scm",(void*)f_9489},
+{"f_9507:compiler_scm",(void*)f_9507},
+{"f_9537:compiler_scm",(void*)f_9537},
+{"f_9543:compiler_scm",(void*)f_9543},
+{"f_9513:compiler_scm",(void*)f_9513},
+{"f_9520:compiler_scm",(void*)f_9520},
+{"f_9495:compiler_scm",(void*)f_9495},
+{"f_9501:compiler_scm",(void*)f_9501},
+{"f_9358:compiler_scm",(void*)f_9358},
+{"f_9361:compiler_scm",(void*)f_9361},
+{"f_9372:compiler_scm",(void*)f_9372},
+{"f_9382:compiler_scm",(void*)f_9382},
+{"f_9385:compiler_scm",(void*)f_9385},
+{"f_9388:compiler_scm",(void*)f_9388},
+{"f_9393:compiler_scm",(void*)f_9393},
+{"f_9418:compiler_scm",(void*)f_9418},
+{"f_9423:compiler_scm",(void*)f_9423},
+{"f_9448:compiler_scm",(void*)f_9448},
+{"f_9375:compiler_scm",(void*)f_9375},
+{"f_9343:compiler_scm",(void*)f_9343},
+{"f_9339:compiler_scm",(void*)f_9339},
+{"f_9334:compiler_scm",(void*)f_9334},
+{"f_9178:compiler_scm",(void*)f_9178},
+{"f_9181:compiler_scm",(void*)f_9181},
+{"f_9184:compiler_scm",(void*)f_9184},
+{"f_9190:compiler_scm",(void*)f_9190},
+{"f_9301:compiler_scm",(void*)f_9301},
+{"f_9262:compiler_scm",(void*)f_9262},
+{"f_9229:compiler_scm",(void*)f_9229},
+{"f_9237:compiler_scm",(void*)f_9237},
+{"f_9225:compiler_scm",(void*)f_9225},
+{"f_9205:compiler_scm",(void*)f_9205},
+{"f_9122:compiler_scm",(void*)f_9122},
+{"f_9131:compiler_scm",(void*)f_9131},
+{"f_9166:compiler_scm",(void*)f_9166},
+{"f_9162:compiler_scm",(void*)f_9162},
+{"f_9134:compiler_scm",(void*)f_9134},
+{"f_9154:compiler_scm",(void*)f_9154},
+{"f_9146:compiler_scm",(void*)f_9146},
+{"f_8958:compiler_scm",(void*)f_8958},
+{"f_9106:compiler_scm",(void*)f_9106},
+{"f_8970:compiler_scm",(void*)f_8970},
+{"f_8973:compiler_scm",(void*)f_8973},
+{"f_8976:compiler_scm",(void*)f_8976},
+{"f_8981:compiler_scm",(void*)f_8981},
+{"f_9006:compiler_scm",(void*)f_9006},
+{"f_9011:compiler_scm",(void*)f_9011},
+{"f_9036:compiler_scm",(void*)f_9036},
+{"f_9039:compiler_scm",(void*)f_9039},
+{"f_9042:compiler_scm",(void*)f_9042},
+{"f_9073:compiler_scm",(void*)f_9073},
+{"f_8901:compiler_scm",(void*)f_8901},
+{"f_8904:compiler_scm",(void*)f_8904},
+{"f_8907:compiler_scm",(void*)f_8907},
+{"f_8919:compiler_scm",(void*)f_8919},
+{"f_8892:compiler_scm",(void*)f_8892},
+{"f_8879:compiler_scm",(void*)f_8879},
+{"f_8866:compiler_scm",(void*)f_8866},
+{"f_8853:compiler_scm",(void*)f_8853},
+{"f_8840:compiler_scm",(void*)f_8840},
+{"f_8773:compiler_scm",(void*)f_8773},
+{"f_8792:compiler_scm",(void*)f_8792},
+{"f_8819:compiler_scm",(void*)f_8819},
+{"f_8823:compiler_scm",(void*)f_8823},
+{"f_8812:compiler_scm",(void*)f_8812},
+{"f_8786:compiler_scm",(void*)f_8786},
+{"f_8757:compiler_scm",(void*)f_8757},
+{"f_8742:compiler_scm",(void*)f_8742},
+{"f_8711:compiler_scm",(void*)f_8711},
+{"f_8719:compiler_scm",(void*)f_8719},
+{"f_8682:compiler_scm",(void*)f_8682},
+{"f_8649:compiler_scm",(void*)f_8649},
+{"f_8635:compiler_scm",(void*)f_8635},
+{"f_8643:compiler_scm",(void*)f_8643},
+{"f_8639:compiler_scm",(void*)f_8639},
+{"f_8602:compiler_scm",(void*)f_8602},
+{"f_8610:compiler_scm",(void*)f_8610},
+{"f_8606:compiler_scm",(void*)f_8606},
+{"f_8269:compiler_scm",(void*)f_8269},
+{"f_8275:compiler_scm",(void*)f_8275},
+{"f_8278:compiler_scm",(void*)f_8278},
+{"f_8284:compiler_scm",(void*)f_8284},
+{"f_8510:compiler_scm",(void*)f_8510},
+{"f_8513:compiler_scm",(void*)f_8513},
+{"f_8521:compiler_scm",(void*)f_8521},
+{"f_8546:compiler_scm",(void*)f_8546},
+{"f_8551:compiler_scm",(void*)f_8551},
+{"f_8439:compiler_scm",(void*)f_8439},
+{"f_8478:compiler_scm",(void*)f_8478},
+{"f_8494:compiler_scm",(void*)f_8494},
+{"f_8497:compiler_scm",(void*)f_8497},
+{"f_8500:compiler_scm",(void*)f_8500},
+{"f_8491:compiler_scm",(void*)f_8491},
+{"f_8481:compiler_scm",(void*)f_8481},
+{"f_8442:compiler_scm",(void*)f_8442},
+{"f_8472:compiler_scm",(void*)f_8472},
+{"f_8445:compiler_scm",(void*)f_8445},
+{"f_8448:compiler_scm",(void*)f_8448},
+{"f_8463:compiler_scm",(void*)f_8463},
+{"f_8367:compiler_scm",(void*)f_8367},
+{"f_8374:compiler_scm",(void*)f_8374},
+{"f_8433:compiler_scm",(void*)f_8433},
+{"f_8421:compiler_scm",(void*)f_8421},
+{"f_8291:compiler_scm",(void*)f_8291},
+{"f_8298:compiler_scm",(void*)f_8298},
+{"f_8357:compiler_scm",(void*)f_8357},
+{"f_8337:compiler_scm",(void*)f_8337},
+{"f_8224:compiler_scm",(void*)f_8224},
+{"f_8253:compiler_scm",(void*)f_8253},
+{"f_8141:compiler_scm",(void*)f_8141},
+{"f_8175:compiler_scm",(void*)f_8175},
+{"f_8208:compiler_scm",(void*)f_8208},
+{"f_8188:compiler_scm",(void*)f_8188},
+{"f_8173:compiler_scm",(void*)f_8173},
+{"f_8144:compiler_scm",(void*)f_8144},
+{"f_8165:compiler_scm",(void*)f_8165},
+{"f_8169:compiler_scm",(void*)f_8169},
+{"f_8147:compiler_scm",(void*)f_8147},
+{"f_8150:compiler_scm",(void*)f_8150},
+{"f_8122:compiler_scm",(void*)f_8122},
+{"f_7628:compiler_scm",(void*)f_7628},
+{"f_8005:compiler_scm",(void*)f_8005},
+{"f_8007:compiler_scm",(void*)f_8007},
+{"f_8085:compiler_scm",(void*)f_8085},
+{"f_8034:compiler_scm",(void*)f_8034},
+{"f_8058:compiler_scm",(void*)f_8058},
+{"f_8047:compiler_scm",(void*)f_8047},
+{"f_7634:compiler_scm",(void*)f_7634},
+{"f_7995:compiler_scm",(void*)f_7995},
+{"f_7637:compiler_scm",(void*)f_7637},
+{"f_7911:compiler_scm",(void*)f_7911},
+{"f_7923:compiler_scm",(void*)f_7923},
+{"f_7944:compiler_scm",(void*)f_7944},
+{"f_7950:compiler_scm",(void*)f_7950},
+{"f_7988:compiler_scm",(void*)f_7988},
+{"f_7977:compiler_scm",(void*)f_7977},
+{"f_7985:compiler_scm",(void*)f_7985},
+{"f_7942:compiler_scm",(void*)f_7942},
+{"f_7924:compiler_scm",(void*)f_7924},
+{"f_7928:compiler_scm",(void*)f_7928},
+{"f_7931:compiler_scm",(void*)f_7931},
+{"f_7935:compiler_scm",(void*)f_7935},
+{"f_7938:compiler_scm",(void*)f_7938},
+{"f_7919:compiler_scm",(void*)f_7919},
+{"f_7642:compiler_scm",(void*)f_7642},
+{"f_7646:compiler_scm",(void*)f_7646},
+{"f_7674:compiler_scm",(void*)f_7674},
+{"f_7684:compiler_scm",(void*)f_7684},
+{"f_7905:compiler_scm",(void*)f_7905},
+{"f_7901:compiler_scm",(void*)f_7901},
+{"f_7848:compiler_scm",(void*)f_7848},
+{"f_7851:compiler_scm",(void*)f_7851},
+{"f_7795:compiler_scm",(void*)f_7795},
+{"f_7818:compiler_scm",(void*)f_7818},
+{"f_7810:compiler_scm",(void*)f_7810},
+{"f_7741:compiler_scm",(void*)f_7741},
+{"f_7766:compiler_scm",(void*)f_7766},
+{"f_7782:compiler_scm",(void*)f_7782},
+{"f_7788:compiler_scm",(void*)f_7788},
+{"f_7772:compiler_scm",(void*)f_7772},
+{"f_7780:compiler_scm",(void*)f_7780},
+{"f_7747:compiler_scm",(void*)f_7747},
+{"f_7753:compiler_scm",(void*)f_7753},
+{"f_7764:compiler_scm",(void*)f_7764},
+{"f_7757:compiler_scm",(void*)f_7757},
+{"f_7694:compiler_scm",(void*)f_7694},
+{"f_7697:compiler_scm",(void*)f_7697},
+{"f_7725:compiler_scm",(void*)f_7725},
+{"f_7736:compiler_scm",(void*)f_7736},
+{"f_7729:compiler_scm",(void*)f_7729},
+{"f_7704:compiler_scm",(void*)f_7704},
+{"f_5769:compiler_scm",(void*)f_5769},
+{"f_5686:compiler_scm",(void*)f_5686},
+{"f_5762:compiler_scm",(void*)f_5762},
+{"f_5689:compiler_scm",(void*)f_5689},
+{"f_5755:compiler_scm",(void*)f_5755},
+{"f_5692:compiler_scm",(void*)f_5692},
+{"f_5707:compiler_scm",(void*)f_5707},
+{"f_5712:compiler_scm",(void*)f_5712},
+{"f_5749:compiler_scm",(void*)f_5749},
+{"f_5716:compiler_scm",(void*)f_5716},
+{"f_5724:compiler_scm",(void*)f_5724},
+{"f_5734:compiler_scm",(void*)f_5734},
+{"f_5719:compiler_scm",(void*)f_5719},
+{"f20258:compiler_scm",(void*)f20258},
+{"f_7708:compiler_scm",(void*)f_7708},
+{"f_7715:compiler_scm",(void*)f_7715},
+{"f_7647:compiler_scm",(void*)f_7647},
+{"f_7651:compiler_scm",(void*)f_7651},
+{"f_7654:compiler_scm",(void*)f_7654},
+{"f_7658:compiler_scm",(void*)f_7658},
+{"f_7661:compiler_scm",(void*)f_7661},
+{"f_7665:compiler_scm",(void*)f_7665},
+{"f_7668:compiler_scm",(void*)f_7668},
+{"f_7551:compiler_scm",(void*)f_7551},
+{"f_7615:compiler_scm",(void*)f_7615},
+{"f_7578:compiler_scm",(void*)f_7578},
+{"f_7582:compiler_scm",(void*)f_7582},
+{"f_7585:compiler_scm",(void*)f_7585},
+{"f_7604:compiler_scm",(void*)f_7604},
+{"f_7600:compiler_scm",(void*)f_7600},
+{"f_7596:compiler_scm",(void*)f_7596},
+{"f_7444:compiler_scm",(void*)f_7444},
+{"f_7505:compiler_scm",(void*)f_7505},
+{"f_7511:compiler_scm",(void*)f_7511},
+{"f_7534:compiler_scm",(void*)f_7534},
+{"f_7491:compiler_scm",(void*)f_7491},
+{"f_7499:compiler_scm",(void*)f_7499},
+{"f_7449:compiler_scm",(void*)f_7449},
+{"f_7455:compiler_scm",(void*)f_7455},
+{"f_7478:compiler_scm",(void*)f_7478},
+{"f_7354:compiler_scm",(void*)f_7354},
+{"f_7435:compiler_scm",(void*)f_7435},
+{"f_7427:compiler_scm",(void*)f_7427},
+{"f_7431:compiler_scm",(void*)f_7431},
+{"f_7357:compiler_scm",(void*)f_7357},
+{"f_7199:compiler_scm",(void*)f_7199},
+{"f_7202:compiler_scm",(void*)f_7202},
+{"f_7296:compiler_scm",(void*)f_7296},
+{"f_7300:compiler_scm",(void*)f_7300},
+{"f_7205:compiler_scm",(void*)f_7205},
+{"f_7208:compiler_scm",(void*)f_7208},
+{"f_7282:compiler_scm",(void*)f_7282},
+{"f_7211:compiler_scm",(void*)f_7211},
+{"f_7270:compiler_scm",(void*)f_7270},
+{"f_7278:compiler_scm",(void*)f_7278},
+{"f_7274:compiler_scm",(void*)f_7274},
+{"f_7214:compiler_scm",(void*)f_7214},
+{"f_7224:compiler_scm",(void*)f_7224},
+{"f_7075:compiler_scm",(void*)f_7075},
+{"f_7133:compiler_scm",(void*)f_7133},
+{"f_7183:compiler_scm",(void*)f_7183},
+{"f_7160:compiler_scm",(void*)f_7160},
+{"f_7176:compiler_scm",(void*)f_7176},
+{"f_7172:compiler_scm",(void*)f_7172},
+{"f_7078:compiler_scm",(void*)f_7078},
+{"f_7081:compiler_scm",(void*)f_7081},
+{"f_7097:compiler_scm",(void*)f_7097},
+{"f_7105:compiler_scm",(void*)f_7105},
+{"f_7084:compiler_scm",(void*)f_7084},
+{"f_7091:compiler_scm",(void*)f_7091},
+{"f_6988:compiler_scm",(void*)f_6988},
+{"f_7012:compiler_scm",(void*)f_7012},
+{"f_7062:compiler_scm",(void*)f_7062},
+{"f_7039:compiler_scm",(void*)f_7039},
+{"f_7055:compiler_scm",(void*)f_7055},
+{"f_7051:compiler_scm",(void*)f_7051},
+{"f_7006:compiler_scm",(void*)f_7006},
+{"f_6991:compiler_scm",(void*)f_6991},
+{"f_6998:compiler_scm",(void*)f_6998},
+{"f_6659:compiler_scm",(void*)f_6659},
+{"f_6965:compiler_scm",(void*)f_6965},
+{"f_6976:compiler_scm",(void*)f_6976},
+{"f_6970:compiler_scm",(void*)f_6970},
+{"f_6668:compiler_scm",(void*)f_6668},
+{"f_6673:compiler_scm",(void*)f_6673},
+{"f_6929:compiler_scm",(void*)f_6929},
+{"f_6958:compiler_scm",(void*)f_6958},
+{"f_6677:compiler_scm",(void*)f_6677},
+{"f_6880:compiler_scm",(void*)f_6880},
+{"f_6913:compiler_scm",(void*)f_6913},
+{"f_6893:compiler_scm",(void*)f_6893},
+{"f_6878:compiler_scm",(void*)f_6878},
+{"f_6680:compiler_scm",(void*)f_6680},
+{"f_6683:compiler_scm",(void*)f_6683},
+{"f_6874:compiler_scm",(void*)f_6874},
+{"f_6686:compiler_scm",(void*)f_6686},
+{"f_6870:compiler_scm",(void*)f_6870},
+{"f_6689:compiler_scm",(void*)f_6689},
+{"f_6695:compiler_scm",(void*)f_6695},
+{"f_6845:compiler_scm",(void*)f_6845},
+{"f_6818:compiler_scm",(void*)f_6818},
+{"f_6710:compiler_scm",(void*)f_6710},
+{"f_6797:compiler_scm",(void*)f_6797},
+{"f_6741:compiler_scm",(void*)f_6741},
+{"f_6775:compiler_scm",(void*)f_6775},
+{"f_6719:compiler_scm",(void*)f_6719},
+{"f_6502:compiler_scm",(void*)f_6502},
+{"f_6605:compiler_scm",(void*)f_6605},
+{"f_6523:compiler_scm",(void*)f_6523},
+{"f_6549:compiler_scm",(void*)f_6549},
+{"f_6531:compiler_scm",(void*)f_6531},
+{"f_6547:compiler_scm",(void*)f_6547},
+{"f_6527:compiler_scm",(void*)f_6527},
+{"f_6290:compiler_scm",(void*)f_6290},
+{"f_6296:compiler_scm",(void*)f_6296},
+{"f_6457:compiler_scm",(void*)f_6457},
+{"f_6486:compiler_scm",(void*)f_6486},
+{"f_6299:compiler_scm",(void*)f_6299},
+{"f_6408:compiler_scm",(void*)f_6408},
+{"f_6441:compiler_scm",(void*)f_6441},
+{"f_6421:compiler_scm",(void*)f_6421},
+{"f_6406:compiler_scm",(void*)f_6406},
+{"f_6302:compiler_scm",(void*)f_6302},
+{"f_6305:compiler_scm",(void*)f_6305},
+{"f_6338:compiler_scm",(void*)f_6338},
+{"f_6388:compiler_scm",(void*)f_6388},
+{"f_6351:compiler_scm",(void*)f_6351},
+{"f_6369:compiler_scm",(void*)f_6369},
+{"f_6377:compiler_scm",(void*)f_6377},
+{"f_6316:compiler_scm",(void*)f_6316},
+{"f_6328:compiler_scm",(void*)f_6328},
+{"f_6332:compiler_scm",(void*)f_6332},
+{"f_6324:compiler_scm",(void*)f_6324},
+{"f_6209:compiler_scm",(void*)f_6209},
+{"f_6230:compiler_scm",(void*)f_6230},
+{"f_6268:compiler_scm",(void*)f_6268},
+{"f_6278:compiler_scm",(void*)f_6278},
+{"f_6256:compiler_scm",(void*)f_6256},
+{"f_6234:compiler_scm",(void*)f_6234},
+{"f_6249:compiler_scm",(void*)f_6249},
+{"f_6224:compiler_scm",(void*)f_6224},
+{"f_6203:compiler_scm",(void*)f_6203},
+{"f_6154:compiler_scm",(void*)f_6154},
+{"f_6183:compiler_scm",(void*)f_6183},
+{"f_6133:compiler_scm",(void*)f_6133},
+{"f_6136:compiler_scm",(void*)f_6136},
+{"f_6147:compiler_scm",(void*)f_6147},
+{"f_6141:compiler_scm",(void*)f_6141},
+{"f_6139:compiler_scm",(void*)f_6139},
+{"f_6108:compiler_scm",(void*)f_6108},
+{"f_6116:compiler_scm",(void*)f_6116},
+{"f_6079:compiler_scm",(void*)f_6079},
+{"f_6091:compiler_scm",(void*)f_6091},
+{"f_6087:compiler_scm",(void*)f_6087},
+{"f_6000:compiler_scm",(void*)f_6000},
+{"f_6012:compiler_scm",(void*)f_6012},
+{"f_6016:compiler_scm",(void*)f_6016},
+{"f_6021:compiler_scm",(void*)f_6021},
+{"f_6046:compiler_scm",(void*)f_6046},
+{"f_6049:compiler_scm",(void*)f_6049},
+{"f_5960:compiler_scm",(void*)f_5960},
+{"f_5971:compiler_scm",(void*)f_5971},
+{"f_5899:compiler_scm",(void*)f_5899},
+{"f_5910:compiler_scm",(void*)f_5910},
+{"f_5918:compiler_scm",(void*)f_5918},
+{"f_5926:compiler_scm",(void*)f_5926},
+{"f_5872:compiler_scm",(void*)f_5872},
+{"f_5818:compiler_scm",(void*)f_5818},
+{"f_5790:compiler_scm",(void*)f_5790},
+{"f_5784:compiler_scm",(void*)f_5784},
+{"f_5644:compiler_scm",(void*)f_5644},
+{"f_5648:compiler_scm",(void*)f_5648},
+{"f_5669:compiler_scm",(void*)f_5669},
+{"f_5680:compiler_scm",(void*)f_5680},
+{"f_5673:compiler_scm",(void*)f_5673},
+{"f_5649:compiler_scm",(void*)f_5649},
+{"f_5653:compiler_scm",(void*)f_5653},
+{"f_5656:compiler_scm",(void*)f_5656},
+{"f_5660:compiler_scm",(void*)f_5660},
+{"f_5663:compiler_scm",(void*)f_5663},
+{"f_5474:compiler_scm",(void*)f_5474},
+{"f_5478:compiler_scm",(void*)f_5478},
+{"f_5490:compiler_scm",(void*)f_5490},
+{"f_5508:compiler_scm",(void*)f_5508},
+{"f_5616:compiler_scm",(void*)f_5616},
+{"f_5573:compiler_scm",(void*)f_5573},
+{"f_5580:compiler_scm",(void*)f_5580},
+{"f_5594:compiler_scm",(void*)f_5594},
+{"f_5590:compiler_scm",(void*)f_5590},
+{"f_5526:compiler_scm",(void*)f_5526},
+{"f_5533:compiler_scm",(void*)f_5533},
+{"f_5547:compiler_scm",(void*)f_5547},
+{"f_5543:compiler_scm",(void*)f_5543},
+{"f_5512:compiler_scm",(void*)f_5512},
+{"f_5494:compiler_scm",(void*)f_5494},
+{"f_5428:compiler_scm",(void*)f_5428},
+{"f_5460:compiler_scm",(void*)f_5460},
+{"f_5368:compiler_scm",(void*)f_5368},
+{"f_5374:compiler_scm",(void*)f_5374},
+{"f_5389:compiler_scm",(void*)f_5389},
+{"f_5355:compiler_scm",(void*)f_5355},
+{"f_5359:compiler_scm",(void*)f_5359},
+{"f_5366:compiler_scm",(void*)f_5366},
+{"f_5362:compiler_scm",(void*)f_5362},
+{"f_5340:compiler_scm",(void*)f_5340},
+{"f_5344:compiler_scm",(void*)f_5344},
+{"f_5350:compiler_scm",(void*)f_5350},
+{"f_5301:compiler_scm",(void*)f_5301},
+{"f_5338:compiler_scm",(void*)f_5338},
+{"f_5334:compiler_scm",(void*)f_5334},
+{"f_5314:compiler_scm",(void*)f_5314},
+{"f_5237:compiler_scm",(void*)f_5237},
+{"f_5296:compiler_scm",(void*)f_5296},
+{"f_5241:compiler_scm",(void*)f_5241},
+{"f_5289:compiler_scm",(void*)f_5289},
+{"f_5244:compiler_scm",(void*)f_5244},
+{"f_5282:compiler_scm",(void*)f_5282},
+{"f_5247:compiler_scm",(void*)f_5247},
+{"f_5251:compiler_scm",(void*)f_5251},
+{"f_5255:compiler_scm",(void*)f_5255},
+{"f_5275:compiler_scm",(void*)f_5275},
+{"f_5258:compiler_scm",(void*)f_5258},
+{"f_5268:compiler_scm",(void*)f_5268},
+{"f_5142:compiler_scm",(void*)f_5142},
+{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
new file mode 100644
index 00000000..3dd072fe
--- /dev/null
+++ b/bootstrap/data-structures.c
@@ -0,0 +1,7727 @@
+/* Generated from data-structures.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: data-structures.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -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[117];
+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,56,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,54,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,57,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,53,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,55,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,57,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,55,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,51,41,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,17),40,102,95,49,52,50,56,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,57,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,52,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,55,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,54,49,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,50,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,51,48,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,54,48,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,56,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,57,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,49,49,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,50,48,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,52,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,51,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_1291)
+static void C_ccall f_1291(C_word c,C_word t0,C_word t1) 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_word t3) C_noret;
+C_noret_decl(f_4749)
+static void C_ccall f_4749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4768)
+static C_word C_fcall f_4768(C_word t0);
+C_noret_decl(f_4710)
+static void C_ccall f_4710(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4656)
+static void C_ccall f_4656(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4675)
+static void C_fcall f_4675(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4685)
+static void C_ccall f_4685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4667)
+static void C_ccall f_4667(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4647)
+static void C_ccall f_4647(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4611)
+static void C_ccall f_4611(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4621)
+static void C_ccall f_4621(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4579)
+static void C_ccall f_4579(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4558)
+static void C_ccall f_4558(C_word c,C_word t0,C_word t1,C_word t2) 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_4537)
+static void C_ccall f_4537(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4547)
+static void C_ccall f_4547(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4524)
+static void C_ccall f_4524(C_word c,C_word t0,C_word t1,C_word t2) 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_noret;
+C_noret_decl(f_4512)
+static void C_ccall f_4512(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_4507)
+static void C_ccall f_4507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4433)
+static void C_fcall f_4433(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4447)
+static void C_fcall f_4447(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4457)
+static void C_ccall f_4457(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_word t3) C_noret;
+C_noret_decl(f_4393)
+static void C_fcall f_4393(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4416)
+static void C_ccall f_4416(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4401)
+static void C_fcall f_4401(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4316)
+static void C_ccall f_4316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4383)
+static void C_ccall f_4383(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4387)
+static void C_ccall f_4387(C_word c,C_word t0,C_word t1) 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_4328)
+static void C_fcall f_4328(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4368)
+static void C_ccall f_4368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4336)
+static void C_fcall f_4336(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4340)
+static void C_ccall f_4340(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4322)
+static void C_ccall f_4322(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_word t3) C_noret;
+C_noret_decl(f_4261)
+static void C_ccall f_4261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4270)
+static void C_fcall f_4270(C_word t0,C_word t1,C_word t2) 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_4278)
+static void C_fcall f_4278(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_4264)
+static void C_ccall f_4264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4222)
+static void C_fcall f_4222(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4228)
+static void C_fcall f_4228(C_word t0,C_word t1,C_word t2) 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_4241)
+static void C_ccall f_4241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4175)
+static void C_fcall f_4175(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4181)
+static void C_fcall f_4181(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4220)
+static void C_ccall f_4220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4202)
+static void C_ccall f_4202(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_4164)
+static void C_ccall f_4164(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_4153)
+static void C_ccall f_4153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4006)
+static void C_ccall f_4006(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4096)
+static void C_ccall f_4096(C_word c,C_word t0,C_word t1) 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_4105)
+static void C_fcall f_4105(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4009)
+static void C_fcall f_4009(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4060)
+static void C_ccall f_4060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4019)
+static void C_ccall f_4019(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_4028)
+static void C_ccall f_4028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3874)
+static void C_ccall f_3874(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3956)
+static void C_ccall f_3956(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_3959)
+static void C_ccall f_3959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3877)
+static void C_fcall f_3877(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3884)
+static void C_ccall f_3884(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3775)
+static void C_ccall f_3775(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3809)
+static void C_fcall f_3809(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) 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_3864)
+static void C_ccall f_3864(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3836)
+static void C_ccall f_3836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3666)
+static void C_ccall f_3666(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3741)
+static void C_fcall f_3741(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3769)
+static void C_ccall f_3769(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3693)
+static void C_fcall f_3693(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3703)
+static void C_ccall f_3703(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_word t2,...) C_noret;
+C_noret_decl(f_3614)
+static void C_ccall f_3614r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3618)
+static void C_ccall f_3618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3550)
+static void C_ccall f_3550(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3565)
+static void C_fcall f_3565(C_word t0,C_word t1,C_word t2,C_word t3) 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_3600)
+static void C_ccall f_3600(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_3428)
+static void C_ccall f_3428(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3440)
+static void C_fcall f_3440(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_3473)
+static void C_fcall f_3473(C_word t0,C_word t1,C_word t2) 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_3512)
+static void C_fcall f_3512(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3468)
+static void C_ccall f_3468(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3454)
+static void C_ccall f_3454(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_word t3,...) C_noret;
+C_noret_decl(f_3226)
+static void C_ccall f_3226r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_3420)
+static void C_ccall f_3420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3403)
+static void C_ccall f_3403(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3263)
+static void C_ccall f_3263(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_noret;
+C_noret_decl(f_3278)
+static void C_ccall f_3278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3283)
+static void C_fcall f_3283(C_word t0,C_word t1,C_word t2,C_word t3) 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(f_3229)
+static void C_fcall f_3229(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3234)
+static void C_ccall f_3234(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3240)
+static C_word C_fcall f_3240(C_word t0,C_word t1);
+C_noret_decl(f_3111)
+static void C_ccall f_3111(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_3111)
+static void C_ccall f_3111r(C_word t0,C_word t1,C_word t2,C_word t4) 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_3129)
+static void C_fcall f_3129(C_word t0,C_word t1,C_word t2,C_word t3) 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_3144)
+static C_word C_fcall f_3144(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_2976)
+static void C_ccall f_2976(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2976)
+static void C_ccall f_2976r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3017)
+static void C_fcall f_3017(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_3044)
+static void C_fcall f_3044(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3083)
+static void C_ccall f_3083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3027)
+static void C_ccall f_3027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2997)
+static void C_fcall f_2997(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2896)
+static void C_ccall f_2896(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2896)
+static void C_ccall f_2896r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2913)
+static void C_fcall f_2913(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2908)
+static void C_fcall f_2908(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2903)
+static void C_fcall f_2903(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2898)
+static void C_fcall f_2898(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2859)
+static void C_ccall f_2859(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_2869)
+static void C_fcall f_2869(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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2779)
+static void C_ccall f_2779r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2796)
+static void C_fcall f_2796(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2791)
+static void C_fcall f_2791(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2786)
+static void C_fcall f_2786(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2781)
+static void C_fcall f_2781(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2742)
+static void C_ccall f_2742(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_2752)
+static void C_fcall f_2752(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2711)
+static void C_ccall f_2711(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2680)
+static void C_ccall f_2680(C_word c,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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2652)
+static void C_ccall f_2652r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) 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_2624)
+static void C_ccall f_2624(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2624)
+static void C_ccall f_2624r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) 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_2615)
+static void C_ccall f_2615(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2621)
+static void C_ccall f_2621(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2606)
+static void C_ccall f_2606(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2612)
+static void C_ccall f_2612(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2559)
+static void C_fcall f_2559(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_2580)
+static void C_fcall f_2580(C_word t0,C_word t1,C_word t2,C_word t3) 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_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_2524)
+static void C_fcall f_2524(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2553)
+static void C_ccall f_2553(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_2469)
+static void C_ccall f_2469(C_word c,C_word t0,C_word t1,C_word t2) 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_2392)
+static void C_ccall f_2392(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2395)
+static void C_fcall f_2395(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2411)
+static void C_ccall f_2411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2420)
+static void C_fcall f_2420(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2342)
+static void C_ccall f_2342(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2342)
+static void C_ccall f_2342r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2354)
+static void C_fcall f_2354(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2373)
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2218)
+static void C_ccall f_2218(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2218)
+static void C_ccall f_2218r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2294)
+static void C_fcall f_2294(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2289)
+static void C_fcall f_2289(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2220)
+static void C_fcall f_2220(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_noret;
+C_noret_decl(f_2255)
+static void C_fcall f_2255(C_word t0,C_word t1,C_word t2) 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_2224)
+static void C_fcall f_2224(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_2119)
+static void C_ccall f_2119(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_2119)
+static void C_ccall f_2119r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_2123)
+static void C_ccall f_2123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2158)
+static void C_ccall f_2158(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2164)
+static void C_fcall f_2164(C_word t0,C_word t1,C_word t2) 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_2126)
+static void C_fcall f_2126(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2129)
+static void C_ccall f_2129(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_2075)
+static void C_fcall f_2075(C_word t0,C_word t1,C_word t2) 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_2102)
+static void C_fcall f_2102(C_word t0,C_word t1,C_word t2) 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_2059)
+static void C_ccall f_2059(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2061)
+static void C_ccall f_2061(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2020)
+static void C_ccall f_2020(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2022)
+static void C_fcall f_2022(C_word t0,C_word t1,C_word t2) 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_1929)
+static void C_ccall f_1929(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1938)
+static void C_fcall f_1938(C_word t0,C_word t1,C_word t2,C_word t3) 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_1870)
+static void C_ccall f_1870(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1870)
+static void C_ccall f_1870r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1882)
+static void C_fcall f_1882(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1917)
+static void C_ccall f_1917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1785)
+static void C_ccall f_1785(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1792)
+static void C_ccall f_1792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1800)
+static void C_fcall f_1800(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1821)
+static void C_fcall f_1821(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1835)
+static void C_ccall f_1835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1839)
+static void C_ccall f_1839(C_word c,C_word t0,C_word t1) 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_1744)
+static void C_ccall f_1744r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1750)
+static void C_fcall f_1750(C_word t0,C_word t1,C_word t2,C_word t3) 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_1776)
+static void C_ccall f_1776(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_word t2) C_noret;
+C_noret_decl(f_1721)
+static void C_fcall f_1721(C_word t0,C_word t1,C_word t2) 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_1679)
+static void C_ccall f_1679(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_1710)
+static void C_ccall f_1710(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_noret;
+C_noret_decl(f_1663)
+static C_word C_fcall f_1663(C_word t0,C_word t1);
+C_noret_decl(f_1648)
+static void C_ccall f_1648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1622)
+static void C_ccall f_1622(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1622)
+static void C_ccall f_1622r(C_word t0,C_word t1,C_word t2,C_word t4) 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_1630)
+static void C_ccall f_1630(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1630)
+static void C_ccall f_1630r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1646)
+static void C_ccall f_1646(C_word c,C_word t0,C_word t1) 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_1638)
+static void C_ccall f_1638(C_word c,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_word t2,...) C_noret;
+C_noret_decl(f_1607)
+static void C_ccall f_1607r(C_word t0,C_word t1,C_word t2,C_word t4) 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_1612)
+static void C_ccall f_1612(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1612)
+static void C_ccall f_1612r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1620)
+static void C_ccall f_1620(C_word c,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_1601)
+static void C_ccall f_1601(C_word c,C_word t0,C_word t1,...) 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_noret;
+C_noret_decl(f_1595)
+static void C_ccall f_1595(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1539)
+static void C_ccall f_1539(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1539)
+static void C_ccall f_1539r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1561)
+static void C_ccall f_1561(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1561)
+static void C_ccall f_1561r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1567)
+static void C_fcall f_1567(C_word t0,C_word t1,C_word t2) 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_1547)
+static void C_ccall f_1547(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1533)
+static void C_ccall f_1533(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_word t2) 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_noret;
+C_noret_decl(f_1500)
+static void C_fcall f_1500(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1519)
+static void C_ccall f_1519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1453)
+static void C_ccall f_1453(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1453)
+static void C_ccall f_1453r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1465)
+static void C_fcall f_1465(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1479)
+static void C_ccall f_1479(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1487)
+static void C_ccall f_1487(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1490)
+static void C_ccall f_1490(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1417)
+static void C_ccall f_1417(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1417)
+static void C_ccall f_1417r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1420)
+static void C_ccall f_1420(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1420)
+static void C_ccall f_1420r(C_word t0,C_word t1,C_word t2,C_word t4) 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_1428)
+static void C_ccall f_1428r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1434)
+static void C_ccall f_1434(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1442)
+static void C_ccall f_1442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1405)
+static void C_ccall f_1405(C_word c,C_word t0,C_word t1,C_word t2) 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_1407)
+static void C_ccall f_1407r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1415)
+static void C_ccall f_1415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1397)
+static void C_ccall f_1397(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1399)
+static void C_ccall f_1399(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1374)
+static void C_ccall f_1374(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1374)
+static void C_ccall f_1374r(C_word t0,C_word t1,C_word t3) 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_1385)
+static void C_ccall f_1385(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_1337)
+static void C_ccall f_1337r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1339)
+static void C_ccall f_1339(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1345)
+static void C_fcall f_1345(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1358)
+static void C_ccall f_1358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1304)
+static void C_ccall f_1304(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1304)
+static void C_ccall f_1304r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1306)
+static void C_ccall f_1306(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1312)
+static void C_fcall f_1312(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_1296)
+static void C_ccall f_1296(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1298)
+static void C_ccall f_1298(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1298)
+static void C_ccall f_1298r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1293)
+static void C_ccall f_1293(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+
+C_noret_decl(trf_4675)
+static void C_fcall trf_4675(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4675(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4675(t0,t1,t2);}
+
+C_noret_decl(trf_4433)
+static void C_fcall trf_4433(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4433(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4433(t0,t1);}
+
+C_noret_decl(trf_4447)
+static void C_fcall trf_4447(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4447(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_4447(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4393)
+static void C_fcall trf_4393(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4393(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4393(t0,t1,t2);}
+
+C_noret_decl(trf_4401)
+static void C_fcall trf_4401(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4401(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4401(t0,t1,t2);}
+
+C_noret_decl(trf_4328)
+static void C_fcall trf_4328(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4328(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4328(t0,t1,t2);}
+
+C_noret_decl(trf_4336)
+static void C_fcall trf_4336(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4336(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4336(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 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_4257(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4270)
+static void C_fcall trf_4270(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4270(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4270(t0,t1,t2);}
+
+C_noret_decl(trf_4278)
+static void C_fcall trf_4278(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4278(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4278(t0,t1,t2);}
+
+C_noret_decl(trf_4222)
+static void C_fcall trf_4222(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4222(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4222(t0,t1,t2);}
+
+C_noret_decl(trf_4228)
+static void C_fcall trf_4228(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4228(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4228(t0,t1,t2);}
+
+C_noret_decl(trf_4175)
+static void C_fcall trf_4175(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4175(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_4175(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4181)
+static void C_fcall trf_4181(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4181(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4181(t0,t1,t2);}
+
+C_noret_decl(trf_4105)
+static void C_fcall trf_4105(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4105(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_4105(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4009)
+static void C_fcall trf_4009(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4009(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4009(t0,t1,t2);}
+
+C_noret_decl(trf_3877)
+static void C_fcall trf_3877(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3877(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_3877(t0,t1,t2,t3,t4);}
+
+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 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_3809(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_3741)
+static void C_fcall trf_3741(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3741(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_3741(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3693)
+static void C_fcall trf_3693(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3693(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3693(t0,t1,t2);}
+
+C_noret_decl(trf_3565)
+static void C_fcall trf_3565(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3565(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_3565(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3440)
+static void C_fcall trf_3440(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3440(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_3440(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_3473)
+static void C_fcall trf_3473(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3473(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3473(t0,t1,t2);}
+
+C_noret_decl(trf_3512)
+static void C_fcall trf_3512(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3512(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3512(t0,t1);}
+
+C_noret_decl(trf_3283)
+static void C_fcall trf_3283(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3283(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_3283(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3229)
+static void C_fcall trf_3229(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3229(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3229(t0,t1);}
+
+C_noret_decl(trf_3129)
+static void C_fcall trf_3129(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3129(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_3129(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3017)
+static void C_fcall trf_3017(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3017(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_3017(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_3044)
+static void C_fcall trf_3044(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3044(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3044(t0,t1,t2);}
+
+C_noret_decl(trf_2997)
+static void C_fcall trf_2997(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2997(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_2997(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_2913)
+static void C_fcall trf_2913(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2913(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2913(t0,t1);}
+
+C_noret_decl(trf_2908)
+static void C_fcall trf_2908(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2908(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2908(t0,t1,t2);}
+
+C_noret_decl(trf_2903)
+static void C_fcall trf_2903(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2903(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_2903(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2898)
+static void C_fcall trf_2898(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2898(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_2898(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_2869)
+static void C_fcall trf_2869(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2869(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2869(t0,t1);}
+
+C_noret_decl(trf_2796)
+static void C_fcall trf_2796(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2796(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2796(t0,t1);}
+
+C_noret_decl(trf_2791)
+static void C_fcall trf_2791(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2791(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2791(t0,t1,t2);}
+
+C_noret_decl(trf_2786)
+static void C_fcall trf_2786(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2786(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_2786(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2781)
+static void C_fcall trf_2781(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2781(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_2781(t0,t1,t2,t3,t4);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2752(t0,t1);}
+
+C_noret_decl(trf_2559)
+static void C_fcall trf_2559(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2559(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_2559(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_2580)
+static void C_fcall trf_2580(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2580(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_2580(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2524)
+static void C_fcall trf_2524(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2524(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2524(t0,t1,t2);}
+
+C_noret_decl(trf_2395)
+static void C_fcall trf_2395(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2395(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_2395(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2420)
+static void C_fcall trf_2420(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2420(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_2420(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2354)
+static void C_fcall trf_2354(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2354(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2354(t0,t1,t2);}
+
+C_noret_decl(trf_2294)
+static void C_fcall trf_2294(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2294(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2294(t0,t1);}
+
+C_noret_decl(trf_2289)
+static void C_fcall trf_2289(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2289(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2289(t0,t1,t2);}
+
+C_noret_decl(trf_2220)
+static void C_fcall trf_2220(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2220(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_2220(t0,t1,t2,t3);}
+
+C_noret_decl(trf_2255)
+static void C_fcall trf_2255(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2255(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2255(t0,t1,t2);}
+
+C_noret_decl(trf_2224)
+static void C_fcall trf_2224(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2224(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2224(t0,t1);}
+
+C_noret_decl(trf_2164)
+static void C_fcall trf_2164(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2164(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2164(t0,t1,t2);}
+
+C_noret_decl(trf_2126)
+static void C_fcall trf_2126(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2126(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2126(t0,t1);}
+
+C_noret_decl(trf_2075)
+static void C_fcall trf_2075(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2075(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2075(t0,t1,t2);}
+
+C_noret_decl(trf_2102)
+static void C_fcall trf_2102(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2102(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2102(t0,t1,t2);}
+
+C_noret_decl(trf_2022)
+static void C_fcall trf_2022(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2022(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2022(t0,t1,t2);}
+
+C_noret_decl(trf_1938)
+static void C_fcall trf_1938(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1938(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_1938(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1882)
+static void C_fcall trf_1882(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1882(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1882(t0,t1,t2);}
+
+C_noret_decl(trf_1800)
+static void C_fcall trf_1800(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1800(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_1800(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1821)
+static void C_fcall trf_1821(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1821(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_1821(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1750)
+static void C_fcall trf_1750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1750(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_1750(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1721)
+static void C_fcall trf_1721(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1721(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1721(t0,t1,t2);}
+
+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_1567)
+static void C_fcall trf_1567(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1567(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1567(t0,t1,t2);}
+
+C_noret_decl(trf_1500)
+static void C_fcall trf_1500(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1500(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1500(t0,t1,t2);}
+
+C_noret_decl(trf_1465)
+static void C_fcall trf_1465(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1465(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1465(t0,t1,t2);}
+
+C_noret_decl(trf_1345)
+static void C_fcall trf_1345(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1345(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1345(t0,t1,t2);}
+
+C_noret_decl(trf_1312)
+static void C_fcall trf_1312(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1312(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1312(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(1050)){
+C_save(t1);
+C_rereclaim2(1050*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,117);
+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],7,"list-of");
+lf[14]=C_h_intern(&lf[14],4,"noop");
+lf[15]=C_h_intern(&lf[15],19,"\003sysundefined-value");
+lf[16]=C_h_intern(&lf[16],4,"each");
+lf[17]=C_h_intern(&lf[17],4,"any\077");
+lf[18]=C_h_intern(&lf[18],5,"none\077");
+lf[19]=C_h_intern(&lf[19],7,"always\077");
+lf[20]=C_h_intern(&lf[20],6,"never\077");
+lf[21]=C_h_intern(&lf[21],12,"left-section");
+lf[22]=C_h_intern(&lf[22],10,"\003sysappend");
+lf[23]=C_h_intern(&lf[23],17,"\003syscheck-closure");
+lf[24]=C_h_intern(&lf[24],7,"reverse");
+lf[25]=C_h_intern(&lf[25],13,"right-section");
+lf[26]=C_h_intern(&lf[26],5,"atom\077");
+lf[27]=C_h_intern(&lf[27],5,"tail\077");
+lf[28]=C_h_intern(&lf[28],11,"intersperse");
+lf[29]=C_h_intern(&lf[29],7,"butlast");
+lf[30]=C_h_intern(&lf[30],7,"flatten");
+lf[31]=C_h_intern(&lf[31],4,"chop");
+lf[32]=C_h_intern(&lf[32],9,"\003syserror");
+lf[33]=C_decode_literal(C_heaptop,"\376B\000\000\030invalid numeric argument");
+lf[34]=C_h_intern(&lf[34],4,"join");
+lf[35]=C_h_intern(&lf[35],27,"\003syserror-not-a-proper-list");
+lf[36]=C_h_intern(&lf[36],8,"compress");
+lf[37]=C_decode_literal(C_heaptop,"\376B\000\000%bad argument type - not a proper list");
+lf[38]=C_h_intern(&lf[38],15,"\003syssignal-hook");
+lf[39]=C_h_intern(&lf[39],11,"\000type-error");
+lf[40]=C_h_intern(&lf[40],7,"shuffle");
+lf[41]=C_h_intern(&lf[41],3,"cdr");
+lf[42]=C_h_intern(&lf[42],5,"sort!");
+lf[43]=C_h_intern(&lf[43],13,"alist-update!");
+lf[44]=C_h_intern(&lf[44],3,"eq\077");
+lf[45]=C_h_intern(&lf[45],4,"assq");
+lf[46]=C_h_intern(&lf[46],4,"eqv\077");
+lf[47]=C_h_intern(&lf[47],4,"assv");
+lf[48]=C_h_intern(&lf[48],6,"equal\077");
+lf[49]=C_h_intern(&lf[49],5,"assoc");
+lf[50]=C_h_intern(&lf[50],9,"alist-ref");
+lf[51]=C_h_intern(&lf[51],6,"rassoc");
+lf[52]=C_h_intern(&lf[52],21,"reverse-string-append");
+lf[53]=C_h_intern(&lf[53],11,"make-string");
+lf[54]=C_h_intern(&lf[54],18,"open-output-string");
+lf[55]=C_h_intern(&lf[55],7,"display");
+lf[56]=C_h_intern(&lf[56],6,"string");
+lf[57]=C_h_intern(&lf[57],17,"get-output-string");
+lf[58]=C_h_intern(&lf[58],8,"->string");
+lf[59]=C_h_intern(&lf[59],14,"symbol->string");
+lf[60]=C_h_intern(&lf[60],18,"\003sysnumber->string");
+lf[61]=C_h_intern(&lf[61],13,"string-append");
+lf[62]=C_h_intern(&lf[62],4,"conc");
+lf[63]=C_h_intern(&lf[63],19,"\003syssubstring-index");
+lf[64]=C_h_intern(&lf[64],15,"substring-index");
+lf[65]=C_h_intern(&lf[65],22,"\003syssubstring-index-ci");
+lf[66]=C_h_intern(&lf[66],18,"substring-index-ci");
+lf[67]=C_h_intern(&lf[67],15,"string-compare3");
+lf[68]=C_h_intern(&lf[68],18,"string-compare3-ci");
+lf[69]=C_h_intern(&lf[69],15,"\003syssubstring=\077");
+lf[70]=C_h_intern(&lf[70],11,"substring=\077");
+lf[71]=C_h_intern(&lf[71],18,"\003syssubstring-ci=\077");
+lf[72]=C_h_intern(&lf[72],14,"substring-ci=\077");
+lf[73]=C_h_intern(&lf[73],12,"string-split");
+lf[74]=C_decode_literal(C_heaptop,"\376B\000\000\003\011\012 ");
+lf[75]=C_h_intern(&lf[75],13,"\003syssubstring");
+lf[76]=C_h_intern(&lf[76],18,"string-intersperse");
+lf[77]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[78]=C_h_intern(&lf[78],19,"\003sysallocate-vector");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[80]=C_h_intern(&lf[80],12,"list->string");
+lf[81]=C_h_intern(&lf[81],16,"string-translate");
+lf[82]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid translation destination");
+lf[83]=C_h_intern(&lf[83],17,"string-translate*");
+lf[84]=C_h_intern(&lf[84],21,"\003sysfragments->string");
+lf[85]=C_h_intern(&lf[85],11,"string-chop");
+lf[86]=C_h_intern(&lf[86],12,"string-chomp");
+lf[87]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[88]=C_h_intern(&lf[88],7,"sorted\077");
+lf[89]=C_h_intern(&lf[89],5,"merge");
+lf[90]=C_h_intern(&lf[90],6,"merge!");
+lf[91]=C_h_intern(&lf[91],12,"vector->list");
+lf[92]=C_h_intern(&lf[92],4,"sort");
+lf[93]=C_h_intern(&lf[93],12,"list->vector");
+lf[94]=C_h_intern(&lf[94],6,"append");
+lf[95]=C_h_intern(&lf[95],16,"topological-sort");
+lf[96]=C_h_intern(&lf[96],4,"caar");
+lf[97]=C_h_intern(&lf[97],4,"cdar");
+lf[98]=C_h_intern(&lf[98],7,"colored");
+lf[99]=C_h_intern(&lf[99],13,"binary-search");
+lf[100]=C_h_intern(&lf[100],10,"make-queue");
+lf[101]=C_h_intern(&lf[101],5,"queue");
+lf[102]=C_h_intern(&lf[102],6,"queue\077");
+lf[103]=C_h_intern(&lf[103],12,"queue-empty\077");
+lf[104]=C_h_intern(&lf[104],11,"queue-first");
+lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[106]=C_h_intern(&lf[106],10,"queue-last");
+lf[107]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[108]=C_h_intern(&lf[108],10,"queue-add!");
+lf[109]=C_h_intern(&lf[109],13,"queue-remove!");
+lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\016queue is empty");
+lf[111]=C_h_intern(&lf[111],11,"queue->list");
+lf[112]=C_h_intern(&lf[112],11,"list->queue");
+lf[113]=C_h_intern(&lf[113],16,"queue-push-back!");
+lf[114]=C_h_intern(&lf[114],21,"queue-push-back-list!");
+lf[115]=C_h_intern(&lf[115],17,"register-feature!");
+lf[116]=C_h_intern(&lf[116],15,"data-structures");
+C_register_lf2(lf,117,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c326 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1291,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* data-structures.scm: 72 register-feature! */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+1),t3,lf[116]);}
+
+/* k1289 */
+static void C_ccall f_1291(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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 ab[216],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1291,2,t0,t1);}
+t2=C_mutate((C_word*)lf[2]+1 /* (set! identity ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1293,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_1296,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_1304,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_1337,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_1374,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_1397,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_1405,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_1417,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_1453,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_1492,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[13]+1 /* (set! list-of ...) */,*((C_word*)lf[12]+1));
+t13=C_mutate((C_word*)lf[14]+1 /* (set! noop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1533,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[16]+1 /* (set! each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1539,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate((C_word*)lf[17]+1 /* (set! any? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1595,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[18]+1 /* (set! none? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1598,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[19]+1 /* (set! always? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1601,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[20]+1 /* (set! never? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1604,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate((C_word*)lf[21]+1 /* (set! left-section ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1607,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
+t20=*((C_word*)lf[24]+1);
+t21=C_mutate((C_word*)lf[25]+1 /* (set! right-section ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1622,a[2]=t20,a[3]=((C_word)li38),tmp=(C_word)a,a+=4,tmp));
+t22=C_mutate((C_word*)lf[26]+1 /* (set! atom? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1648,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
+t23=C_mutate((C_word*)lf[27]+1 /* (set! tail? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1651,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
+t24=C_mutate((C_word*)lf[28]+1 /* (set! intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1679,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
+t25=C_mutate((C_word*)lf[29]+1 /* (set! butlast ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1712,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
+t26=C_mutate((C_word*)lf[30]+1 /* (set! flatten ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1744,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
+t27=*((C_word*)lf[24]+1);
+t28=C_mutate((C_word*)lf[31]+1 /* (set! chop ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1785,a[2]=t27,a[3]=((C_word)li50),tmp=(C_word)a,a+=4,tmp));
+t29=C_mutate((C_word*)lf[34]+1 /* (set! join ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1870,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
+t30=C_mutate((C_word*)lf[36]+1 /* (set! compress ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1929,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
+t31=C_mutate((C_word*)lf[40]+1 /* (set! shuffle ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2009,a[2]=((C_word)li59),tmp=(C_word)a,a+=3,tmp));
+t32=C_mutate((C_word*)lf[43]+1 /* (set! alist-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2119,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
+t33=C_mutate((C_word*)lf[50]+1 /* (set! alist-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2218,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
+t34=C_mutate((C_word*)lf[51]+1 /* (set! rassoc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2342,a[2]=((C_word)li70),tmp=(C_word)a,a+=3,tmp));
+t35=C_mutate((C_word*)lf[52]+1 /* (set! reverse-string-append ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2392,a[2]=((C_word)li73),tmp=(C_word)a,a+=3,tmp));
+t36=*((C_word*)lf[54]+1);
+t37=*((C_word*)lf[55]+1);
+t38=*((C_word*)lf[56]+1);
+t39=*((C_word*)lf[57]+1);
+t40=C_mutate((C_word*)lf[58]+1 /* (set! ->string ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2469,a[2]=t36,a[3]=t37,a[4]=t39,a[5]=t38,a[6]=((C_word)li74),tmp=(C_word)a,a+=7,tmp));
+t41=*((C_word*)lf[61]+1);
+t42=C_mutate((C_word*)lf[62]+1 /* (set! conc ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2514,a[2]=t41,a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp));
+t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2559,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp);
+t44=C_mutate((C_word*)lf[63]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2606,a[2]=t43,a[3]=((C_word)li80),tmp=(C_word)a,a+=4,tmp));
+t45=C_mutate((C_word*)lf[65]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2615,a[2]=t43,a[3]=((C_word)li82),tmp=(C_word)a,a+=4,tmp));
+t46=C_mutate((C_word*)lf[64]+1 /* (set! substring-index ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2624,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
+t47=C_mutate((C_word*)lf[66]+1 /* (set! substring-index-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2652,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
+t48=C_mutate((C_word*)lf[67]+1 /* (set! string-compare3 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2680,a[2]=((C_word)li85),tmp=(C_word)a,a+=3,tmp));
+t49=C_mutate((C_word*)lf[68]+1 /* (set! string-compare3-ci ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2711,a[2]=((C_word)li86),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_2742,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp));
+t51=C_mutate((C_word*)lf[70]+1 /* (set! substring=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2779,a[2]=((C_word)li92),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_2859,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp));
+t53=C_mutate((C_word*)lf[72]+1 /* (set! substring-ci=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2896,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
+t54=C_mutate((C_word*)lf[73]+1 /* (set! string-split ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2976,a[2]=((C_word)li102),tmp=(C_word)a,a+=3,tmp));
+t55=C_mutate((C_word*)lf[76]+1 /* (set! string-intersperse ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3111,a[2]=((C_word)li105),tmp=(C_word)a,a+=3,tmp));
+t56=*((C_word*)lf[53]+1);
+t57=*((C_word*)lf[80]+1);
+t58=C_mutate((C_word*)lf[81]+1 /* (set! string-translate ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3226,a[2]=t57,a[3]=t56,a[4]=((C_word)li111),tmp=(C_word)a,a+=5,tmp));
+t59=C_mutate((C_word*)lf[83]+1 /* (set! string-translate* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3428,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
+t60=C_mutate((C_word*)lf[85]+1 /* (set! string-chop ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3550,a[2]=((C_word)li116),tmp=(C_word)a,a+=3,tmp));
+t61=C_mutate((C_word*)lf[86]+1 /* (set! string-chomp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3614,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
+t62=C_mutate((C_word*)lf[88]+1 /* (set! sorted? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3666,a[2]=((C_word)li120),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_3775,a[2]=((C_word)li122),tmp=(C_word)a,a+=3,tmp));
+t64=C_mutate((C_word*)lf[90]+1 /* (set! merge! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3874,a[2]=((C_word)li124),tmp=(C_word)a,a+=3,tmp));
+t65=C_mutate((C_word*)lf[42]+1 /* (set! sort! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4006,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp));
+t66=C_mutate((C_word*)lf[92]+1 /* (set! sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4139,a[2]=((C_word)li128),tmp=(C_word)a,a+=3,tmp));
+t67=C_mutate((C_word*)lf[95]+1 /* (set! topological-sort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4166,a[2]=((C_word)li140),tmp=(C_word)a,a+=3,tmp));
+t68=*((C_word*)lf[93]+1);
+t69=C_mutate((C_word*)lf[99]+1 /* (set! binary-search ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4429,a[2]=t68,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
+t70=C_mutate((C_word*)lf[100]+1 /* (set! make-queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4512,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp));
+t71=C_mutate((C_word*)lf[102]+1 /* (set! queue? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4518,a[2]=((C_word)li144),tmp=(C_word)a,a+=3,tmp));
+t72=C_mutate((C_word*)lf[103]+1 /* (set! queue-empty? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4524,a[2]=((C_word)li145),tmp=(C_word)a,a+=3,tmp));
+t73=C_mutate((C_word*)lf[104]+1 /* (set! queue-first ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4537,a[2]=((C_word)li146),tmp=(C_word)a,a+=3,tmp));
+t74=C_mutate((C_word*)lf[106]+1 /* (set! queue-last ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4558,a[2]=((C_word)li147),tmp=(C_word)a,a+=3,tmp));
+t75=C_mutate((C_word*)lf[108]+1 /* (set! queue-add! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4579,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp));
+t76=C_mutate((C_word*)lf[109]+1 /* (set! queue-remove! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4611,a[2]=((C_word)li149),tmp=(C_word)a,a+=3,tmp));
+t77=C_mutate((C_word*)lf[111]+1 /* (set! queue->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4647,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp));
+t78=C_mutate((C_word*)lf[112]+1 /* (set! list->queue ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4656,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp));
+t79=C_mutate((C_word*)lf[113]+1 /* (set! queue-push-back! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4710,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp));
+t80=C_mutate((C_word*)lf[114]+1 /* (set! queue-push-back-list! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4739,a[2]=((C_word)li155),tmp=(C_word)a,a+=3,tmp));
+t81=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t81+1)))(2,t81,C_SCHEME_UNDEFINED);}
+
+/* queue-push-back-list! in k1289 */
+static void C_ccall f_4739(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_4739,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[101],lf[114]);
+t5=(C_word)C_i_check_list_2(t3,lf[114]);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4749,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: 954 append */
+t8=*((C_word*)lf[94]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,t3,t7);}
+
+/* k4747 in queue-push-back-list! in k1289 */
+static void C_ccall f_4749(C_word c,C_word t0,C_word t1){
+C_word 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_4749,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_4768,a[2]=((C_word)li154),tmp=(C_word)a,a+=3,tmp);
+t5=f_4768(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 k4747 in queue-push-back-list! in k1289 */
+static C_word C_fcall f_4768(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 k1289 */
+static void C_ccall f_4710(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_4710,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[101],lf[113]);
+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 k1289 */
+static void C_ccall f_4656(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_4656,3,t0,t1,t2);}
+t3=(C_word)C_i_check_list_2(t2,lf[112]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4667,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[101],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_4675,a[2]=t2,a[3]=t7,a[4]=((C_word)li151),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_4675(t9,t4,t2);}}
+
+/* doloop1178 in list->queue in k1289 */
+static void C_fcall f_4675(C_word t0,C_word 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_4675,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_4685,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: 930 ##sys#error-not-a-proper-list */
+t8=*((C_word*)lf[35]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t5,((C_word*)t0)[2],lf[112]);}
+else{
+t8=(C_word)C_slot(t2,C_fix(1));
+t11=t1;
+t12=t8;
+t1=t11;
+t2=t12;
+goto loop;}}}
+
+/* k4683 in doloop1178 in list->queue in k1289 */
+static void C_ccall f_4685(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_4675(t3,((C_word*)t0)[2],t2);}
+
+/* k4665 in list->queue in k1289 */
+static void C_ccall f_4667(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_4667,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[101],((C_word*)t0)[2],t1));}
+
+/* queue->list in k1289 */
+static void C_ccall f_4647(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_4647,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[101],lf[111]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(t2,C_fix(1)));}
+
+/* queue-remove! in k1289 */
+static void C_ccall f_4611(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_4611,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[101],lf[109]);
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4621,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: 908 ##sys#error */
+t7=*((C_word*)lf[32]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[109],lf[110],t2);}
+else{
+t7=t5;
+f_4621(2,t7,C_SCHEME_UNDEFINED);}}
+
+/* k4619 in queue-remove! in k1289 */
+static void C_ccall f_4621(C_word c,C_word 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 k1289 */
+static void C_ccall f_4579(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_4579,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[101],lf[108]);
+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 k1289 */
+static void C_ccall f_4558(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_4558,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[101],lf[106]);
+t4=(C_word)C_slot(t2,C_fix(2));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4568,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: 889 ##sys#error */
+t7=*((C_word*)lf[32]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[106],lf[107],t2);}
+else{
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
+
+/* k4566 in queue-last in k1289 */
+static void C_ccall f_4568(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 k1289 */
+static void C_ccall f_4537(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_4537,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[101],lf[104]);
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4547,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: 878 ##sys#error */
+t7=*((C_word*)lf[32]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[104],lf[105],t2);}
+else{
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_slot(t4,C_fix(0)));}}
+
+/* k4545 in queue-first in k1289 */
+static void C_ccall f_4547(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 k1289 */
+static void C_ccall f_4524(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_4524,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[101],lf[103]);
+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 k1289 */
+static void C_ccall f_4518(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_4518,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[101]));}
+
+/* make-queue in k1289 */
+static void C_ccall f_4512(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_4512,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[101],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST));}
+
+/* binary-search in k1289 */
+static void C_ccall f_4429(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_4429,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_4433,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_4507,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 835 list->vector */
+t7=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,((C_word*)t4)[1]);}
+else{
+t6=t5;
+f_4433(t6,(C_word)C_i_check_vector_2(((C_word*)t4)[1],lf[99]));}}
+
+/* k4505 in binary-search in k1289 */
+static void C_ccall f_4507(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_4433(t3,t2);}
+
+/* k4431 in binary-search in k1289 */
+static void C_fcall f_4433(C_word t0,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_4433,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_4447,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_4447(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 k4431 in binary-search in k1289 */
+static void C_fcall f_4447(C_word t0,C_word 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_4447,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_4457,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: 843 proc */
+t9=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t9))(3,t9,t8,t7);}
+
+/* k4455 in loop in k4431 in binary-search in k1289 */
+static void C_ccall f_4457(C_word 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: 845 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4447(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: 846 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4447(t4,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4]);}}}}
+
+/* topological-sort in k1289 */
+static void C_ccall f_4166(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_4166,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_4175,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_4222,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_4257,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_4316,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_4393,a[2]=t20,a[3]=t9,a[4]=((C_word)li139),tmp=(C_word)a,a+=5,tmp));
+t22=((C_word*)t20)[1];
+f_4393(t22,t17,t18);}}
+
+/* loop1015 in topological-sort in k1289 */
+static void C_fcall f_4393(C_word t0,C_word 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_4393,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_4401,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_4416,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_4401(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4414 in loop1015 in topological-sort in k1289 */
+static void C_ccall f_4416(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_4393(t3,((C_word*)t0)[2],t2);}
+
+/* g1070 in loop1015 in topological-sort in k1289 */
+static void C_fcall f_4401(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_4401,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cdr(t2);
+/* data-structures.scm: 817 insert */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_4175(t5,t1,t3,t4);}
+
+/* k4314 in topological-sort in k1289 */
+static void C_ccall f_4316(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_4316,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4319,a[2]=((C_word*)t0)[2],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_4383,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: 820 caar */
+t4=*((C_word*)lf[96]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
+
+/* k4381 in k4314 in topological-sort in k1289 */
+static void C_ccall f_4383(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_4383,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4387,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: 820 cdar */
+t3=*((C_word*)lf[97]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k4385 in k4381 in k4314 in topological-sort in k1289 */
+static void C_ccall f_4387(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 820 visit */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_4257(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k4317 in k4314 in topological-sort in k1289 */
+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 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_4319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4322,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_4328,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_4328(t7,t2,t3);}
+
+/* loop1077 in k4317 in k4314 in topological-sort in k1289 */
+static void C_fcall f_4328(C_word t0,C_word 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_4328,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_4336,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_4368,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_4336(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4366 in loop1077 in k4317 in k4314 in topological-sort in k1289 */
+static void C_ccall f_4368(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_4328(t3,((C_word*)t0)[2],t2);}
+
+/* g1084 in loop1077 in k4317 in k4314 in topological-sort in k1289 */
+static void C_fcall f_4336(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_4336,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4340,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: 822 lookup */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_4222(t5,t3,t4);}
+
+/* k4338 in g1084 in loop1077 in k4317 in k4314 in topological-sort in k1289 */
+static void C_ccall f_4340(C_word c,C_word 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[98]);
+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: 824 visit */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_4257(t5,((C_word*)t0)[4],t3,t4);}}
+
+/* k4320 in k4317 in k4314 in topological-sort in k1289 */
+static void C_ccall f_4322(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 k1289 */
+static void C_fcall f_4257(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_4257,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4261,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: 805 insert */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_4175(t5,t4,t2,lf[98]);}
+
+/* k4259 in visit in topological-sort in k1289 */
+static void C_ccall f_4261(C_word c,C_word t0,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_4261,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4264,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_4270,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_4270(t6,t2,((C_word*)t0)[2]);}
+
+/* loop1048 in k4259 in visit in topological-sort in k1289 */
+static void C_fcall f_4270(C_word t0,C_word 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_4270,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_4278,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_4302,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_4278(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k4300 in loop1048 in k4259 in visit in topological-sort in k1289 */
+static void C_ccall f_4302(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_4270(t3,((C_word*)t0)[2],t2);}
+
+/* g1055 in loop1048 in k4259 in visit in topological-sort in k1289 */
+static void C_fcall f_4278(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_4278,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4282,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 808 lookup */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_4222(t4,t3,t2);}
+
+/* k4280 in g1055 in loop1048 in k4259 in visit in topological-sort in k1289 */
+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 t5;
+C_word *a;
+t2=(C_word)C_eqp(t1,lf[98]);
+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: 810 visit */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4257(t4,((C_word*)t0)[4],((C_word*)t0)[2],t3);}
+else{
+/* data-structures.scm: 810 visit */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_4257(t3,((C_word*)t0)[4],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}}}
+
+/* k4262 in k4259 in visit in topological-sort in k1289 */
+static void C_ccall f_4264(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_4264,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 k1289 */
+static void C_fcall f_4222(C_word 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_4222,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_4228,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_4228(t6,t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* loop in lookup in topological-sort in k1289 */
+static void C_fcall f_4228(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_4228,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_4241,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_4255,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: 800 caar */
+t5=*((C_word*)lf[96]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
+
+/* k4253 in loop in lookup in topological-sort in k1289 */
+static void C_ccall f_4255(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 800 pred */
+t2=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k4239 in loop in lookup in topological-sort in k1289 */
+static void C_ccall f_4241(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: 800 cdar */
+t2=*((C_word*)lf[97]+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: 801 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_4228(t3,((C_word*)t0)[4],t2);}}
+
+/* insert in topological-sort in k1289 */
+static void C_fcall f_4175(C_word t0,C_word 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_4175,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_4181,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_4181(t7,t1,((C_word*)((C_word*)t0)[3])[1]);}
+
+/* loop in insert in topological-sort in k1289 */
+static void C_fcall f_4181(C_word t0,C_word 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_4181,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_4202,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_4220,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: 794 caar */
+t5=*((C_word*)lf[96]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
+
+/* k4218 in loop in insert in topological-sort in k1289 */
+static void C_ccall f_4220(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 794 pred */
+t2=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k4200 in loop in insert in topological-sort in k1289 */
+static void C_ccall f_4202(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: 795 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_4181(t3,((C_word*)t0)[4],t2);}}
+
+/* sort in k1289 */
+static void C_ccall f_4139(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_4139,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_4153,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4157,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 777 vector->list */
+t6=*((C_word*)lf[91]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4164,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 778 append */
+t5=*((C_word*)lf[94]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_SCHEME_END_OF_LIST);}}
+
+/* k4162 in sort in k1289 */
+static void C_ccall f_4164(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 778 sort! */
+t2=*((C_word*)lf[42]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k4155 in sort in k1289 */
+static void C_ccall f_4157(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 777 sort! */
+t2=*((C_word*)lf[42]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k4151 in sort in k1289 */
+static void C_ccall f_4153(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 777 list->vector */
+t2=*((C_word*)lf[93]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* sort! in k1289 */
+static void C_ccall f_4006(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_4006,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_4009,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_4096,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: 760 vector->list */
+t11=*((C_word*)lf[91]+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: 766 step */
+t9=((C_word*)t6)[1];
+f_4009(t9,t1,t8);}}
+
+/* k4094 in sort! in k1289 */
+static void C_ccall f_4096(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_4096,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_4103,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 761 step */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_4009(t4,t3,((C_word*)t0)[2]);}
+
+/* k4101 in k4094 in sort! in k1289 */
+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 ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4103,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_4105,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_4105(t5,((C_word*)t0)[2],t1,C_fix(0));}
+
+/* doloop994 in k4101 in k4094 in sort! in k1289 */
+static void C_fcall f_4105(C_word t0,C_word 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_4105,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 k1289 */
+static void C_fcall f_4009(C_word t0,C_word 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_4009,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_4019,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_4060,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+/* data-structures.scm: 745 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);}}}}
+
+/* k4058 in step in sort! in k1289 */
+static void C_ccall f_4060(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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]);}}
+
+/* k4017 in step in sort! in k1289 */
+static void C_ccall f_4019(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_4019,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4022,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: 736 step */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_4009(t3,t2,t1);}
+
+/* k4020 in k4017 in step in sort! in k1289 */
+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[9],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4022,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_4028,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: 738 step */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_4009(t4,t3,t2);}
+
+/* k4026 in k4020 in k4017 in step in sort! in k1289 */
+static void C_ccall f_4028(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 739 merge! */
+t2=*((C_word*)lf[90]+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 k1289 */
+static void C_ccall f_3874(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_3874,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_3877,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_3956,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: 713 less? */
+t11=t4;
+((C_proc4)C_retrieve_proc(t11))(4,t11,t8,t9,t10);}}}
+
+/* k3954 in merge! in k1289 */
+static void C_ccall f_3956(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_3956,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3959,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: 716 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3877(t5,t2,((C_word*)t0)[5],((C_word*)t0)[3],t4);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3979,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: 721 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3877(t5,t2,((C_word*)t0)[3],t4,((C_word*)t0)[5]);}}}
+
+/* k3977 in k3954 in merge! in k1289 */
+static void C_ccall f_3979(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);}
+
+/* k3957 in k3954 in merge! in k1289 */
+static void C_ccall f_3959(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 k1289 */
+static void C_fcall f_3877(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_3877,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3884,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: 698 less? */
+t8=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t8))(4,t8,t5,t6,t7);}
+
+/* k3882 in loop in merge! in k1289 */
+static void C_ccall f_3884(C_word c,C_word t0,C_word t1){
+C_word 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: 703 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3877(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: 709 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3877(t5,((C_word*)t0)[4],((C_word*)t0)[3],t4,((C_word*)t0)[5]);}}}
+
+/* merge in k1289 */
+static void C_ccall f_3775(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_3775,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_3809,a[2]=t4,a[3]=t10,a[4]=((C_word)li121),tmp=(C_word)a,a+=5,tmp));
+t12=((C_word*)t10)[1];
+f_3809(t12,t1,t5,t6,t7,t8);}}}
+
+/* loop in merge in k1289 */
+static void C_fcall f_3809(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_3809,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3816,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: 681 less? */
+t7=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t7))(4,t7,t6,t4,t2);}
+
+/* k3814 in loop in merge in k1289 */
+static void C_ccall f_3816(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3816,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_3836,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: 684 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3809(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_3864,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: 688 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3809(t5,t2,t3,t4,((C_word*)t0)[3],((C_word*)t0)[7]);}}}
+
+/* k3862 in k3814 in loop in merge in k1289 */
+static void C_ccall f_3864(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_3864,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));}
+
+/* k3834 in k3814 in loop in merge in k1289 */
+static void C_ccall f_3836(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_3836,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 k1289 */
+static void C_ccall f_3666(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_3666,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_3693,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_3693(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_3741,a[2]=t3,a[3]=t7,a[4]=((C_word)li119),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_3741(t9,t1,t4,t5);}}}
+
+/* loop in sorted? in k1289 */
+static void C_fcall f_3741(C_word t0,C_word 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_3741,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_3769,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: 664 less? */
+t7=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t7))(4,t7,t5,t6,t2);}}
+
+/* k3767 in loop in sorted? in k1289 */
+static void C_ccall f_3769(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: 665 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_3741(t4,((C_word*)t0)[4],t2,t3);}}
+
+/* doloop909 in sorted? in k1289 */
+static void C_fcall f_3693(C_word t0,C_word 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_3693,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_3703,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_3703(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: 658 less? */
+t8=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t8))(4,t8,t4,t5,t7);}}
+
+/* k3701 in doloop909 in sorted? in k1289 */
+static void C_ccall f_3703(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_3703,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_3693(t3,((C_word*)t0)[5],t2);}}
+
+/* string-chomp in k1289 */
+static void C_ccall f_3614(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_3614r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_3614r(t0,t1,t2,t3);}}
+
+static void C_ccall f_3614r(C_word 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_3618,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_3618(2,t5,lf[87]);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_3618(2,t6,(C_word)C_i_car(t3));}
+else{
+/* ##sys#error */
+t6=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k3616 in string-chomp in k1289 */
+static void C_ccall f_3618(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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[86]);
+t3=(C_word)C_i_check_string_2(t1,lf[86]);
+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: 625 ##sys#substring */
+t9=*((C_word*)lf[75]+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 k1289 */
+static void C_ccall f_3550(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_3550,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[85]);
+t5=(C_word)C_i_check_exact_2(t3,lf[85]);
+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_3565,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_3565(t10,t1,t6,C_fix(0));}
+
+/* loop in string-chop in k1289 */
+static void C_fcall f_3565(C_word t0,C_word 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_3565,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_3585,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_fixnum_plus(t3,t2);
+/* data-structures.scm: 611 ##sys#substring */
+t6=*((C_word*)lf[75]+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_3596,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: 612 ##sys#substring */
+t6=*((C_word*)lf[75]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,((C_word*)t0)[3],t3,t5);}}}
+
+/* k3594 in loop in string-chop in k1289 */
+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 t5;
+C_word ab[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3596,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3600,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: 612 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3565(t5,t2,t3,t4);}
+
+/* k3598 in k3594 in loop in string-chop in k1289 */
+static void C_ccall f_3600(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_3600,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));}
+
+/* k3583 in loop in string-chop in k1289 */
+static void C_ccall f_3585(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_3585,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 k1289 */
+static void C_ccall f_3428(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_3428,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[83]);
+t5=(C_word)C_i_check_list_2(t3,lf[83]);
+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_3440,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: 600 collect */
+t10=((C_word*)t8)[1];
+f_3440(t10,t1,C_fix(0),C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}
+
+/* collect in string-translate* in k1289 */
+static void C_fcall f_3440(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_3440,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_3454,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_3468,a[2]=t7,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 582 ##sys#substring */
+t9=*((C_word*)lf[75]+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: 580 reverse */
+t9=*((C_word*)lf[24]+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_3473,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_3473(t10,t1,((C_word*)t0)[2]);}}
+
+/* loop in collect in string-translate* in k1289 */
+static void C_fcall f_3473(C_word t0,C_word 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_3473,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: 586 collect */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_3440(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_3512,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_3538,a[2]=t8,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 594 ##sys#substring */
+t10=*((C_word*)lf[75]+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_3512(t9,C_SCHEME_UNDEFINED);}}
+else{
+t7=(C_word)C_i_cdr(t2);
+/* data-structures.scm: 599 loop */
+t14=t1;
+t15=t7;
+t1=t14;
+t2=t15;
+goto loop;}}}
+
+/* k3536 in loop in collect in string-translate* in k1289 */
+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[3],*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_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_3512(t4,t3);}
+
+/* k3510 in loop in collect in string-translate* in k1289 */
+static void C_fcall f_3512(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_3512,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: 595 collect */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_3440(t5,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)t0)[2],t3,t4);}
+
+/* k3466 in collect in string-translate* in k1289 */
+static void C_ccall f_3468(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_3468,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)((C_word*)t0)[3])[1]);
+/* data-structures.scm: 580 reverse */
+t3=*((C_word*)lf[24]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
+
+/* k3452 in collect in string-translate* in k1289 */
+static void C_ccall f_3454(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 578 ##sys#fragments->string */
+t2=*((C_word*)lf[84]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* string-translate in k1289 */
+static void C_ccall f_3226(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_3226r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_3226r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_3226r(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_3229,a[2]=((C_word)li108),tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3263,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_3263(2,t7,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3403,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_3420,a[2]=t6,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 536 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[81]);
+/* data-structures.scm: 539 instring */
+f_3229(t6,t3);}}}
+
+/* k3418 in string-translate in k1289 */
+static void C_ccall f_3420(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 536 instring */
+f_3229(((C_word*)t0)[2],t1);}
+
+/* f_3403 in string-translate in k1289 */
+static void C_ccall f_3403(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_3403,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,((C_word*)t0)[2]));}
+
+/* k3261 in string-translate in k1289 */
+static void C_ccall f_3263(C_word c,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_3263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3266,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_3266(2,t4,t3);}
+else{
+if(C_truep((C_word)C_i_pairp(t3))){
+/* data-structures.scm: 544 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[81]);
+t5=t2;
+f_3266(2,t5,t3);}}}
+else{
+t3=t2;
+f_3266(2,t3,C_SCHEME_FALSE);}}
+
+/* k3264 in k3261 in string-translate in k1289 */
+static void C_ccall f_3266(C_word c,C_word t0,C_word 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_3266,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[81]);
+t5=(C_word)C_block_size(((C_word*)t0)[5]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_3278,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: 551 make-string */
+t7=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t5);}
+
+/* k3276 in k3264 in k3261 in string-translate in k1289 */
+static void C_ccall f_3278(C_word c,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_3278,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_3283,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_3283(t5,((C_word*)t0)[2],C_fix(0),C_fix(0));}
+
+/* loop in k3276 in k3264 in k3261 in string-translate in k1289 */
+static void C_fcall f_3283(C_word 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_3283,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: 555 ##sys#substring */
+t4=*((C_word*)lf[75]+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_3302,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: 558 from */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t4);}}
+
+/* k3300 in loop in k3276 in k3264 in k3261 in string-translate in k1289 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word 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: 565 loop */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_3283(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: 567 ##sys#error */
+t4=*((C_word*)lf[32]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[4],lf[81],lf[82],((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: 570 loop */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_3283(t7,((C_word*)t0)[4],t5,t6);}}}
+else{
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
+/* data-structures.scm: 562 loop */
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_3283(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: 561 loop */
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_3283(t6,((C_word*)t0)[4],t4,t5);}}
+
+/* instring in string-translate in k1289 */
+static void C_fcall f_3229(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_3229,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_3234,a[2]=t2,a[3]=t3,a[4]=((C_word)li107),tmp=(C_word)a,a+=5,tmp));}
+
+/* f_3234 in instring in string-translate in k1289 */
+static void C_ccall f_3234(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_3234,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3240,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_3240(t3,C_fix(0)));}
+
+/* loop */
+static C_word C_fcall f_3240(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 k1289 */
+static void C_ccall f_3111(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_3111r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_3111r(t0,t1,t2,t3);}}
+
+static void C_ccall f_3111r(C_word 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_3115,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_3115(2,t5,lf[79]);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_3115(2,t6,(C_word)C_i_car(t3));}
+else{
+/* ##sys#error */
+t6=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k3113 in string-intersperse in k1289 */
+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 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_3115,2,t0,t1);}
+t2=(C_word)C_i_check_list_2(((C_word*)t0)[3],lf[76]);
+t3=(C_word)C_i_check_string_2(t1,lf[76]);
+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_3129,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_3129(t8,((C_word*)t0)[2],((C_word*)t0)[3],C_fix(0));}
+
+/* loop1 in k3113 in string-intersperse in k1289 */
+static void C_fcall f_3129(C_word t0,C_word 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_3129,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[77]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3139,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: 499 ##sys#allocate-vector */
+t6=*((C_word*)lf[78]+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[76]);
+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: 514 loop1 */
+t14=t1;
+t15=t7;
+t16=t10;
+t1=t14;
+t2=t15;
+t3=t16;
+goto loop;}
+else{
+/* data-structures.scm: 516 ##sys#error-not-a-proper-list */
+t5=*((C_word*)lf[35]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,((C_word*)t0)[5]);}}}
+
+/* k3137 in loop1 in k3113 in string-intersperse in k1289 */
+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[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3139,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_3144,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_3144(t2,((C_word*)t0)[2],C_fix(0)));}
+
+/* loop2 in k3137 in loop1 in k3113 in string-intersperse in k1289 */
+static C_word C_fcall f_3144(C_word t0,C_word 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 k1289 */
+static void C_ccall f_2976(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_2976r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_2976r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2976r(C_word t0,C_word 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[73]);
+t5=(C_word)C_vemptyp(t3);
+t6=(C_truep(t5)?lf[74]:(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[73]);
+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_2997,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_3017,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_3017(t19,t1,C_fix(0),C_SCHEME_FALSE,C_fix(0));}
+
+/* loop in string-split in k1289 */
+static void C_fcall f_3017(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_3017,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_3027,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: 475 add */
+t8=((C_word*)t0)[6];
+f_2997(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_3044,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_3044(t9,t1,C_fix(0));}}
+
+/* scan in loop in string-split in k1289 */
+static void C_fcall f_3044(C_word t0,C_word 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_3044,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: 480 loop */
+t4=((C_word*)((C_word*)t0)[9])[1];
+f_3017(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_3083,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[9],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 484 add */
+t8=((C_word*)t0)[3];
+f_2997(t8,t7,((C_word*)t0)[7],((C_word*)t0)[10],((C_word*)t0)[8]);}
+else{
+/* data-structures.scm: 485 loop */
+t7=((C_word*)((C_word*)t0)[9])[1];
+f_3017(t7,t1,t4,((C_word*)t0)[8],t4);}}
+else{
+t4=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* data-structures.scm: 486 scan */
+t11=t1;
+t12=t4;
+t1=t11;
+t2=t12;
+goto loop;}}}
+
+/* k3081 in scan in loop in string-split in k1289 */
+static void C_ccall f_3083(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 484 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_3017(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,((C_word*)t0)[2]);}
+
+/* k3025 in loop in string-split in k1289 */
+static void C_ccall f_3027(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 k1289 */
+static void C_fcall f_2997(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_2997,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3012,a[2]=t1,a[3]=t4,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 468 ##sys#substring */
+t6=*((C_word*)lf[75]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[2],t2,t3);}
+
+/* k3010 in add in string-split in k1289 */
+static void C_ccall f_3012(C_word c,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_3012,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 k1289 */
+static void C_ccall f_2896(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_2896r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_2896r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2896r(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_2898,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_2903,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_2908,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_2913,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_2913(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_2908(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_2903(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_2898(t15,t1,t9,t11,t13);}
+else{
+/* ##sys#error */
+t15=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
+
+/* def-start1647 in substring-ci=? in k1289 */
+static void C_fcall f_2913(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_2913,NULL,2,t0,t1);}
+/* def-start2648661 */
+t2=((C_word*)t0)[2];
+f_2908(t2,t1,C_fix(0));}
+
+/* def-start2648 in substring-ci=? in k1289 */
+static void C_fcall f_2908(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_2908,NULL,3,t0,t1,t2);}
+/* def-len649658 */
+t3=((C_word*)t0)[2];
+f_2903(t3,t1,t2,C_fix(0));}
+
+/* def-len649 in substring-ci=? in k1289 */
+static void C_fcall f_2903(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_2903,NULL,4,t0,t1,t2,t3);}
+/* body645654 */
+t4=((C_word*)t0)[2];
+f_2898(t4,t1,t2,t3,C_SCHEME_FALSE);}
+
+/* body645 in substring-ci=? in k1289 */
+static void C_fcall f_2898(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_2898,NULL,5,t0,t1,t2,t3,t4);}
+/* data-structures.scm: 453 ##sys#substring-ci=? */
+((C_proc7)C_retrieve_proc(*((C_word*)lf[71]+1)))(7,*((C_word*)lf[71]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
+
+/* ##sys#substring-ci=? in k1289 */
+static void C_ccall f_2859(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_2859,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_i_check_string_2(t2,lf[72]);
+t8=(C_word)C_i_check_string_2(t3,lf[72]);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2869,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_2869(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_2869(t14,(C_word)C_i_fixnum_min(t11,t13));}}
+
+/* k2867 in ##sys#substring-ci=? in k1289 */
+static void C_fcall f_2869(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[72]);
+t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[72]);
+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 k1289 */
+static void C_ccall f_2779(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_2779r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_2779r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2779r(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_2781,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_2786,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_2791,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_2796,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_2796(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_2791(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_2786(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_2781(t15,t1,t9,t11,t13);}
+else{
+/* ##sys#error */
+t15=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t1,lf[0],t14);}}}}}
+
+/* def-start1590 in substring=? in k1289 */
+static void C_fcall f_2796(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_2796,NULL,2,t0,t1);}
+/* def-start2591604 */
+t2=((C_word*)t0)[2];
+f_2791(t2,t1,C_fix(0));}
+
+/* def-start2591 in substring=? in k1289 */
+static void C_fcall f_2791(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_2791,NULL,3,t0,t1,t2);}
+/* def-len592601 */
+t3=((C_word*)t0)[2];
+f_2786(t3,t1,t2,C_fix(0));}
+
+/* def-len592 in substring=? in k1289 */
+static void C_fcall f_2786(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_2786,NULL,4,t0,t1,t2,t3);}
+/* body588597 */
+t4=((C_word*)t0)[2];
+f_2781(t4,t1,t2,t3,C_SCHEME_FALSE);}
+
+/* body588 in substring=? in k1289 */
+static void C_fcall f_2781(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_2781,NULL,5,t0,t1,t2,t3,t4);}
+/* data-structures.scm: 439 ##sys#substring=? */
+((C_proc7)C_retrieve_proc(*((C_word*)lf[69]+1)))(7,*((C_word*)lf[69]+1),t1,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3,t4);}
+
+/* ##sys#substring=? in k1289 */
+static void C_ccall f_2742(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_2742,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_i_check_string_2(t2,lf[70]);
+t8=(C_word)C_i_check_string_2(t3,lf[70]);
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2752,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_2752(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_2752(t14,(C_word)C_i_fixnum_min(t11,t13));}}
+
+/* k2750 in ##sys#substring=? in k1289 */
+static void C_fcall f_2752(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[70]);
+t3=(C_word)C_i_check_exact_2(((C_word*)t0)[5],lf[70]);
+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 k1289 */
+static void C_ccall f_2711(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_2711,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[68]);
+t5=(C_word)C_i_check_string_2(t3,lf[68]);
+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 k1289 */
+static void C_ccall f_2680(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_2680,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_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 k1289 */
+static void C_ccall f_2652(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_2652r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_2652r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2652r(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_2656,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: 398 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[65]+1)))(5,*((C_word*)lf[65]+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: 398 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[65]+1)))(5,*((C_word*)lf[65]+1),t1,t2,t3,t7);}
+else{
+/* ##sys#error */
+t7=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k2654 in substring-index-ci in k1289 */
+static void C_ccall f_2656(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 398 ##sys#substring-index-ci */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[65]+1)))(5,*((C_word*)lf[65]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* substring-index in k1289 */
+static void C_ccall f_2624(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_2624r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_2624r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2624r(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_2628,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: 395 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[63]+1)))(5,*((C_word*)lf[63]+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: 395 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[63]+1)))(5,*((C_word*)lf[63]+1),t1,t2,t3,t7);}
+else{
+/* ##sys#error */
+t7=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k2626 in substring-index in k1289 */
+static void C_ccall f_2628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 395 ##sys#substring-index */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[63]+1)))(5,*((C_word*)lf[63]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* ##sys#substring-index-ci in k1289 */
+static void C_ccall f_2615(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_2615,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2621,a[2]=t3,a[3]=t2,a[4]=((C_word)li81),tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 389 traverse */
+f_2559(t1,t2,t3,t4,t5,lf[66]);}
+
+/* a2620 in ##sys#substring-index-ci in k1289 */
+static void C_ccall f_2621(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_2621,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 k1289 */
+static void C_ccall f_2606(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_2606,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2612,a[2]=t3,a[3]=t2,a[4]=((C_word)li79),tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 383 traverse */
+f_2559(t1,t2,t3,t4,t5,lf[64]);}
+
+/* a2611 in ##sys#substring-index in k1289 */
+static void C_ccall f_2612(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_2612,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 k1289 */
+static void C_fcall f_2559(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_2559,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_2580,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_2580(t15,t1,t4,t10);}
+
+/* loop in traverse in k1289 */
+static void C_fcall f_2580(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_2580,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_2593,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: 377 test */
+t5=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,((C_word*)t0)[2]);}}
+
+/* k2591 in loop in traverse in k1289 */
+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 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: 379 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_2580(t4,((C_word*)t0)[5],t2,t3);}}
+
+/* conc in k1289 */
+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);
+C_check_for_interrupt;
+if(!C_demand(c*C_SIZEOF_PAIR+16)){
+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 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_2522,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_2524,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_2524(t11,t7,t2);}
+
+/* loop452 in conc in k1289 */
+static void C_fcall f_2524(C_word t0,C_word 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_2524,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[58]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2553,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);}}
+
+/* k2551 in loop452 in conc in k1289 */
+static void C_ccall f_2553(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_2553,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_2524(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_2524(t6,((C_word*)t0)[3],t5);}}
+
+/* k2520 in conc in k1289 */
+static void C_ccall f_2522(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 k1289 */
+static void C_ccall f_2469(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_2469,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: 352 symbol->string */
+t3=*((C_word*)lf[59]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
+else{
+if(C_truep((C_word)C_charp(t2))){
+/* data-structures.scm: 353 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: 354 ##sys#number->string */
+t3=*((C_word*)lf[60]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2506,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: 356 open-output-string */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}}}}}
+
+/* k2504 in ->string in k1289 */
+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[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2506,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2509,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: 357 display */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],t1);}
+
+/* k2507 in k2504 in ->string in k1289 */
+static void C_ccall f_2509(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 358 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 k1289 */
+static void C_ccall f_2392(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_2392,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_2395,a[2]=t4,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp));
+/* data-structures.scm: 341 rev-string-append */
+t6=((C_word*)t4)[1];
+f_2395(t6,t1,t2,C_fix(0));}
+
+/* rev-string-append in reverse-string-append in k1289 */
+static void C_fcall f_2395(C_word t0,C_word 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_2395,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_2411,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: 332 rev-string-append */
+t10=t6;
+t11=t7;
+t12=t8;
+t1=t10;
+t2=t11;
+t3=t12;
+goto loop;}
+else{
+/* data-structures.scm: 339 make-string */
+t4=*((C_word*)lf[53]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}}
+
+/* k2409 in rev-string-append in reverse-string-append in k1289 */
+static void C_ccall f_2411(C_word c,C_word t0,C_word t1){
+C_word 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_2411,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_2420,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_2420(t8,((C_word*)t0)[2],C_fix(0),t4);}
+
+/* loop in k2409 in rev-string-append in reverse-string-append in k1289 */
+static void C_fcall f_2420(C_word t0,C_word 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_2420,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: 337 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 k1289 */
+static void C_ccall f_2342(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_2342r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_2342r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2342r(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[51]);
+t6=(C_word)C_notvemptyp(t4);
+t7=(C_truep(t6)?(C_word)C_i_vector_ref(t4,C_fix(0)):*((C_word*)lf[46]+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_2354,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_2354(t11,t1,t3);}
+
+/* loop in rassoc in k1289 */
+static void C_fcall f_2354(C_word t0,C_word 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_2354,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[51]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2373,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: 318 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);}}
+
+/* k2371 in loop in rassoc in k1289 */
+static void C_ccall f_2373(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: 320 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_2354(t3,((C_word*)t0)[5],t2);}}
+
+/* alist-ref in k1289 */
+static void C_ccall f_2218(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_2218r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_2218r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2218r(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_2220,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_2289,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_2294,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_2294(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_2289(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_2220(t12,t1,t8,t10);}
+else{
+/* ##sys#error */
+t12=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t1,lf[0],t11);}}}}
+
+/* def-cmp364 in alist-ref in k1289 */
+static void C_fcall f_2294(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_2294,NULL,2,t0,t1);}
+/* def-default365392 */
+t2=((C_word*)t0)[2];
+f_2289(t2,t1,*((C_word*)lf[46]+1));}
+
+/* def-default365 in alist-ref in k1289 */
+static void C_fcall f_2289(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_2289,NULL,3,t0,t1,t2);}
+/* body362370 */
+t3=((C_word*)t0)[2];
+f_2220(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body362 in alist-ref in k1289 */
+static void C_fcall f_2220(C_word t0,C_word 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_2220,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2224,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[44]+1),t2);
+if(C_truep(t5)){
+t6=t4;
+f_2224(t6,*((C_word*)lf[45]+1));}
+else{
+t6=(C_word)C_eqp(*((C_word*)lf[46]+1),t2);
+if(C_truep(t6)){
+t7=*((C_word*)lf[47]+1);
+t8=t4;
+f_2224(t8,t7);}
+else{
+t7=(C_word)C_eqp(*((C_word*)lf[48]+1),t2);
+t8=t4;
+f_2224(t8,(C_truep(t7)?*((C_word*)lf[49]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2249,a[2]=t2,a[3]=((C_word)li64),tmp=(C_word)a,a+=4,tmp)));}}}
+
+/* f_2249 in body362 in alist-ref in k1289 */
+static void C_ccall f_2249(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_2249,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_2255,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_2255(t7,t1,t3);}
+
+/* loop */
+static void C_fcall f_2255(C_word 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_2255,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_2271,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: 303 cmp */
+t6=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
+else{
+t5=t4;
+f_2271(2,t5,C_SCHEME_FALSE);}}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k2269 in loop */
+static void C_ccall f_2271(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: 305 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_2255(t3,((C_word*)t0)[5],t2);}}
+
+/* k2222 in body362 in alist-ref in k1289 */
+static void C_fcall f_2224(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_2224,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2227,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 306 aq */
+t3=t1;
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k2225 in k2222 in body362 in alist-ref in k1289 */
+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 *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 k1289 */
+static void C_ccall f_2119(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_2119r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest(a,C_rest_count(0));
+f_2119r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_2119r(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_2123,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_2123(2,t7,*((C_word*)lf[46]+1));}
+else{
+t7=(C_word)C_i_cdr(t5);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=t6;
+f_2123(2,t8,(C_word)C_i_car(t5));}
+else{
+/* ##sys#error */
+t8=*((C_word*)lf[32]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t5);}}}
+
+/* k2121 in alist-update! in k1289 */
+static void C_ccall f_2123(C_word c,C_word t0,C_word 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_2123,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2126,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[44]+1),t1);
+if(C_truep(t3)){
+t4=t2;
+f_2126(t4,*((C_word*)lf[45]+1));}
+else{
+t4=(C_word)C_eqp(*((C_word*)lf[46]+1),t1);
+if(C_truep(t4)){
+t5=*((C_word*)lf[47]+1);
+t6=t2;
+f_2126(t6,t5);}
+else{
+t5=(C_word)C_eqp(*((C_word*)lf[48]+1),t1);
+t6=t2;
+f_2126(t6,(C_truep(t5)?*((C_word*)lf[49]+1):(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2158,a[2]=t1,a[3]=((C_word)li61),tmp=(C_word)a,a+=4,tmp)));}}}
+
+/* f_2158 in k2121 in alist-update! in k1289 */
+static void C_ccall f_2158(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_2158,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_2164,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_2164(t7,t1,t3);}
+
+/* loop */
+static void C_fcall f_2164(C_word 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_2164,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_2180,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: 284 cmp */
+t6=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t4,t5,((C_word*)t0)[2]);}
+else{
+t5=t4;
+f_2180(2,t5,C_SCHEME_FALSE);}}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k2178 in loop */
+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 *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: 286 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_2164(t3,((C_word*)t0)[5],t2);}}
+
+/* k2124 in k2121 in alist-update! in k1289 */
+static void C_fcall f_2126(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_2126,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2129,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: 287 aq */
+t3=t1;
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
+
+/* k2127 in k2124 in k2121 in alist-update! in k1289 */
+static void C_ccall f_2129(C_word c,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_2129,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 k1289 */
+static void C_ccall f_2009(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_2009,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_2020,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_2059,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_2075,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_2075(t18,t14,t2);}
+
+/* loop286 in shuffle in k1289 */
+static void C_fcall f_2075(C_word t0,C_word 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_2075,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_2102,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_2113,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_2102(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k2111 in loop286 in shuffle in k1289 */
+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 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_2113,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_2075(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_2075(t6,((C_word*)t0)[3],t5);}}
+
+/* g302 in loop286 in shuffle in k1289 */
+static void C_fcall f_2102(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_2102,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2110,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 269 random */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k2108 in g302 in loop286 in shuffle in k1289 */
+static void C_ccall f_2110(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_2110,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]));}
+
+/* k2057 in shuffle in k1289 */
+static void C_ccall f_2059(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_2059,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2061,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp);
+/* data-structures.scm: 269 sort! */
+t3=*((C_word*)lf[42]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
+
+/* a2060 in k2057 in shuffle in k1289 */
+static void C_ccall f_2061(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_2061,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));}
+
+/* k2018 in shuffle in k1289 */
+static void C_ccall f_2020(C_word c,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_2020,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_2022,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_2022(t5,((C_word*)t0)[2],t1);}
+
+/* loop263 in k2018 in shuffle in k1289 */
+static void C_fcall f_2022(C_word t0,C_word 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_2022,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[41]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2051,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);}}
+
+/* k2049 in loop263 in k2018 in shuffle in k1289 */
+static void C_ccall f_2051(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_2051,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_2022(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_2022(t6,((C_word*)t0)[3],t5);}}
+
+/* compress in k1289 */
+static void C_ccall f_1929(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_1929,4,t0,t1,t2,t3);}
+t4=lf[37];
+t5=(C_word)C_i_check_list_2(t3,lf[36]);
+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_1938,a[2]=t4,a[3]=t7,a[4]=((C_word)li53),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_1938(t9,t1,t2,t3);}
+
+/* loop in compress in k1289 */
+static void C_fcall f_1938(C_word t0,C_word 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_1938,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_1980,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: 261 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: 262 loop */
+t11=t1;
+t12=t4;
+t13=t5;
+t1=t11;
+t2=t12;
+t3=t13;
+goto loop;}}
+else{
+/* data-structures.scm: 260 ##sys#signal-hook */
+t4=*((C_word*)lf[38]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[39],lf[36],((C_word*)t0)[2],t3);}}
+else{
+/* data-structures.scm: 258 ##sys#signal-hook */
+t4=*((C_word*)lf[38]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[39],lf[36],((C_word*)t0)[2],t2);}}}
+
+/* k1978 in loop in compress in k1289 */
+static void C_ccall f_1980(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_1980,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 k1289 */
+static void C_ccall f_1870(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_1870r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_1870r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1870r(C_word t0,C_word 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[34]);
+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_1882,a[2]=t8,a[3]=t5,a[4]=((C_word)li51),tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_1882(t10,t1,t2);}
+
+/* loop in join in k1289 */
+static void C_fcall f_1882(C_word t0,C_word 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_1882,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_1917,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 249 loop */
+t7=t5;
+t8=t4;
+t1=t7;
+t2=t8;
+goto loop;}}
+else{
+/* data-structures.scm: 243 ##sys#error-not-a-proper-list */
+t3=*((C_word*)lf[35]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}}}
+
+/* k1915 in loop in join in k1289 */
+static void C_ccall f_1917(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 249 ##sys#append */
+t2=*((C_word*)lf[22]+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 k1289 */
+static void C_ccall f_1785(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_1785,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_exact_2(t3,lf[31]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1792,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: 224 ##sys#error */
+t6=*((C_word*)lf[32]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[31],lf[33],t3);}
+else{
+t6=t5;
+f_1792(2,t6,C_SCHEME_UNDEFINED);}}
+
+/* k1790 in chop in k1289 */
+static void C_ccall f_1792(C_word c,C_word t0,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_1792,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_1800,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_1800(t6,((C_word*)t0)[2],((C_word*)t0)[5],t2);}
+
+/* loop in k1790 in chop in k1289 */
+static void C_fcall f_1800(C_word t0,C_word 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_1800,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_1821,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_1821(t7,t1,C_SCHEME_END_OF_LIST,t2,((C_word*)t0)[4]);}}}
+
+/* doloop205 in loop in k1790 in chop in k1289 */
+static void C_fcall f_1821(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_1821,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_1835,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: 235 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;}}
+
+/* k1833 in doloop205 in loop in k1790 in chop in k1289 */
+static void C_ccall f_1835(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_1835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1839,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: 235 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_1800(t4,t2,((C_word*)t0)[2],t3);}
+
+/* k1837 in k1833 in doloop205 in loop in k1790 in chop in k1289 */
+static void C_ccall f_1839(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_1839,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 k1289 */
+static void C_ccall f_1744(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_1744r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1744r(t0,t1,t2);}}
+
+static void C_ccall f_1744r(C_word 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_1750,a[2]=t4,a[3]=((C_word)li46),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_1750(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+
+/* loop in flatten in k1289 */
+static void C_fcall f_1750(C_word t0,C_word 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_1750,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_1776,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 216 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_1783,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 217 loop */
+t10=t6;
+t11=t5;
+t12=t3;
+t1=t10;
+t2=t11;
+t3=t12;
+goto loop;}}}
+
+/* k1781 in loop in flatten in k1289 */
+static void C_ccall f_1783(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_1783,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));}
+
+/* k1774 in loop in flatten in k1289 */
+static void C_ccall f_1776(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 216 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_1750(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* butlast in k1289 */
+static void C_ccall f_1712(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_1712,3,t0,t1,t2);}
+t3=(C_word)C_i_check_pair_2(t2,lf[29]);
+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_1721,a[2]=t5,a[3]=((C_word)li44),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_1721(t7,t1,t2);}
+
+/* loop in butlast in k1289 */
+static void C_fcall f_1721(C_word t0,C_word 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_1721,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_1742,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 206 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);}}
+
+/* k1740 in loop in butlast in k1289 */
+static void C_ccall f_1742(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_1742,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 k1289 */
+static void C_ccall f_1679(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_1679,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_1685,a[2]=t5,a[3]=t3,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp));
+t7=((C_word*)t5)[1];
+f_1685(t7,t1,t2);}
+
+/* loop in intersperse in k1289 */
+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 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_1685,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_1710,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 199 loop */
+t8=t5;
+t9=t3;
+t1=t8;
+t2=t9;
+goto loop;}}}
+
+/* k1708 in loop in intersperse in k1289 */
+static void C_ccall f_1710(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_1710,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 k1289 */
+static void C_ccall f_1651(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_1651,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_list_2(t3,lf[27]);
+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_1663,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_1663(t6,t3));}}
+
+/* loop in tail? in k1289 */
+static C_word C_fcall f_1663(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 k1289 */
+static void C_ccall f_1648(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_1648,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 k1289 */
+static void C_ccall f_1622(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_1622r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_1622r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1622r(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_1626,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: 173 ##sys#check-closure */
+t5=*((C_word*)lf[23]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[25]);}
+
+/* k1624 in right-section in k1289 */
+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[5],*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|4,a[1]=(C_word)f_1629,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: 174 ##sys#reverse */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k1627 in k1624 in right-section in k1289 */
+static void C_ccall f_1629(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_1629,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_1630,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_1630 in k1627 in k1624 in right-section in k1289 */
+static void C_ccall f_1630(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_1630r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1630r(t0,t1,t2);}}
+
+static void C_ccall f_1630r(C_word 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_1638,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_1642,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_1646,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 176 ##sys#reverse */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
+
+/* k1644 */
+static void C_ccall f_1646(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 176 ##sys#append */
+t2=*((C_word*)lf[22]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k1640 */
+static void C_ccall f_1642(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 176 ##sys#reverse */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k1636 */
+static void C_ccall f_1638(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 k1289 */
+static void C_ccall f_1607(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_1607r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_1607r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1607r(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_1611,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* data-structures.scm: 166 ##sys#check-closure */
+t5=*((C_word*)lf[23]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[21]);}
+
+/* k1609 in left-section in k1289 */
+static void C_ccall f_1611(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_1611,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_1612,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_1612 in k1609 in left-section in k1289 */
+static void C_ccall f_1612(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_1612r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1612r(t0,t1,t2);}}
+
+static void C_ccall f_1612r(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_1620,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* data-structures.scm: 168 ##sys#append */
+t4=*((C_word*)lf[22]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t2);}
+
+/* k1618 */
+static void C_ccall f_1620(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 k1289 */
+static void C_ccall f_1604(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_1604,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* always? in k1289 */
+static void C_ccall f_1601(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_1601,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
+
+/* none? in k1289 */
+static void C_ccall f_1598(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_1598,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+
+/* any? in k1289 */
+static void C_ccall f_1595(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_1595,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_TRUE);}
+
+/* each in k1289 */
+static void C_ccall f_1539(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_1539r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1539r(t0,t1,t2);}}
+
+static void C_ccall f_1539r(C_word 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_1547,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_1561,a[2]=t2,a[3]=((C_word)li29),tmp=(C_word)a,a+=4,tmp)));}}
+
+/* f_1561 in each in k1289 */
+static void C_ccall f_1561(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_1561r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1561r(t0,t1,t2);}}
+
+static void C_ccall f_1561r(C_word 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_1567,a[2]=t4,a[3]=t2,a[4]=((C_word)li28),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_1567(t6,t1,((C_word*)t0)[2]);}
+
+/* loop */
+static void C_fcall f_1567(C_word 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_1567,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_1586,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]);}}
+
+/* k1584 in loop */
+static void C_ccall f_1586(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* data-structures.scm: 155 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_1567(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* f_1547 in each in k1289 */
+static void C_ccall f_1547(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_1547,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[15]+1));}
+
+/* noop in k1289 */
+static void C_ccall f_1533(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_1533,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[15]+1));}
+
+/* list-of? in k1289 */
+static void C_ccall f_1492(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_1492,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_1494,a[2]=t2,a[3]=((C_word)li24),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1494 in list-of? in k1289 */
+static void C_ccall f_1494(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_1494,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_1500,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_1500(t6,t1,t2);}
+
+/* loop */
+static void C_fcall f_1500(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_1500,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_1519,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);}}}
+
+/* k1517 in loop */
+static void C_ccall f_1519(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_1500(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 k1289 */
+static void C_ccall f_1453(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_1453r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1453r(t0,t1,t2);}}
+
+static void C_ccall f_1453r(C_word t0,C_word 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_1465,a[2]=t4,a[3]=((C_word)li21),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_1465(t6,t1,t2);}}
+
+/* loop in o in k1289 */
+static void C_fcall f_1465(C_word 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_1465,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_1479,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_1479 in loop in o in k1289 */
+static void C_ccall f_1479(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_1479,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1487,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_1465(t4,t3,((C_word*)t0)[2]);}
+
+/* k1485 */
+static void C_ccall f_1487(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_1487,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1490,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]);}
+
+/* k1488 in k1485 */
+static void C_ccall f_1490(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 k1289 */
+static void C_ccall f_1417(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_1417r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1417r(t0,t1,t2);}}
+
+static void C_ccall f_1417r(C_word t0,C_word 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_1420,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 k1289 */
+static void C_ccall f_1420(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_1420r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_1420r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1420r(C_word 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_1428,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_1428 in rec in compose in k1289 */
+static void C_ccall f_1428(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_1428r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1428r(t0,t1,t2);}}
+
+static void C_ccall f_1428r(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_1434,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]);}
+
+/* a1433 */
+static void C_ccall f_1434(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_1434,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1442,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]);}
+
+/* k1440 in a1433 */
+static void C_ccall f_1442(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 k1289 */
+static void C_ccall f_1405(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_1405,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_1407,a[2]=t2,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1407 in complement in k1289 */
+static void C_ccall f_1407(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_1407r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1407r(t0,t1,t2);}}
+
+static void C_ccall f_1407r(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_1415,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_apply(4,0,t3,((C_word*)t0)[2],t2);}
+
+/* k1413 */
+static void C_ccall f_1415(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 k1289 */
+static void C_ccall f_1397(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_1397,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_1399,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1399 in flip in k1289 */
+static void C_ccall f_1399(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_1399,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 k1289 */
+static void C_ccall f_1374(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_1374r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1374r(t0,t1,t2);}}
+
+static void C_ccall f_1374r(C_word t0,C_word 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_1385,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_1387,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_1387 in constantly in k1289 */
+static void C_ccall f_1387(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_1387,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* f_1385 in constantly in k1289 */
+static void C_ccall f_1385(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_1385,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* disjoin in k1289 */
+static void C_ccall f_1337(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_1337r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1337r(t0,t1,t2);}}
+
+static void C_ccall f_1337r(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_1339,a[2]=t2,a[3]=((C_word)li7),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1339 in disjoin in k1289 */
+static void C_ccall f_1339(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_1339,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_1345,a[2]=t2,a[3]=t4,a[4]=((C_word)li6),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_1345(t6,t1,((C_word*)t0)[2]);}
+
+/* loop */
+static void C_fcall f_1345(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_1345,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_1358,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]);}}
+
+/* k1356 in loop */
+static void C_ccall f_1358(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_1345(t3,((C_word*)t0)[4],t2);}}
+
+/* conjoin in k1289 */
+static void C_ccall f_1304(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_1304r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1304r(t0,t1,t2);}}
+
+static void C_ccall f_1304r(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_1306,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1306 in conjoin in k1289 */
+static void C_ccall f_1306(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_1306,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_1312,a[2]=t2,a[3]=t4,a[4]=((C_word)li3),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_1312(t6,t1,((C_word*)t0)[2]);}
+
+/* loop */
+static void C_fcall f_1312(C_word 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_1312,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_1328,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]);}}
+
+/* k1326 in loop */
+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 *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_1312(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 k1289 */
+static void C_ccall f_1296(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_1296,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_1298,a[2]=t2,a[3]=((C_word)li1),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_1298 in project in k1289 */
+static void C_ccall f_1298(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_1298r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_1298r(t0,t1,t2);}}
+
+static void C_ccall f_1298r(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 k1289 */
+static void C_ccall f_1293(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_1293,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_1291:data_structures_scm",(void*)f_1291},
+{"f_4739:data_structures_scm",(void*)f_4739},
+{"f_4749:data_structures_scm",(void*)f_4749},
+{"f_4768:data_structures_scm",(void*)f_4768},
+{"f_4710:data_structures_scm",(void*)f_4710},
+{"f_4656:data_structures_scm",(void*)f_4656},
+{"f_4675:data_structures_scm",(void*)f_4675},
+{"f_4685:data_structures_scm",(void*)f_4685},
+{"f_4667:data_structures_scm",(void*)f_4667},
+{"f_4647:data_structures_scm",(void*)f_4647},
+{"f_4611:data_structures_scm",(void*)f_4611},
+{"f_4621:data_structures_scm",(void*)f_4621},
+{"f_4579:data_structures_scm",(void*)f_4579},
+{"f_4558:data_structures_scm",(void*)f_4558},
+{"f_4568:data_structures_scm",(void*)f_4568},
+{"f_4537:data_structures_scm",(void*)f_4537},
+{"f_4547:data_structures_scm",(void*)f_4547},
+{"f_4524:data_structures_scm",(void*)f_4524},
+{"f_4518:data_structures_scm",(void*)f_4518},
+{"f_4512:data_structures_scm",(void*)f_4512},
+{"f_4429:data_structures_scm",(void*)f_4429},
+{"f_4507:data_structures_scm",(void*)f_4507},
+{"f_4433:data_structures_scm",(void*)f_4433},
+{"f_4447:data_structures_scm",(void*)f_4447},
+{"f_4457:data_structures_scm",(void*)f_4457},
+{"f_4166:data_structures_scm",(void*)f_4166},
+{"f_4393:data_structures_scm",(void*)f_4393},
+{"f_4416:data_structures_scm",(void*)f_4416},
+{"f_4401:data_structures_scm",(void*)f_4401},
+{"f_4316:data_structures_scm",(void*)f_4316},
+{"f_4383:data_structures_scm",(void*)f_4383},
+{"f_4387:data_structures_scm",(void*)f_4387},
+{"f_4319:data_structures_scm",(void*)f_4319},
+{"f_4328:data_structures_scm",(void*)f_4328},
+{"f_4368:data_structures_scm",(void*)f_4368},
+{"f_4336:data_structures_scm",(void*)f_4336},
+{"f_4340:data_structures_scm",(void*)f_4340},
+{"f_4322:data_structures_scm",(void*)f_4322},
+{"f_4257:data_structures_scm",(void*)f_4257},
+{"f_4261:data_structures_scm",(void*)f_4261},
+{"f_4270:data_structures_scm",(void*)f_4270},
+{"f_4302:data_structures_scm",(void*)f_4302},
+{"f_4278:data_structures_scm",(void*)f_4278},
+{"f_4282:data_structures_scm",(void*)f_4282},
+{"f_4264:data_structures_scm",(void*)f_4264},
+{"f_4222:data_structures_scm",(void*)f_4222},
+{"f_4228:data_structures_scm",(void*)f_4228},
+{"f_4255:data_structures_scm",(void*)f_4255},
+{"f_4241:data_structures_scm",(void*)f_4241},
+{"f_4175:data_structures_scm",(void*)f_4175},
+{"f_4181:data_structures_scm",(void*)f_4181},
+{"f_4220:data_structures_scm",(void*)f_4220},
+{"f_4202:data_structures_scm",(void*)f_4202},
+{"f_4139:data_structures_scm",(void*)f_4139},
+{"f_4164:data_structures_scm",(void*)f_4164},
+{"f_4157:data_structures_scm",(void*)f_4157},
+{"f_4153:data_structures_scm",(void*)f_4153},
+{"f_4006:data_structures_scm",(void*)f_4006},
+{"f_4096:data_structures_scm",(void*)f_4096},
+{"f_4103:data_structures_scm",(void*)f_4103},
+{"f_4105:data_structures_scm",(void*)f_4105},
+{"f_4009:data_structures_scm",(void*)f_4009},
+{"f_4060:data_structures_scm",(void*)f_4060},
+{"f_4019:data_structures_scm",(void*)f_4019},
+{"f_4022:data_structures_scm",(void*)f_4022},
+{"f_4028:data_structures_scm",(void*)f_4028},
+{"f_3874:data_structures_scm",(void*)f_3874},
+{"f_3956:data_structures_scm",(void*)f_3956},
+{"f_3979:data_structures_scm",(void*)f_3979},
+{"f_3959:data_structures_scm",(void*)f_3959},
+{"f_3877:data_structures_scm",(void*)f_3877},
+{"f_3884:data_structures_scm",(void*)f_3884},
+{"f_3775:data_structures_scm",(void*)f_3775},
+{"f_3809:data_structures_scm",(void*)f_3809},
+{"f_3816:data_structures_scm",(void*)f_3816},
+{"f_3864:data_structures_scm",(void*)f_3864},
+{"f_3836:data_structures_scm",(void*)f_3836},
+{"f_3666:data_structures_scm",(void*)f_3666},
+{"f_3741:data_structures_scm",(void*)f_3741},
+{"f_3769:data_structures_scm",(void*)f_3769},
+{"f_3693:data_structures_scm",(void*)f_3693},
+{"f_3703:data_structures_scm",(void*)f_3703},
+{"f_3614:data_structures_scm",(void*)f_3614},
+{"f_3618:data_structures_scm",(void*)f_3618},
+{"f_3550:data_structures_scm",(void*)f_3550},
+{"f_3565:data_structures_scm",(void*)f_3565},
+{"f_3596:data_structures_scm",(void*)f_3596},
+{"f_3600:data_structures_scm",(void*)f_3600},
+{"f_3585:data_structures_scm",(void*)f_3585},
+{"f_3428:data_structures_scm",(void*)f_3428},
+{"f_3440:data_structures_scm",(void*)f_3440},
+{"f_3473:data_structures_scm",(void*)f_3473},
+{"f_3538:data_structures_scm",(void*)f_3538},
+{"f_3512:data_structures_scm",(void*)f_3512},
+{"f_3468:data_structures_scm",(void*)f_3468},
+{"f_3454:data_structures_scm",(void*)f_3454},
+{"f_3226:data_structures_scm",(void*)f_3226},
+{"f_3420:data_structures_scm",(void*)f_3420},
+{"f_3403:data_structures_scm",(void*)f_3403},
+{"f_3263:data_structures_scm",(void*)f_3263},
+{"f_3266:data_structures_scm",(void*)f_3266},
+{"f_3278:data_structures_scm",(void*)f_3278},
+{"f_3283:data_structures_scm",(void*)f_3283},
+{"f_3302:data_structures_scm",(void*)f_3302},
+{"f_3229:data_structures_scm",(void*)f_3229},
+{"f_3234:data_structures_scm",(void*)f_3234},
+{"f_3240:data_structures_scm",(void*)f_3240},
+{"f_3111:data_structures_scm",(void*)f_3111},
+{"f_3115:data_structures_scm",(void*)f_3115},
+{"f_3129:data_structures_scm",(void*)f_3129},
+{"f_3139:data_structures_scm",(void*)f_3139},
+{"f_3144:data_structures_scm",(void*)f_3144},
+{"f_2976:data_structures_scm",(void*)f_2976},
+{"f_3017:data_structures_scm",(void*)f_3017},
+{"f_3044:data_structures_scm",(void*)f_3044},
+{"f_3083:data_structures_scm",(void*)f_3083},
+{"f_3027:data_structures_scm",(void*)f_3027},
+{"f_2997:data_structures_scm",(void*)f_2997},
+{"f_3012:data_structures_scm",(void*)f_3012},
+{"f_2896:data_structures_scm",(void*)f_2896},
+{"f_2913:data_structures_scm",(void*)f_2913},
+{"f_2908:data_structures_scm",(void*)f_2908},
+{"f_2903:data_structures_scm",(void*)f_2903},
+{"f_2898:data_structures_scm",(void*)f_2898},
+{"f_2859:data_structures_scm",(void*)f_2859},
+{"f_2869:data_structures_scm",(void*)f_2869},
+{"f_2779:data_structures_scm",(void*)f_2779},
+{"f_2796:data_structures_scm",(void*)f_2796},
+{"f_2791:data_structures_scm",(void*)f_2791},
+{"f_2786:data_structures_scm",(void*)f_2786},
+{"f_2781:data_structures_scm",(void*)f_2781},
+{"f_2742:data_structures_scm",(void*)f_2742},
+{"f_2752:data_structures_scm",(void*)f_2752},
+{"f_2711:data_structures_scm",(void*)f_2711},
+{"f_2680:data_structures_scm",(void*)f_2680},
+{"f_2652:data_structures_scm",(void*)f_2652},
+{"f_2656:data_structures_scm",(void*)f_2656},
+{"f_2624:data_structures_scm",(void*)f_2624},
+{"f_2628:data_structures_scm",(void*)f_2628},
+{"f_2615:data_structures_scm",(void*)f_2615},
+{"f_2621:data_structures_scm",(void*)f_2621},
+{"f_2606:data_structures_scm",(void*)f_2606},
+{"f_2612:data_structures_scm",(void*)f_2612},
+{"f_2559:data_structures_scm",(void*)f_2559},
+{"f_2580:data_structures_scm",(void*)f_2580},
+{"f_2593:data_structures_scm",(void*)f_2593},
+{"f_2514:data_structures_scm",(void*)f_2514},
+{"f_2524:data_structures_scm",(void*)f_2524},
+{"f_2553:data_structures_scm",(void*)f_2553},
+{"f_2522:data_structures_scm",(void*)f_2522},
+{"f_2469:data_structures_scm",(void*)f_2469},
+{"f_2506:data_structures_scm",(void*)f_2506},
+{"f_2509:data_structures_scm",(void*)f_2509},
+{"f_2392:data_structures_scm",(void*)f_2392},
+{"f_2395:data_structures_scm",(void*)f_2395},
+{"f_2411:data_structures_scm",(void*)f_2411},
+{"f_2420:data_structures_scm",(void*)f_2420},
+{"f_2342:data_structures_scm",(void*)f_2342},
+{"f_2354:data_structures_scm",(void*)f_2354},
+{"f_2373:data_structures_scm",(void*)f_2373},
+{"f_2218:data_structures_scm",(void*)f_2218},
+{"f_2294:data_structures_scm",(void*)f_2294},
+{"f_2289:data_structures_scm",(void*)f_2289},
+{"f_2220:data_structures_scm",(void*)f_2220},
+{"f_2249:data_structures_scm",(void*)f_2249},
+{"f_2255:data_structures_scm",(void*)f_2255},
+{"f_2271:data_structures_scm",(void*)f_2271},
+{"f_2224:data_structures_scm",(void*)f_2224},
+{"f_2227:data_structures_scm",(void*)f_2227},
+{"f_2119:data_structures_scm",(void*)f_2119},
+{"f_2123:data_structures_scm",(void*)f_2123},
+{"f_2158:data_structures_scm",(void*)f_2158},
+{"f_2164:data_structures_scm",(void*)f_2164},
+{"f_2180:data_structures_scm",(void*)f_2180},
+{"f_2126:data_structures_scm",(void*)f_2126},
+{"f_2129:data_structures_scm",(void*)f_2129},
+{"f_2009:data_structures_scm",(void*)f_2009},
+{"f_2075:data_structures_scm",(void*)f_2075},
+{"f_2113:data_structures_scm",(void*)f_2113},
+{"f_2102:data_structures_scm",(void*)f_2102},
+{"f_2110:data_structures_scm",(void*)f_2110},
+{"f_2059:data_structures_scm",(void*)f_2059},
+{"f_2061:data_structures_scm",(void*)f_2061},
+{"f_2020:data_structures_scm",(void*)f_2020},
+{"f_2022:data_structures_scm",(void*)f_2022},
+{"f_2051:data_structures_scm",(void*)f_2051},
+{"f_1929:data_structures_scm",(void*)f_1929},
+{"f_1938:data_structures_scm",(void*)f_1938},
+{"f_1980:data_structures_scm",(void*)f_1980},
+{"f_1870:data_structures_scm",(void*)f_1870},
+{"f_1882:data_structures_scm",(void*)f_1882},
+{"f_1917:data_structures_scm",(void*)f_1917},
+{"f_1785:data_structures_scm",(void*)f_1785},
+{"f_1792:data_structures_scm",(void*)f_1792},
+{"f_1800:data_structures_scm",(void*)f_1800},
+{"f_1821:data_structures_scm",(void*)f_1821},
+{"f_1835:data_structures_scm",(void*)f_1835},
+{"f_1839:data_structures_scm",(void*)f_1839},
+{"f_1744:data_structures_scm",(void*)f_1744},
+{"f_1750:data_structures_scm",(void*)f_1750},
+{"f_1783:data_structures_scm",(void*)f_1783},
+{"f_1776:data_structures_scm",(void*)f_1776},
+{"f_1712:data_structures_scm",(void*)f_1712},
+{"f_1721:data_structures_scm",(void*)f_1721},
+{"f_1742:data_structures_scm",(void*)f_1742},
+{"f_1679:data_structures_scm",(void*)f_1679},
+{"f_1685:data_structures_scm",(void*)f_1685},
+{"f_1710:data_structures_scm",(void*)f_1710},
+{"f_1651:data_structures_scm",(void*)f_1651},
+{"f_1663:data_structures_scm",(void*)f_1663},
+{"f_1648:data_structures_scm",(void*)f_1648},
+{"f_1622:data_structures_scm",(void*)f_1622},
+{"f_1626:data_structures_scm",(void*)f_1626},
+{"f_1629:data_structures_scm",(void*)f_1629},
+{"f_1630:data_structures_scm",(void*)f_1630},
+{"f_1646:data_structures_scm",(void*)f_1646},
+{"f_1642:data_structures_scm",(void*)f_1642},
+{"f_1638:data_structures_scm",(void*)f_1638},
+{"f_1607:data_structures_scm",(void*)f_1607},
+{"f_1611:data_structures_scm",(void*)f_1611},
+{"f_1612:data_structures_scm",(void*)f_1612},
+{"f_1620:data_structures_scm",(void*)f_1620},
+{"f_1604:data_structures_scm",(void*)f_1604},
+{"f_1601:data_structures_scm",(void*)f_1601},
+{"f_1598:data_structures_scm",(void*)f_1598},
+{"f_1595:data_structures_scm",(void*)f_1595},
+{"f_1539:data_structures_scm",(void*)f_1539},
+{"f_1561:data_structures_scm",(void*)f_1561},
+{"f_1567:data_structures_scm",(void*)f_1567},
+{"f_1586:data_structures_scm",(void*)f_1586},
+{"f_1547:data_structures_scm",(void*)f_1547},
+{"f_1533:data_structures_scm",(void*)f_1533},
+{"f_1492:data_structures_scm",(void*)f_1492},
+{"f_1494:data_structures_scm",(void*)f_1494},
+{"f_1500:data_structures_scm",(void*)f_1500},
+{"f_1519:data_structures_scm",(void*)f_1519},
+{"f_1453:data_structures_scm",(void*)f_1453},
+{"f_1465:data_structures_scm",(void*)f_1465},
+{"f_1479:data_structures_scm",(void*)f_1479},
+{"f_1487:data_structures_scm",(void*)f_1487},
+{"f_1490:data_structures_scm",(void*)f_1490},
+{"f_1417:data_structures_scm",(void*)f_1417},
+{"f_1420:data_structures_scm",(void*)f_1420},
+{"f_1428:data_structures_scm",(void*)f_1428},
+{"f_1434:data_structures_scm",(void*)f_1434},
+{"f_1442:data_structures_scm",(void*)f_1442},
+{"f_1405:data_structures_scm",(void*)f_1405},
+{"f_1407:data_structures_scm",(void*)f_1407},
+{"f_1415:data_structures_scm",(void*)f_1415},
+{"f_1397:data_structures_scm",(void*)f_1397},
+{"f_1399:data_structures_scm",(void*)f_1399},
+{"f_1374:data_structures_scm",(void*)f_1374},
+{"f_1387:data_structures_scm",(void*)f_1387},
+{"f_1385:data_structures_scm",(void*)f_1385},
+{"f_1337:data_structures_scm",(void*)f_1337},
+{"f_1339:data_structures_scm",(void*)f_1339},
+{"f_1345:data_structures_scm",(void*)f_1345},
+{"f_1358:data_structures_scm",(void*)f_1358},
+{"f_1304:data_structures_scm",(void*)f_1304},
+{"f_1306:data_structures_scm",(void*)f_1306},
+{"f_1312:data_structures_scm",(void*)f_1312},
+{"f_1328:data_structures_scm",(void*)f_1328},
+{"f_1296:data_structures_scm",(void*)f_1296},
+{"f_1298:data_structures_scm",(void*)f_1298},
+{"f_1293:data_structures_scm",(void*)f_1293},
+{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
new file mode 100644
index 00000000..12221e61
--- /dev/null
+++ b/bootstrap/eval.c
@@ -0,0 +1,20013 @@
+/* Generated from eval.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[416];
+static double C_possibly_force_alignment;
+static C_char C_TLS li0[] C_aligned={C_lihdr(0,0,17),40,100,32,97,114,103,49,49,32,46,32,109,111,114,101,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li1[] 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 li2[] 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 li3[] 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 li4[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li5[] 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 li6[] 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 li7[] 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 li8[] 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 li9[] 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 li10[] 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 li11[] 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 li12[] 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 li13[] 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 li14[] 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 li15[] 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 li16[] 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 li17[] 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 li18[] 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 li19[] 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 li20[] 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 li21[] 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 li22[] 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 li23[] 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 li24[] 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 li25[] C_aligned={C_lihdr(0,0,7),40,97,51,53,53,48,41,0};
+static C_char C_TLS li26[] 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 li27[] 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 li28[] C_aligned={C_lihdr(0,0,7),40,97,51,53,57,54,41,0};
+static C_char C_TLS li29[] 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 li30[] 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 li31[] 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 li32[] C_aligned={C_lihdr(0,0,20),40,102,49,48,56,50,55,32,46,32,118,52,50,51,49,48,56,50,54,41,0,0,0,0};
+static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,20),40,102,49,48,56,51,50,32,46,32,118,52,50,51,49,48,56,51,49,41,0,0,0,0};
+static C_char C_TLS li34[] 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 li35[] 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 li36[] 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 li37[] 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 li38[] 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 li39[] 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 li40[] 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 li41[] 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 li42[] 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 li43[] 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 li44[] 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 li45[] 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 li46[] 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 li47[] 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 li48[] 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 li49[] 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 li50[] 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 li51[] 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 li52[] 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 li53[] 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 li54[] 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 li55[] 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 li56[] 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 li57[] 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 li58[] C_aligned={C_lihdr(0,0,7),40,97,52,49,51,48,41,0};
+static C_char C_TLS li59[] 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 li60[] 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 li61[] 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 li62[] 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 li63[] 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 li64[] 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 li65[] 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 li66[] 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 li67[] 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 li68[] 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 li69[] 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 li70[] 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 li71[] 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 li72[] 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 li73[] 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 li74[] 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 li75[] 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 li76[] 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 li77[] 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 li78[] 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 li79[] 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 li80[] C_aligned={C_lihdr(0,0,7),40,97,52,57,53,51,41,0};
+static C_char C_TLS li81[] 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 li82[] 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 li83[] 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 li84[] 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 li85[] 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 li86[] 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 li87[] 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 li88[] 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 li89[] 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 li90[] 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 li91[] 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 li92[] 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 li93[] 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 li94[] 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 li95[] 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 li96[] 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 li97[] 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 li98[] C_aligned={C_lihdr(0,0,42),40,100,111,108,111,111,112,49,50,54,49,32,110,49,50,54,53,32,99,49,50,54,54,32,97,114,103,115,49,50,54,55,32,108,97,115,116,49,50,54,56,41,0,0,0,0,0,0};
+static C_char C_TLS li99[] 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 li100[] 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 li101[] 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 li102[] 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 li103[] 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 li104[] 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 li105[] 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 li106[] C_aligned={C_lihdr(0,0,7),40,97,53,51,49,52,41,0};
+static C_char C_TLS li107[] 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 li108[] 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 li109[] 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 li110[] C_aligned={C_lihdr(0,0,6),40,103,57,53,53,41,0,0};
+static C_char C_TLS li111[] 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 li112[] 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 li113[] 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 li114[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,49,48,51,50,41,0,0,0,0,0,0};
+static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,50,32,120,115,49,48,54,56,41,0,0};
+static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,14),40,102,95,53,55,52,56,32,118,49,48,54,54,41,0,0};
+static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,22),40,108,111,111,112,32,98,111,100,121,49,48,54,51,32,120,115,49,48,54,52,41,0,0};
+static C_char C_TLS li118[] C_aligned={C_lihdr(0,0,7),40,97,53,55,50,51,41,0};
+static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,15),40,103,49,48,48,54,32,101,120,112,49,48,48,56,41,0};
+static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,57,57,48,32,103,49,48,48,48,49,48,48,52,41,0,0,0,0,0};
+static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,50,53,32,103,49,49,51,53,49,49,51,57,41,0,0,0,0};
+static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,13),40,103,49,49,49,50,32,120,49,49,49,52,41,0,0,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,48,57,54,32,103,49,49,48,54,49,49,49,48,41,0,0,0,0};
+static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,7),40,97,54,49,51,53,41,0};
+static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,37),40,97,54,49,52,53,32,101,120,112,49,49,53,55,49,49,53,56,49,49,54,49,32,95,49,49,53,57,49,49,54,48,49,49,54,50,41,0,0,0};
+static C_char C_TLS li127[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,49,49,53,52,41,0,0};
+static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,13),40,103,49,49,57,48,32,100,49,49,57,50,41,0,0,0};
+static C_char C_TLS li129[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,49,56,51,32,103,49,49,56,55,49,49,56,57,41,0,0,0,0};
+static C_char C_TLS li130[] 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 li131[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,110,49,50,55,52,41,0,0,0,0};
+static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,53,53,32,118,49,50,57,55,41,0,0};
+static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,14),40,102,95,54,53,55,53,32,118,49,51,48,50,41,0,0};
+static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,48,54,32,118,49,51,48,57,41,0,0};
+static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,52,52,32,118,49,51,49,55,41,0,0};
+static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,14),40,102,95,54,54,56,57,32,118,49,51,50,54,41,0,0};
+static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,13),40,103,49,51,55,52,32,97,49,51,55,54,41,0,0,0};
+static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,53,56,32,103,49,51,54,56,49,51,55,50,41,0,0,0,0};
+static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,14),40,102,95,54,55,50,51,32,118,49,51,53,53,41,0,0};
+static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,13),40,103,49,51,52,57,32,97,49,51,53,49,41,0,0,0};
+static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,51,51,51,32,103,49,51,52,51,49,51,52,55,41,0,0,0,0};
+static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,49),40,99,111,109,112,105,108,101,45,99,97,108,108,32,120,49,50,56,50,32,101,49,50,56,51,32,116,102,49,50,56,52,32,99,110,116,114,49,50,56,53,32,115,101,49,50,56,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li143[] 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 li144[] C_aligned={C_lihdr(0,0,22),40,101,118,97,108,32,120,49,52,51,49,32,46,32,101,110,118,49,52,51,50,41,0,0};
+static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,34),40,108,111,111,112,32,108,108,105,115,116,49,52,51,57,32,118,97,114,115,49,52,52,48,32,97,114,103,99,49,52,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li147[] 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,51,52,32,107,49,52,51,53,41,0,0};
+static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,8),40,102,95,54,57,52,57,41};
+static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,109,111,100,101,49,52,53,55,41,0};
+static C_char C_TLS li150[] 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,53,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li151[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,18),40,104,97,115,45,115,101,112,63,32,115,116,114,49,52,56,49,41,0,0,0,0,0,0};
+static C_char C_TLS li153[] C_aligned={C_lihdr(0,0,8),40,102,95,55,49,48,55,41};
+static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,7),40,97,55,49,49,53,41,0};
+static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,7),40,97,55,49,51,53,41,0};
+static C_char C_TLS li156[] C_aligned={C_lihdr(0,0,7),40,97,55,49,56,55,41,0};
+static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,19),40,97,55,49,57,51,32,46,32,116,49,54,50,50,49,54,50,53,41,0,0,0,0,0};
+static C_char C_TLS li158[] C_aligned={C_lihdr(0,0,7),40,97,55,49,55,53,41,0};
+static C_char C_TLS li159[] C_aligned={C_lihdr(0,0,13),40,103,49,54,52,48,32,114,49,54,52,50,41,0,0,0};
+static C_char C_TLS li160[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,51,51,32,103,49,54,51,55,49,54,51,57,41,0,0,0,0};
+static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,21),40,97,55,50,48,57,32,46,32,114,101,115,117,108,116,115,49,54,50,56,41,0,0,0};
+static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,49,54,49,53,32,120,49,54,49,57,41,0,0,0,0,0,0};
+static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,7),40,97,55,49,51,56,41,0};
+static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,7),40,97,55,50,54,54,41,0};
+static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,7),40,97,55,49,50,54,41,0};
+static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,7),40,97,55,50,55,53,41,0};
+static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,16),40,97,55,49,48,49,32,97,98,114,116,49,53,55,50,41};
+static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,32),40,98,111,100,121,49,53,48,51,32,116,105,109,101,114,49,53,49,50,32,112,114,105,110,116,101,114,49,53,49,51,41};
+static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,32),40,100,101,102,45,112,114,105,110,116,101,114,49,53,48,54,32,37,116,105,109,101,114,49,53,48,49,49,54,54,50,41};
+static C_char C_TLS li170[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,116,105,109,101,114,49,53,48,53,41,0};
+static C_char C_TLS li171[] 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,57,52,32,101,118,97,108,117,97,116,111,114,49,52,57,53,32,112,102,49,52,57,54,32,46,32,116,109,112,49,52,57,51,49,52,57,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li172[] C_aligned={C_lihdr(0,0,35),40,108,111,97,100,32,102,105,108,101,110,97,109,101,49,54,54,56,32,46,32,101,118,97,108,117,97,116,111,114,49,54,54,57,41,0,0,0,0,0};
+static C_char C_TLS li173[] 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,55,52,32,46,32,101,118,97,108,117,97,116,111,114,49,54,55,53,41,0,0,0,0};
+static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,7),40,97,55,53,56,51,41,0};
+static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,7),40,97,55,53,56,54,41,0};
+static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,7),40,97,55,53,56,57,41,0};
+static C_char C_TLS li177[] 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,56,54,32,46,32,116,109,112,49,54,56,53,49,54,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li178[] C_aligned={C_lihdr(0,0,24),40,99,111,109,112,108,101,116,101,32,103,49,55,49,56,49,55,49,57,49,55,50,48,41};
+static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,108,105,98,115,49,55,54,56,41,0};
+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,45,48,32,117,110,97,109,101,49,55,53,51,32,108,105,98,49,55,53,52,41};
+static C_char C_TLS li181[] 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,56,48,32,46,32,108,105,98,49,55,56,49,41};
+static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,13),40,99,104,101,99,107,32,112,49,56,51,53,41,0,0,0};
+static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,105,100,49,56,50,53,41,0,0,0};
+static C_char C_TLS li185[] 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,56,48,55,32,108,111,99,49,56,48,56,41,0,0,0,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,55,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,51,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,51,32,105,110,99,63,49,56,54,52,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,57,48,49,32,108,111,99,49,57,48,50,32,46,32,116,109,112,49,57,48,48,49,57,48,51,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,56,32,103,49,57,53,50,49,57,53,52,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,53,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,51,41};
+static C_char C_TLS li193[] C_aligned={C_lihdr(0,0,21),40,97,56,50,49,56,32,103,49,57,56,51,49,57,56,52,49,57,56,53,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,54,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,57,32,103,50,48,49,53,50,48,49,54,50,48,49,55,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,50,32,108,111,99,49,57,57,51,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,50,49,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,54,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,52,41,0,0,0,0,0};
+static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,21),40,97,56,51,50,57,32,103,50,48,53,51,50,48,53,52,50,48,53,53,41,0,0,0};
+static C_char C_TLS li201[] C_aligned={C_lihdr(0,0,7),40,97,56,51,51,53,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,53,32,115,121,110,116,97,120,63,50,48,52,54,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,53,56,32,105,100,50,48,53,57,32,98,117,105,108,116,105,110,63,50,48,54,48,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,52,57,32,103,50,49,53,57,50,49,54,51,41,0,0,0,0};
+static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,13),40,100,111,105,116,32,105,100,50,48,55,54,41,0,0,0};
+static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,7),40,97,56,56,48,56,41,0};
+static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,38),40,97,56,56,49,56,32,101,120,112,50,50,49,51,50,50,49,52,50,50,49,55,32,102,105,50,50,49,53,50,50,49,54,50,50,49,56,41,0,0};
+static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,31),40,108,111,111,112,32,115,112,101,99,115,50,50,48,52,32,101,120,112,115,50,50,48,53,32,102,50,50,48,54,41,0};
+static C_char C_TLS li209[] 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,57,32,99,111,109,112,63,50,48,52,48,32,105,109,112,63,50,48,52,49,41,0,0,0,0};
+static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,16),40,97,56,56,56,55,32,115,112,101,99,50,50,51,53,41};
+static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,16),40,97,56,57,48,49,32,115,112,101,99,50,50,51,54,41};
+static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,44),40,115,101,116,45,101,120,116,101,110,115,105,111,110,45,115,112,101,99,105,102,105,101,114,33,32,110,97,109,101,50,50,51,49,32,112,114,111,99,50,50,51,50,41,0,0,0,0};
+static C_char C_TLS li213[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,50,50,55,52,41,0,0,0,0};
+static C_char C_TLS li214[] 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,48,41,0,0,0,0};
+static C_char C_TLS li215[] 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,50,41,0,0,0,0};
+static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,12),40,99,111,112,121,32,98,50,51,49,49,41,0,0,0,0};
+static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,51,48,53,32,105,50,51,48,57,41,0,0,0,0,0,0};
+static C_char C_TLS li218[] 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,53,32,109,102,102,50,50,57,54,32,109,102,50,50,57,55,32,46,32,97,114,103,115,50,50,57,56,41,0,0};
+static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,98,117,99,107,101,116,50,51,51,54,32,115,121,109,115,50,51,51,55,41,0,0,0,0,0,0};
+static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,27),40,100,111,108,111,111,112,50,51,50,57,32,105,50,51,51,51,32,115,121,109,115,50,51,51,52,41,0,0,0,0,0};
+static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,15),40,97,57,49,57,52,32,115,121,109,50,51,52,55,41,0};
+static C_char C_TLS li222[] 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,50,32,46,32,97,114,103,115,50,51,50,51,41,0,0};
+static C_char C_TLS li223[] 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 li224[] 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,53,56,32,46,32,109,117,116,97,98,108,101,50,51,53,57,41,0};
+static C_char C_TLS li225[] 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,48,32,46,32,109,117,116,97,98,108,101,50,51,55,49,41,0,0};
+static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,14),40,102,95,57,51,48,55,32,98,50,51,57,49,41,0,0};
+static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,14),40,105,110,105,116,98,32,104,116,50,51,57,48,41,0,0};
+static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,19),40,101,120,105,115,116,115,63,32,102,110,97,109,101,50,52,49,49,41,0,0,0,0,0};
+static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,25),40,116,101,115,116,50,32,102,110,97,109,101,50,52,51,53,32,108,115,116,50,52,51,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,16),40,116,101,115,116,32,102,110,97,109,101,50,52,52,48,41};
+static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,97,116,104,115,50,52,52,57,41};
+static C_char C_TLS li232[] 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,49,32,112,114,101,102,101,114,45,115,111,117,114,99,101,50,52,50,50,32,46,32,116,109,112,50,52,50,48,50,52,50,51,41,0,0,0,0,0,0};
+static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,50,52,55,48,32,105,50,52,55,52,41,0,0,0,0,0,0};
+static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,14),40,115,112,97,99,101,115,32,110,50,52,54,57,41,0,0};
+static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,24),40,100,105,115,112,108,97,121,45,114,106,32,120,50,52,55,56,32,119,50,52,55,57,41};
+static C_char C_TLS li236[] 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,52,41,0,0};
+static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,7),40,97,57,54,49,57,41,0};
+static C_char C_TLS li238[] 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,53,32,112,111,114,116,50,52,57,54,41,0,0};
+static C_char C_TLS li239[] 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 li240[] 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 li241[] C_aligned={C_lihdr(0,0,21),40,97,57,54,53,55,32,103,50,53,51,54,50,53,51,55,50,53,51,56,41,0,0,0};
+static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,18),40,119,114,105,116,101,45,101,114,114,32,120,115,50,53,49,57,41,0,0,0,0,0,0};
+static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,26),40,97,57,55,50,53,32,109,115,103,50,53,55,55,32,46,32,97,114,103,115,50,53,55,56,41,0,0,0,0,0,0};
+static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,7),40,97,57,55,49,50,41,0};
+static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,7),40,97,57,56,49,55,41,0};
+static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,21),40,97,57,54,55,56,32,103,50,53,53,57,50,53,54,48,50,53,54,49,41,0,0,0};
+static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,54,51,55,32,103,50,54,52,49,50,54,52,51,41,0,0,0,0};
+static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,118,97,114,115,50,54,50,53,32,117,50,54,50,54,41,0,0,0};
+static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,20),40,97,57,56,50,54,32,46,32,114,101,115,117,108,116,50,54,49,57,41,0,0,0,0};
+static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,7),40,97,57,57,56,54,41,0};
+static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,13),40,97,57,57,56,48,32,99,50,53,57,52,41,0,0,0};
+static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,7),40,97,57,55,55,55,41,0};
+static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,7),40,97,57,57,57,55,41,0};
+static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,6),40,114,101,112,108,41,0,0};
+static C_char C_TLS li256[] 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,50,32,112,114,111,99,50,54,56,51,41,0,0};
+static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,5),40,101,114,114,41,0,0,0};
+static C_char C_TLS li258[] 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,56,56,32,112,111,114,116,50,54,56,57,41};
+static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,50,48,41};
+static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,15),40,97,49,48,49,49,52,32,101,120,50,55,49,53,41,0};
+static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,51,57,41};
+static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,53,49,41};
+static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,23),40,97,49,48,49,52,53,32,46,32,97,114,103,115,50,55,49,48,50,55,49,57,41,0};
+static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,51,51,41};
+static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,18),40,97,49,48,49,48,56,32,107,50,55,48,57,50,55,49,52,41,0,0,0,0,0,0};
+static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,20),40,114,117,110,45,115,97,102,101,32,116,104,117,110,107,50,55,48,56,41,0,0,0,0};
+static C_char C_TLS li267[] 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,50,32,114,101,115,117,108,116,50,55,50,51,41,0};
+static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,55,50,41};
+static C_char C_TLS li269[] 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 li270[] C_aligned={C_lihdr(0,0,8),40,97,49,48,49,56,52,41};
+static C_char C_TLS li271[] 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,53,32,114,101,115,117,108,116,50,55,51,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li272[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,48,51,41};
+static C_char C_TLS li273[] 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,50,32,114,101,115,117,108,116,50,55,52,51,41};
+static C_char C_TLS li274[] 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,52,57,32,98,117,102,50,55,53,48,41,0,0,0,0,0,0};
+static C_char C_TLS li275[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,51,57,41};
+static C_char C_TLS li276[] 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,50,32,98,117,102,50,55,54,51,32,98,117,102,115,105,122,101,50,55,54,52,41,0,0,0,0};
+static C_char C_TLS li277[] C_aligned={C_lihdr(0,0,8),40,97,49,48,50,54,56,41};
+static C_char C_TLS li278[] 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,51,32,98,117,102,50,55,55,52,32,98,117,102,115,105,122,101,50,55,55,53,41,0,0,0,0,0};
+static C_char C_TLS li279[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,48,50,41};
+static C_char C_TLS li280[] 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,52,32,97,114,103,115,50,55,56,53,32,114,101,115,117,108,116,50,55,56,54,41,0,0,0,0};
+static C_char C_TLS li281[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,49,56,41};
+static C_char C_TLS li282[] 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,51,32,97,114,103,115,50,55,57,52,32,98,117,102,50,55,57,53,32,98,117,102,115,105,122,101,50,55,57,54,41,0};
+static C_char C_TLS li283[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,52,55,41};
+static C_char C_TLS li284[] 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,48,54,32,114,101,115,117,108,116,50,56,48,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li285[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,54,57,41};
+static C_char C_TLS li286[] 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,52,41,0,0};
+static C_char C_TLS li287[] 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,49,41,0};
+static C_char C_TLS li288[] 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,48,41};
+static C_char C_TLS li289[] C_aligned={C_lihdr(0,0,8),40,97,49,48,51,57,52,41};
+static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,16),40,45,62,115,116,114,105,110,103,32,120,50,50,52,57,41};
+static C_char C_TLS li291[] C_aligned={C_lihdr(0,0,23),40,97,49,48,52,48,56,32,115,112,101,99,50,50,52,54,32,95,50,50,52,55,41,0};
+static C_char C_TLS li292[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,50,50,52,50,41,0,0};
+static C_char C_TLS li293[] C_aligned={C_lihdr(0,0,25),40,97,49,48,53,48,53,32,115,112,101,99,50,50,51,57,32,111,108,100,50,50,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li294[] C_aligned={C_lihdr(0,0,14),40,97,49,48,53,57,50,32,120,49,55,52,54,41,0,0};
+static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,50,53,32,103,49,55,51,53,49,55,51,57,41,0,0,0,0};
+static C_char C_TLS li296[] C_aligned={C_lihdr(0,0,8),40,97,49,48,55,49,51,41};
+static C_char C_TLS li297[] C_aligned={C_lihdr(0,0,8),40,97,49,48,55,50,48,41};
+static C_char C_TLS li298[] C_aligned={C_lihdr(0,0,8),40,97,49,48,55,51,48,41};
+static C_char C_TLS li299[] C_aligned={C_lihdr(0,0,24),40,97,49,48,55,48,49,32,120,49,51,57,52,32,46,32,101,110,118,49,51,57,53,41};
+static C_char C_TLS li300[] 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 k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall stub2508(C_word C_buf) C_regparm;
+C_regparm static C_word C_fcall stub2508(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_10702)
+static void C_ccall f_10702(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10702)
+static void C_ccall f_10702r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10706)
+static void C_fcall f_10706(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10731)
+static void C_ccall f_10731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10721)
+static void C_ccall f_10721(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10729)
+static void C_ccall f_10729(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10714)
+static void C_ccall f_10714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10709)
+static void C_ccall f_10709(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6852)
+static void C_ccall f_6852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6947)
+static void C_ccall f_6947(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7028)
+static void C_ccall f_7028(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_10692)
+static void C_ccall f_10692(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_10684)
+static void C_ccall f_10684(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7595)
+static void C_fcall f_7595(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7600)
+static void C_ccall f_7600(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10656)
+static void C_ccall f_10656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10635)
+static void C_fcall f_10635(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10642)
+static void C_ccall f_10642(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7607)
+static void C_ccall f_7607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10599)
+static void C_fcall f_10599(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_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_7616)
+static void C_ccall f_7616(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10560)
+static void C_ccall f_10560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10580)
+static void C_ccall f_10580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10576)
+static void C_ccall f_10576(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10566)
+static void C_ccall f_10566(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10563)
+static void C_ccall f_10563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7970)
+static void C_ccall f_7970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10506)
+static void C_ccall f_10506(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10520)
+static void C_fcall f_10520(C_word t0,C_word t1,C_word t2) 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_10552)
+static void C_ccall f_10552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10540)
+static void C_ccall f_10540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10544)
+static void C_ccall f_10544(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10514)
+static void C_ccall f_10514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8909)
+static void C_ccall f_8909(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_10446)
+static void C_fcall f_10446(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10449)
+static void C_ccall f_10449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10472)
+static void C_ccall f_10472(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10476)
+static void C_ccall f_10476(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10458)
+static void C_ccall f_10458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10455)
+static void C_ccall f_10455(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10412)
+static void C_fcall f_10412(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_8970)
+static void C_ccall f_8970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10407)
+static void C_ccall f_10407(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_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_10403)
+static void C_ccall f_10403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9328)
+static void C_ccall f_9328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9332)
+static void C_ccall f_9332(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9606)
+static void C_ccall f_9606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10395)
+static void C_ccall f_10395(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_noret;
+C_noret_decl(f_10013)
+static void C_ccall f_10013(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_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_10376)
+static C_word C_fcall f_10376(C_word t0,C_word t1);
+C_noret_decl(f_10361)
+static void C_ccall f_10361(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10365)
+static void C_ccall f_10365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10370)
+static void C_ccall f_10370(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_10339)
+static void C_ccall f_10339(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10343)
+static void C_ccall f_10343(C_word c,C_word t0,C_word t1) 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_10352)
+static void C_ccall f_10352(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_10313)
+static void C_ccall f_10313(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_10319)
+static void C_ccall f_10319(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_10337)
+static void C_ccall f_10337(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_10333)
+static void C_ccall f_10333(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10303)
+static void C_ccall f_10303(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_10260)
+static void C_ccall f_10260(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_10269)
+static void C_ccall f_10269(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_10295)
+static void C_ccall f_10295(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_10287)
+static void C_ccall f_10287(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_10283)
+static void C_ccall f_10283(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_word t2,C_word t3,C_word t4) 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_10244)
+static void C_ccall f_10244(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_10247)
+static void C_ccall f_10247(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_10221)
+static C_word C_fcall f_10221(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_10195)
+static void C_ccall f_10195(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10199)
+static void C_ccall f_10199(C_word c,C_word t0,C_word t1) 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_10219)
+static void C_ccall f_10219(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10215)
+static void C_ccall f_10215(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_word t2,C_word t3) 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_10193)
+static void C_ccall f_10193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10167)
+static void C_ccall f_10167(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_10177)
+static void C_ccall f_10177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10158)
+static void C_fcall f_10158(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10162)
+static void C_ccall f_10162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10099)
+static void C_fcall f_10099(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10109)
+static void C_ccall f_10109(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10134)
+static void C_ccall f_10134(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10146)
+static void C_ccall f_10146(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10146)
+static void C_ccall f_10146r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10152)
+static void C_ccall f_10152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10140)
+static void C_ccall f_10140(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10115)
+static void C_ccall f_10115(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10121)
+static void C_ccall f_10121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10125)
+static void C_ccall f_10125(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10128)
+static void C_ccall f_10128(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10132)
+static void C_ccall f_10132(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_10024)
+static void C_ccall f_10024(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10034)
+static void C_ccall f_10034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10037)
+static void C_ccall f_10037(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10051)
+static void C_fcall f_10051(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10069)
+static void C_ccall f_10069(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10038)
+static void C_fcall f_10038(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_9649)
+static void C_ccall f_9649(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9693)
+static void C_ccall f_9693(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9696)
+static void C_ccall f_9696(C_word c,C_word t0,C_word t1) 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_10002)
+static void C_ccall f_10002(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_9778)
+static void C_ccall f_9778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9784)
+static void C_fcall f_9784(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9981)
+static void C_ccall f_9981(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9987)
+static void C_ccall f_9987(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_9794)
+static void C_ccall f_9794(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_9979)
+static void C_ccall f_9979(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_9812)
+static void C_ccall f_9812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9827)
+static void C_ccall f_9827(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_9827)
+static void C_ccall f_9827r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_9845)
+static void C_fcall f_9845(C_word t0,C_word t1,C_word t2,C_word t3) 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_9962)
+static void C_ccall f_9962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9933)
+static void C_ccall f_9933(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_9869)
+static void C_fcall f_9869(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9881)
+static void C_ccall f_9881(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9884)
+static void C_ccall f_9884(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_9899)
+static void C_ccall f_9899(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_9913)
+static void C_ccall f_9913(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_9849)
+static void C_ccall f_9849(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9831)
+static void C_ccall f_9831(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_9679)
+static void C_ccall f_9679(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9834)
+static void C_ccall f_9834(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9818)
+static void C_ccall f_9818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9713)
+static void C_ccall f_9713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9718)
+static void C_ccall f_9718(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_9726)
+static void C_ccall f_9726(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9726)
+static void C_ccall f_9726r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9733)
+static void C_ccall f_9733(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_9736)
+static void C_ccall f_9736(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_9757)
+static void C_ccall f_9757(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_9739)
+static void C_ccall f_9739(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_9704)
+static C_word C_fcall f_9704(C_word t0);
+C_noret_decl(f_9698)
+static C_word C_fcall f_9698(C_word t0);
+C_noret_decl(f_9652)
+static void C_fcall f_9652(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9658)
+static void C_ccall f_9658(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9646)
+static void C_ccall f_9646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9630)
+static void C_ccall f_9630(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9641)
+static void C_ccall f_9641(C_word c,C_word t0,C_word t1) 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_9634)
+static void C_ccall f_9634(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_word t2,C_word t3) 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_9615)
+static void C_ccall f_9615(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9551)
+static void C_ccall f_9551(C_word c,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_9558)
+static void C_ccall f_9558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9561)
+static void C_ccall f_9561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9564)
+static void C_ccall f_9564(C_word c,C_word t0,C_word t1) 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_9570)
+static void C_ccall f_9570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9573)
+static void C_ccall f_9573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9576)
+static void C_ccall f_9576(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_9530)
+static void C_fcall f_9530(C_word t0,C_word t1,C_word t2,C_word t3) 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_9506)
+static void C_fcall f_9506(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9512)
+static void C_fcall f_9512(C_word t0,C_word t1,C_word t2) 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_9357)
+static void C_ccall f_9357(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_9357)
+static void C_ccall f_9357r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_9361)
+static void C_ccall f_9361(C_word c,C_word t0,C_word t1) 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_9475)
+static void C_ccall f_9475(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9485)
+static void C_ccall f_9485(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9438)
+static void C_ccall f_9438(C_word c,C_word t0,C_word t1) 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_9464)
+static void C_ccall f_9464(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9450)
+static void C_ccall f_9450(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9398)
+static void C_fcall f_9398(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9363)
+static void C_fcall f_9363(C_word t0,C_word t1,C_word t2,C_word t3) 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_9385)
+static void C_ccall f_9385(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9376)
+static void C_ccall f_9376(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9338)
+static void C_fcall f_9338(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_9305)
+static void C_fcall f_9305(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9307)
+static void C_ccall f_9307(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9311)
+static void C_ccall f_9311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9267)
+static void C_ccall f_9267(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9267)
+static void C_ccall f_9267r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9274)
+static void C_ccall f_9274(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9281)
+static void C_ccall f_9281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9223)
+static void C_ccall f_9223(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9223)
+static void C_ccall f_9223r(C_word t0,C_word t1,C_word t2,C_word t4) 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_9243)
+static void C_ccall f_9243(C_word c,C_word t0,C_word t1) 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_9101)
+static void C_ccall f_9101(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9101)
+static void C_ccall f_9101r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9195)
+static void C_ccall f_9195(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9205)
+static void C_ccall f_9205(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9193)
+static void C_ccall f_9193(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9122)
+static void C_fcall f_9122(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9146)
+static void C_fcall f_9146(C_word t0,C_word t1,C_word t2,C_word t3) 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_9140)
+static void C_ccall f_9140(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_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_8993)
+static void C_ccall f_8993r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) 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_fcall f_9008(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9035)
+static void C_fcall f_9035(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9064)
+static void C_fcall f_9064(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_9029)
+static void C_ccall f_9029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8977)
+static void C_ccall f_8977(C_word c,C_word t0,C_word t1,C_word t2) 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_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_8926)
+static C_word C_fcall f_8926(C_word t0,C_word t1);
+C_noret_decl(f_8870)
+static void C_ccall f_8870(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8902)
+static void C_ccall f_8902(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8888)
+static void C_ccall f_8888(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8314)
+static void C_ccall f_8314(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8738)
+static void C_fcall f_8738(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8750)
+static void C_ccall f_8750(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8780)
+static void C_ccall f_8780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8782)
+static void C_fcall f_8782(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_8819)
+static void C_ccall f_8819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_8804)
+static void C_ccall f_8804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8800)
+static void C_ccall f_8800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8383)
+static void C_fcall f_8383(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8393)
+static void C_ccall f_8393(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_8700)
+static void C_ccall f_8700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8707)
+static void C_ccall f_8707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8570)
+static void C_ccall f_8570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8589)
+static void C_fcall f_8589(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8621)
+static void C_fcall f_8621(C_word t0,C_word t1,C_word t2) 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_8611)
+static void C_ccall f_8611(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8593)
+static void C_ccall f_8593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8585)
+static void C_ccall f_8585(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8577)
+static void C_ccall f_8577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8460)
+static void C_ccall f_8460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8481)
+static void C_fcall f_8481(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8489)
+static void C_ccall f_8489(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_8413)
+static void C_ccall f_8413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8400)
+static void C_ccall f_8400(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8342)
+static void C_fcall f_8342(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_8354)
+static void C_ccall f_8354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8317)
+static void C_fcall f_8317(C_word t0,C_word t1,C_word t2,C_word t3) 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_8330)
+static void C_ccall f_8330(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8265)
+static void C_ccall f_8265(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8271)
+static void C_fcall f_8271(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8285)
+static void C_ccall f_8285(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8288)
+static void C_fcall f_8288(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8295)
+static void C_ccall f_8295(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_word t2) 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_word t3) C_noret;
+C_noret_decl(f_8230)
+static void C_ccall f_8230(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8236)
+static void C_ccall f_8236(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8239)
+static void C_ccall f_8239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8257)
+static void C_ccall f_8257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8242)
+static void C_ccall f_8242(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8246)
+static void C_fcall f_8246(C_word t0,C_word t1,C_word t2) 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_8213)
+static void C_ccall f_8213r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8219)
+static void C_ccall f_8219(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8199)
+static void C_ccall f_8199(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8210)
+static void C_ccall f_8210(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8157)
+static void C_ccall f_8157(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_8157)
+static void C_ccall f_8157r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8163)
+static void C_fcall f_8163(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8178)
+static void C_ccall f_8178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8073)
+static void C_ccall f_8073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_8073)
+static void C_ccall f_8073r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_8077)
+static void C_ccall f_8077(C_word c,C_word t0,C_word t1) 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_8080)
+static void C_fcall f_8080(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8083)
+static void C_ccall f_8083(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8110)
+static void C_ccall f_8110(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8116)
+static void C_ccall f_8116(C_word c,C_word t0,C_word t1) 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_7974)
+static void C_ccall f_7974(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_8026)
+static void C_ccall f_8026(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8028)
+static void C_fcall f_8028(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8041)
+static void C_ccall f_8041(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7980)
+static void C_fcall f_7980(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_8019)
+static void C_ccall f_8019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7990)
+static void C_ccall f_7990(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_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_7810)
+static void C_ccall f_7810(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7915)
+static void C_fcall f_7915(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7932)
+static void C_ccall f_7932(C_word c,C_word t0,C_word t1) 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_7832)
+static void C_ccall f_7832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7837)
+static void C_fcall f_7837(C_word t0,C_word t1,C_word t2) 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_7863)
+static void C_ccall f_7863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7813)
+static void C_fcall f_7813(C_word t0,C_word t1) 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_noret;
+C_noret_decl(f_7724)
+static void C_ccall f_7724r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7731)
+static void C_ccall f_7731(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7741)
+static void C_ccall f_7741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7618)
+static void C_ccall f_7618(C_word c,C_word t0,C_word t1,C_word t2,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_7714)
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7718)
+static void C_ccall f_7718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7631)
+static void C_fcall f_7631(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7700)
+static void C_ccall f_7700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7696)
+static void C_ccall f_7696(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7634)
+static void C_ccall f_7634(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_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_7637)
+static void C_ccall f_7637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7642)
+static void C_fcall f_7642(C_word t0,C_word t1,C_word t2) 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_7655)
+static void C_ccall f_7655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7609)
+static void C_fcall f_7609(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7569)
+static void C_ccall f_7569(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7569)
+static void C_ccall f_7569r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7590)
+static void C_ccall f_7590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7573)
+static void C_ccall f_7573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7587)
+static void C_ccall f_7587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7576)
+static void C_ccall f_7576(C_word c,C_word t0,C_word t1) C_noret;
+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_7579)
+static void C_ccall f_7579(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7526)
+static void C_ccall f_7526(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7526)
+static void C_ccall f_7526r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7534)
+static void C_ccall f_7534(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7538)
+static void C_ccall f_7538(C_word c,C_word t0,C_word t1) 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_7505)
+static void C_ccall f_7505(C_word c,C_word t0,C_word t1) 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_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_7076)
+static void C_ccall f_7076r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_7449)
+static void C_fcall f_7449(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7444)
+static void C_fcall f_7444(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7078)
+static void C_fcall f_7078(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7443)
+static void C_ccall f_7443(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_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_7380)
+static void C_ccall f_7380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7383)
+static void C_fcall f_7383(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7386)
+static void C_ccall f_7386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7392)
+static void C_ccall f_7392(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7395)
+static void C_ccall f_7395(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7401)
+static void C_ccall f_7401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7085)
+static void C_ccall f_7085(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7356)
+static void C_ccall f_7356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7344)
+static void C_ccall f_7344(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_7350)
+static void C_ccall f_7350(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_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_7301)
+static void C_ccall f_7301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7325)
+static void C_ccall f_7325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7321)
+static void C_ccall f_7321(C_word c,C_word t0,C_word t1) 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_7094)
+static void C_ccall f_7094(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_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_7106)
+static void C_ccall f_7106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7276)
+static void C_ccall f_7276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7127)
+static void C_ccall f_7127(C_word c,C_word t0,C_word t1) 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_7267)
+static void C_ccall f_7267(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7139)
+static void C_ccall f_7139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7143)
+static void C_ccall f_7143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7261)
+static void C_ccall f_7261(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7146)
+static void C_ccall f_7146(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7149)
+static void C_ccall f_7149(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7154)
+static void C_fcall f_7154(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7164)
+static void C_ccall f_7164(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7210)
+static void C_ccall f_7210(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7210)
+static void C_ccall f_7210r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7219)
+static void C_fcall f_7219(C_word t0,C_word t1,C_word t2) 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_7227)
+static void C_fcall f_7227(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7231)
+static void C_ccall f_7231(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7176)
+static void C_ccall f_7176(C_word c,C_word t0,C_word t1) 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_7194)
+static void C_ccall f_7194(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7194)
+static void C_ccall f_7194r(C_word t0,C_word t1,C_word t3) 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_7198)
+static void C_ccall f_7198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7188)
+static void C_ccall f_7188(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7167)
+static void C_ccall f_7167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7174)
+static void C_ccall f_7174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7136)
+static void C_ccall f_7136(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_7107)
+static void C_ccall f_7107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7097)
+static void C_ccall f_7097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7030)
+static void C_fcall f_7030(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7040)
+static C_word C_fcall f_7040(C_word t0,C_word t1);
+C_noret_decl(f_6955)
+static void C_ccall f_6955(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6967)
+static void C_fcall f_6967(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6980)
+static void C_ccall f_6980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6962)
+static void C_ccall f_6962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6949)
+static void C_ccall f_6949(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6865)
+static void C_ccall f_6865(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6878)
+static void C_fcall f_6878(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6911)
+static void C_ccall f_6911(C_word c,C_word t0,C_word t1) 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_6868)
+static void C_fcall f_6868(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6855)
+static void C_ccall f_6855(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6855)
+static void C_ccall f_6855r(C_word t0,C_word t1,C_word t2,C_word t4) 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_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_6529)
+static void C_fcall f_6529(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_6533)
+static void C_ccall f_6533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6780)
+static void C_fcall f_6780(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6814)
+static void C_ccall f_6814(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6807)
+static void C_fcall f_6807(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6722)
+static void C_ccall f_6722(C_word c,C_word t0,C_word t1) 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_6727)
+static void C_fcall f_6727(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6734)
+static void C_ccall f_6734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6740)
+static void C_fcall f_6740(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_6767)
+static void C_fcall f_6767(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6738)
+static void C_ccall f_6738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6679)
+static void C_ccall f_6679(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6682)
+static void C_ccall f_6682(C_word c,C_word t0,C_word t1) C_noret;
+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_6688)
+static void C_ccall f_6688(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6689)
+static void C_ccall f_6689(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6693)
+static void C_fcall f_6693(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6696)
+static void C_ccall f_6696(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6703)
+static void C_ccall f_6703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6707)
+static void C_ccall f_6707(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6711)
+static void C_ccall f_6711(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_6637)
+static void C_ccall f_6637(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_6643)
+static void C_ccall f_6643(C_word c,C_word t0,C_word t1) 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_6648)
+static void C_fcall f_6648(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_noret;
+C_noret_decl(f_6658)
+static void C_ccall f_6658(C_word c,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_6666)
+static void C_ccall f_6666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6602)
+static void C_ccall f_6602(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6605)
+static void C_ccall f_6605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6606)
+static void C_ccall f_6606(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6610)
+static void C_fcall f_6610(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_6620)
+static void C_ccall f_6620(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_6574)
+static void C_ccall f_6574(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6575)
+static void C_ccall f_6575(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6579)
+static void C_fcall f_6579(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6582)
+static void C_ccall f_6582(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6589)
+static void C_ccall f_6589(C_word c,C_word t0,C_word t1) 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(f11966)
+static void C_ccall f11966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f11962)
+static void C_ccall f11962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6503)
+static C_word C_fcall f_6503(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_6300)
+static void C_fcall f_6300(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_6287)
+static void C_ccall f_6287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6234)
+static void C_fcall f_6234(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6249)
+static void C_ccall f_6249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6242)
+static void C_fcall f_6242(C_word t0,C_word t1,C_word t2) 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_6178)
+static void C_ccall f_6178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6124)
+static void C_fcall f_6124(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6146)
+static void C_ccall f_6146(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6162)
+static void C_ccall f_6162(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_6118)
+static void C_ccall f_6118(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6064)
+static void C_fcall f_6064(C_word t0,C_word t1,C_word t2) 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_6091)
+static void C_fcall f_6091(C_word t0,C_word t1,C_word t2) 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_5990)
+static void C_ccall f_5990(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5993)
+static void C_ccall f_5993(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6016)
+static void C_fcall f_6016(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6014)
+static void C_ccall f_6014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6010)
+static void C_ccall f_6010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5970)
+static void C_ccall f_5970(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5974)
+static void C_ccall f_5974(C_word c,C_word t0,C_word t1) 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_5945)
+static void C_ccall f_5945(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_5828)
+static void C_ccall f_5828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5830)
+static void C_fcall f_5830(C_word t0,C_word t1,C_word t2) 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_5857)
+static void C_fcall f_5857(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5881)
+static C_word C_fcall f_5881(C_word t0);
+C_noret_decl(f_5870)
+static void C_fcall f_5870(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5690)
+static void C_ccall f_5690(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_5693)
+static void C_ccall f_5693(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_5724)
+static void C_ccall f_5724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5734)
+static void C_fcall f_5734(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5815)
+static void C_ccall f_5815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5807)
+static void C_ccall f_5807(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5744)
+static void C_ccall f_5744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5792)
+static void C_ccall f_5792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5747)
+static void C_ccall f_5747(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5748)
+static void C_ccall f_5748(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5754)
+static void C_fcall f_5754(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5779)
+static void C_ccall f_5779(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5697)
+static void C_ccall f_5697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5701)
+static void C_ccall f_5701(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5704)
+static void C_ccall f_5704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5708)
+static void C_ccall f_5708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5711)
+static void C_ccall f_5711(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5715)
+static void C_ccall f_5715(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5718)
+static void C_ccall f_5718(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_5635)
+static void C_fcall f_5635(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5548)
+static void C_ccall f_5548(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_5592)
+static void C_ccall f_5592(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_5604)
+static void C_ccall f_5604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5554)
+static void C_fcall f_5554(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_5582)
+static void C_ccall f_5582(C_word c,C_word t0,C_word t1) 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_5570)
+static void C_ccall f_5570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5578)
+static void C_ccall f_5578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5574)
+static void C_ccall f_5574(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_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_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_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_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(f10832)
+static void C_ccall f10832(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f10827)
+static void C_ccall f10827(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;
+C_noret_decl(f_2956)
+static void C_ccall f_2956(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2956)
+static void C_ccall f_2956r(C_word t0,C_word t1,C_word t2,C_word t4) 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_10376,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_10361,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_10339,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_10313,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_10297,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_10260,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_10234,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_10195,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_10179,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_10167,0));}
+
+C_noret_decl(trf_10706)
+static void C_fcall trf_10706(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10706(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10706(t0,t1);}
+
+C_noret_decl(trf_7595)
+static void C_fcall trf_7595(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7595(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7595(t0,t1);}
+
+C_noret_decl(trf_10635)
+static void C_fcall trf_10635(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10635(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10635(t0,t1);}
+
+C_noret_decl(trf_10599)
+static void C_fcall trf_10599(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10599(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10599(t0,t1,t2);}
+
+C_noret_decl(trf_10520)
+static void C_fcall trf_10520(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10520(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10520(t0,t1,t2);}
+
+C_noret_decl(trf_10446)
+static void C_fcall trf_10446(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10446(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10446(t0,t1);}
+
+C_noret_decl(trf_10412)
+static void C_fcall trf_10412(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10412(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10412(t0,t1);}
+
+C_noret_decl(trf_10158)
+static void C_fcall trf_10158(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10158(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10158(t0,t1,t2);}
+
+C_noret_decl(trf_10099)
+static void C_fcall trf_10099(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10099(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10099(t0,t1);}
+
+C_noret_decl(trf_10051)
+static void C_fcall trf_10051(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10051(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10051(t0,t1);}
+
+C_noret_decl(trf_10038)
+static void C_fcall trf_10038(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10038(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10038(t0,t1);}
+
+C_noret_decl(trf_9784)
+static void C_fcall trf_9784(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9784(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9784(t0,t1);}
+
+C_noret_decl(trf_9845)
+static void C_fcall trf_9845(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9845(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_9845(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9869)
+static void C_fcall trf_9869(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9869(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9869(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_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_9652)
+static void C_fcall trf_9652(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9652(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9652(t0,t1);}
+
+C_noret_decl(trf_9530)
+static void C_fcall trf_9530(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9530(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_9530(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9506)
+static void C_fcall trf_9506(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9506(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9506(t0,t1,t2);}
+
+C_noret_decl(trf_9512)
+static void C_fcall trf_9512(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9512(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9512(t0,t1,t2);}
+
+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_9398)
+static void C_fcall trf_9398(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9398(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9398(t0,t1,t2);}
+
+C_noret_decl(trf_9363)
+static void C_fcall trf_9363(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9363(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_9363(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9338)
+static void C_fcall trf_9338(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9338(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9338(t0,t1);}
+
+C_noret_decl(trf_9305)
+static void C_fcall trf_9305(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9305(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9305(t0,t1);}
+
+C_noret_decl(trf_9122)
+static void C_fcall trf_9122(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9122(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_9122(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9146)
+static void C_fcall trf_9146(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9146(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_9146(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9008)
+static void C_fcall trf_9008(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9008(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9008(t0,t1,t2);}
+
+C_noret_decl(trf_9035)
+static void C_fcall trf_9035(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9035(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9035(t0,t1,t2);}
+
+C_noret_decl(trf_9064)
+static void C_fcall trf_9064(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9064(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9064(t0,t1);}
+
+C_noret_decl(trf_8738)
+static void C_fcall trf_8738(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8738(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8738(t0,t1);}
+
+C_noret_decl(trf_8782)
+static void C_fcall trf_8782(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8782(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_8782(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_8383)
+static void C_fcall trf_8383(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8383(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8383(t0,t1,t2);}
+
+C_noret_decl(trf_8589)
+static void C_fcall trf_8589(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8589(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8589(t0,t1);}
+
+C_noret_decl(trf_8621)
+static void C_fcall trf_8621(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8621(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8621(t0,t1,t2);}
+
+C_noret_decl(trf_8481)
+static void C_fcall trf_8481(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8481(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8481(t0,t1);}
+
+C_noret_decl(trf_8342)
+static void C_fcall trf_8342(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8342(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_8342(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_8317)
+static void C_fcall trf_8317(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8317(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_8317(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8271)
+static void C_fcall trf_8271(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8271(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8271(t0,t1,t2);}
+
+C_noret_decl(trf_8288)
+static void C_fcall trf_8288(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8288(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8288(t0,t1);}
+
+C_noret_decl(trf_8246)
+static void C_fcall trf_8246(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8246(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8246(t0,t1,t2);}
+
+C_noret_decl(trf_8163)
+static void C_fcall trf_8163(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8163(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8163(t0,t1,t2);}
+
+C_noret_decl(trf_8080)
+static void C_fcall trf_8080(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8080(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8080(t0,t1);}
+
+C_noret_decl(trf_8028)
+static void C_fcall trf_8028(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8028(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8028(t0,t1,t2);}
+
+C_noret_decl(trf_7980)
+static void C_fcall trf_7980(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7980(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7980(t0,t1,t2);}
+
+C_noret_decl(trf_7915)
+static void C_fcall trf_7915(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7915(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7915(t0,t1,t2);}
+
+C_noret_decl(trf_7837)
+static void C_fcall trf_7837(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7837(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7837(t0,t1,t2);}
+
+C_noret_decl(trf_7813)
+static void C_fcall trf_7813(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7813(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7813(t0,t1);}
+
+C_noret_decl(trf_7631)
+static void C_fcall trf_7631(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7631(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7631(t0,t1);}
+
+C_noret_decl(trf_7642)
+static void C_fcall trf_7642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7642(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7642(t0,t1,t2);}
+
+C_noret_decl(trf_7609)
+static void C_fcall trf_7609(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7609(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7609(t0,t1,t2);}
+
+C_noret_decl(trf_7449)
+static void C_fcall trf_7449(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7449(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7449(t0,t1);}
+
+C_noret_decl(trf_7444)
+static void C_fcall trf_7444(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7444(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7444(t0,t1,t2);}
+
+C_noret_decl(trf_7078)
+static void C_fcall trf_7078(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7078(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_7078(t0,t1,t2,t3);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7082(t0,t1);}
+
+C_noret_decl(trf_7383)
+static void C_fcall trf_7383(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7383(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7383(t0,t1);}
+
+C_noret_decl(trf_7154)
+static void C_fcall trf_7154(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7154(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7154(t0,t1,t2);}
+
+C_noret_decl(trf_7219)
+static void C_fcall trf_7219(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7219(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7219(t0,t1,t2);}
+
+C_noret_decl(trf_7227)
+static void C_fcall trf_7227(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7227(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7227(t0,t1,t2);}
+
+C_noret_decl(trf_7030)
+static void C_fcall trf_7030(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7030(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7030(t0,t1);}
+
+C_noret_decl(trf_6967)
+static void C_fcall trf_6967(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6967(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6967(t0,t1,t2);}
+
+C_noret_decl(trf_6878)
+static void C_fcall trf_6878(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6878(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_6878(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_6868)
+static void C_fcall trf_6868(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6868(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6868(t0,t1);}
+
+C_noret_decl(trf_6529)
+static void C_fcall trf_6529(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6529(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_6529(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_6780)
+static void C_fcall trf_6780(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6780(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6780(t0,t1,t2);}
+
+C_noret_decl(trf_6807)
+static void C_fcall trf_6807(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6807(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6807(t0,t1,t2);}
+
+C_noret_decl(trf_6727)
+static void C_fcall trf_6727(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6727(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6727(t0,t1);}
+
+C_noret_decl(trf_6740)
+static void C_fcall trf_6740(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6740(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6740(t0,t1,t2);}
+
+C_noret_decl(trf_6767)
+static void C_fcall trf_6767(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6767(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6767(t0,t1,t2);}
+
+C_noret_decl(trf_6693)
+static void C_fcall trf_6693(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6693(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6693(t0,t1);}
+
+C_noret_decl(trf_6648)
+static void C_fcall trf_6648(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6648(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6648(t0,t1);}
+
+C_noret_decl(trf_6610)
+static void C_fcall trf_6610(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6610(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6610(t0,t1);}
+
+C_noret_decl(trf_6579)
+static void C_fcall trf_6579(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6579(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6579(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_6300)
+static void C_fcall trf_6300(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6300(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6300(t0,t1);}
+
+C_noret_decl(trf_6234)
+static void C_fcall trf_6234(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6234(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6234(t0,t1,t2);}
+
+C_noret_decl(trf_6242)
+static void C_fcall trf_6242(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6242(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6242(t0,t1,t2);}
+
+C_noret_decl(trf_6124)
+static void C_fcall trf_6124(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6124(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6124(t0,t1,t2);}
+
+C_noret_decl(trf_6064)
+static void C_fcall trf_6064(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6064(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6064(t0,t1,t2);}
+
+C_noret_decl(trf_6091)
+static void C_fcall trf_6091(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6091(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6091(t0,t1,t2);}
+
+C_noret_decl(trf_6016)
+static void C_fcall trf_6016(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6016(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6016(t0,t1,t2);}
+
+C_noret_decl(trf_5830)
+static void C_fcall trf_5830(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5830(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5830(t0,t1,t2);}
+
+C_noret_decl(trf_5857)
+static void C_fcall trf_5857(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5857(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5857(t0,t1,t2);}
+
+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_5734)
+static void C_fcall trf_5734(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5734(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_5734(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5754)
+static void C_fcall trf_5754(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5754(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5754(t0,t1,t2);}
+
+C_noret_decl(trf_5635)
+static void C_fcall trf_5635(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5635(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5635(t0,t1);}
+
+C_noret_decl(trf_5554)
+static void C_fcall trf_5554(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5554(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5554(t0,t1);}
+
+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_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 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_6457(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(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);}
+
+C_noret_decl(tr5rv)
+static void C_fcall tr5rv(C_proc5 k) C_regparm C_noret;
+C_regparm static void C_fcall tr5rv(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+1);
+t5=C_restore_rest_vector(a,n);
+(k)(t0,t1,t2,t3,t4,t5);}
+
+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_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(6655)){
+C_save(t1);
+C_rereclaim2(6655*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,416);
+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],24,"\003syscore-library-modules");
+lf[6]=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[7]=C_h_intern(&lf[7],28,"\003sysexplicit-library-modules");
+lf[9]=C_decode_literal(C_heaptop,"\376B\000\000\003.so");
+lf[11]=C_decode_literal(C_heaptop,"\376B\000\000\004.scm");
+lf[12]=C_h_intern(&lf[12],18,"\003syschicken-prefix");
+lf[13]=C_h_intern(&lf[13],17,"\003sysstring-append");
+lf[14]=C_h_intern(&lf[14],9,"\003syserror");
+lf[15]=C_h_intern(&lf[15],12,"chicken-home");
+lf[16]=C_h_intern(&lf[16],17,"\003syspeek-c-string");
+lf[17]=C_decode_literal(C_heaptop,"\376B\000\000\015share/chicken");
+lf[18]=C_h_intern(&lf[18],15,"\003syshash-symbol");
+lf[19]=C_h_intern(&lf[19],18,"\003syshash-table-ref");
+lf[20]=C_h_intern(&lf[20],19,"\003syshash-table-set!");
+lf[21]=C_h_intern(&lf[21],22,"\003syshash-table-update!");
+lf[22]=C_h_intern(&lf[22],23,"\003syshash-table-for-each");
+lf[23]=C_h_intern(&lf[23],28,"\003sysarbitrary-unbound-symbol");
+lf[24]=C_h_intern(&lf[24],23,"\003syshash-table-location");
+lf[25]=C_h_intern(&lf[25],20,"\003syseval-environment");
+lf[26]=C_h_intern(&lf[26],26,"\003sysenvironment-is-mutable");
+lf[27]=C_h_intern(&lf[27],18,"\003syseval-decorator");
+lf[28]=C_h_intern(&lf[28],20,"\003sysmake-lambda-info");
+lf[29]=C_h_intern(&lf[29],17,"get-output-string");
+lf[30]=C_h_intern(&lf[30],5,"write");
+lf[31]=C_h_intern(&lf[31],18,"open-output-string");
+lf[32]=C_h_intern(&lf[32],19,"\003sysdecorate-lambda");
+lf[33]=C_h_intern(&lf[33],19,"\003sysunbound-in-eval");
+lf[34]=C_h_intern(&lf[34],20,"\003syseval-debug-level");
+lf[35]=C_h_intern(&lf[35],7,"reverse");
+lf[36]=C_h_intern(&lf[36],20,"with-input-from-file");
+lf[37]=C_h_intern(&lf[37],7,"display");
+lf[38]=C_h_intern(&lf[38],22,"\003syscompile-to-closure");
+lf[39]=C_h_intern(&lf[39],4,"cdar");
+lf[40]=C_h_intern(&lf[40],4,"caar");
+lf[41]=C_h_intern(&lf[41],7,"\003sysget");
+lf[42]=C_h_intern(&lf[42],16,"\004coremacro-alias");
+lf[43]=C_h_intern(&lf[43],19,"\003sysundefined-value");
+lf[44]=C_h_intern(&lf[44],18,"\003syscurrent-module");
+lf[45]=C_h_intern(&lf[45],21,"\003sysmacro-environment");
+lf[46]=C_h_intern(&lf[46],28,"\003syscurrent-meta-environment");
+lf[47]=C_h_intern(&lf[47],16,"\003sysdynamic-wind");
+lf[48]=C_h_intern(&lf[48],26,"\003sysmeta-macro-environment");
+lf[49]=C_decode_literal(C_heaptop,"\376B\000\000\020unbound variable");
+lf[50]=C_h_intern(&lf[50],21,"\003syssyntax-error-hook");
+lf[51]=C_decode_literal(C_heaptop,"\376B\000\000!reference to undefined identifier");
+lf[52]=C_h_intern(&lf[52],32,"\003syssymbol-has-toplevel-binding\077");
+lf[53]=C_h_intern(&lf[53],14,"\004coreprimitive");
+lf[54]=C_h_intern(&lf[54],21,"\003sysalias-global-hook");
+lf[55]=C_h_intern(&lf[55],5,"quote");
+lf[56]=C_h_intern(&lf[56],16,"\003sysstrip-syntax");
+lf[57]=C_h_intern(&lf[57],16,"\003syscheck-syntax");
+lf[58]=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[59]=C_h_intern(&lf[59],6,"syntax");
+lf[60]=C_h_intern(&lf[60],11,"\004coresyntax");
+lf[61]=C_h_intern(&lf[61],15,"\004coreglobal-ref");
+lf[62]=C_h_intern(&lf[62],10,"\004corecheck");
+lf[63]=C_h_intern(&lf[63],14,"\004coreimmutable");
+lf[64]=C_h_intern(&lf[64],14,"\004coreundefined");
+lf[65]=C_h_intern(&lf[65],2,"if");
+lf[66]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[67]=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[68]=C_h_intern(&lf[68],5,"begin");
+lf[69]=C_h_intern(&lf[69],10,"\004corebegin");
+lf[70]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[71]=C_h_intern(&lf[71],10,"\003sysappend");
+lf[72]=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[73]=C_h_intern(&lf[73],4,"set!");
+lf[74]=C_h_intern(&lf[74],9,"\004coreset!");
+lf[75]=C_decode_literal(C_heaptop,"\376B\000\000 assignment to immutable variable");
+lf[76]=C_decode_literal(C_heaptop,"\376B\000\000\042assignment of undefined identifier");
+lf[77]=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[78]=C_h_intern(&lf[78],3,"let");
+lf[79]=C_h_intern(&lf[79],8,"\004corelet");
+lf[80]=C_h_intern(&lf[80],5,"cadar");
+lf[81]=C_h_intern(&lf[81],6,"cadadr");
+lf[82]=C_h_intern(&lf[82],15,"\003sysmake-vector");
+lf[83]=C_h_intern(&lf[83],21,"\003syscanonicalize-body");
+lf[84]=C_h_intern(&lf[84],6,"append");
+lf[85]=C_h_intern(&lf[85],4,"cons");
+lf[86]=C_h_intern(&lf[86],6,"gensym");
+lf[87]=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[88]=C_h_intern(&lf[88],6,"letrec");
+lf[89]=C_h_intern(&lf[89],11,"\004coreletrec");
+lf[90]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[91]=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[92]=C_h_intern(&lf[92],6,"lambda");
+lf[93]=C_h_intern(&lf[93],11,"\004corelambda");
+lf[94]=C_h_intern(&lf[94],1,"\077");
+lf[95]=C_h_intern(&lf[95],10,"\003sysvector");
+lf[96]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
+lf[97]=C_decode_literal(C_heaptop,"\376B\000\000\022bad argument count");
+lf[98]=C_h_intern(&lf[98],25,"\003sysdecompose-lambda-list");
+lf[99]=C_h_intern(&lf[99],31,"\003sysexpand-extended-lambda-list");
+lf[100]=C_h_intern(&lf[100],25,"\003sysextended-lambda-list\077");
+lf[101]=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[102]=C_h_intern(&lf[102],10,"let-syntax");
+lf[103]=C_h_intern(&lf[103],18,"\003syser-transformer");
+lf[104]=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[105]=C_h_intern(&lf[105],13,"letrec-syntax");
+lf[106]=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[107]=C_h_intern(&lf[107],13,"define-syntax");
+lf[108]=C_h_intern(&lf[108],22,"define-compiled-syntax");
+lf[109]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[110]=C_h_intern(&lf[110],28,"\003sysextend-macro-environment");
+lf[111]=C_h_intern(&lf[111],23,"\003syscurrent-environment");
+lf[112]=C_h_intern(&lf[112],26,"\003sysregister-syntax-export");
+lf[113]=C_h_intern(&lf[113],5,"cdadr");
+lf[114]=C_h_intern(&lf[114],5,"caadr");
+lf[115]=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[116]=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[117]=C_h_intern(&lf[117],27,"\004coredefine-compiler-syntax");
+lf[118]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[119]=C_h_intern(&lf[119],24,"\004corelet-compiler-syntax");
+lf[120]=C_h_intern(&lf[120],11,"\004coremodule");
+lf[121]=C_h_intern(&lf[121],29,"\003sysinitial-macro-environment");
+lf[122]=C_h_intern(&lf[122],19,"\003sysfinalize-module");
+lf[123]=C_h_intern(&lf[123],19,"\003sysregister-module");
+lf[124]=C_h_intern(&lf[124],6,"module");
+lf[125]=C_decode_literal(C_heaptop,"\376B\000\000\031modules may not be nested");
+lf[126]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
+lf[127]=C_h_intern(&lf[127],16,"\004coreloop-lambda");
+lf[128]=C_h_intern(&lf[128],17,"\004corenamed-lambda");
+lf[129]=C_h_intern(&lf[129],23,"\004corerequire-for-syntax");
+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],11,"\003sysrequire");
+lf[132]=C_h_intern(&lf[132],31,"\003syslookup-runtime-requirements");
+lf[133]=C_h_intern(&lf[133],22,"\004corerequire-extension");
+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],22,"\003sysdo-the-right-thing");
+lf[136]=C_h_intern(&lf[136],24,"\004coreelaborationtimeonly");
+lf[137]=C_h_intern(&lf[137],23,"\004coreelaborationtimetoo");
+lf[138]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[139]=C_h_intern(&lf[139],19,"\004corecompiletimetoo");
+lf[140]=C_h_intern(&lf[140],20,"\004corecompiletimeonly");
+lf[141]=C_h_intern(&lf[141],13,"\004corecallunit");
+lf[142]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[143]=C_h_intern(&lf[143],12,"\004coredeclare");
+lf[144]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[145]=C_h_intern(&lf[145],10,"\000compiling");
+lf[146]=C_h_intern(&lf[146],12,"\003sysfeatures");
+lf[147]=C_h_intern(&lf[147],28,"\010compilerprocess-declaration");
+lf[148]=C_h_intern(&lf[148],8,"\003syswarn");
+lf[149]=C_decode_literal(C_heaptop,"\376B\000\000,declarations are ignored in interpreted code");
+lf[150]=C_h_intern(&lf[150],13,"define-inline");
+lf[151]=C_h_intern(&lf[151],15,"define-constant");
+lf[152]=C_h_intern(&lf[152],6,"define");
+lf[153]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
+lf[154]=C_h_intern(&lf[154],8,"\004coreapp");
+lf[155]=C_h_intern(&lf[155],8,"location");
+lf[156]=C_decode_literal(C_heaptop,"\376B\000\000%cannot evaluate compiler-special-form");
+lf[157]=C_h_intern(&lf[157],11,"\004coreinline");
+lf[158]=C_h_intern(&lf[158],20,"\004coreinline_allocate");
+lf[159]=C_h_intern(&lf[159],19,"\004coreforeign-lambda");
+lf[160]=C_h_intern(&lf[160],28,"\004coredefine-foreign-variable");
+lf[161]=C_h_intern(&lf[161],29,"\004coredefine-external-variable");
+lf[162]=C_h_intern(&lf[162],17,"\004corelet-location");
+lf[163]=C_h_intern(&lf[163],22,"\004coreforeign-primitive");
+lf[164]=C_h_intern(&lf[164],20,"\004coreforeign-lambda*");
+lf[165]=C_h_intern(&lf[165],24,"\004coredefine-foreign-type");
+lf[166]=C_h_intern(&lf[166],10,"\003sysexpand");
+lf[167]=C_h_intern(&lf[167],18,"\003syscurrent-thread");
+lf[168]=C_decode_literal(C_heaptop,"\376B\000\000\031illegal non-atomic object");
+lf[169]=C_h_intern(&lf[169],11,"\003sysnumber\077");
+lf[170]=C_h_intern(&lf[170],8,"keyword\077");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\024malformed expression");
+lf[172]=C_h_intern(&lf[172],16,"\003syseval-handler");
+lf[173]=C_h_intern(&lf[173],12,"eval-handler");
+lf[174]=C_h_intern(&lf[174],4,"eval");
+lf[175]=C_h_intern(&lf[175],24,"\003syssyntax-error-culprit");
+lf[176]=C_decode_literal(C_heaptop,"\376B\000\000\032illegal lambda-list syntax");
+lf[177]=C_h_intern(&lf[177],12,"load-verbose");
+lf[178]=C_h_intern(&lf[178],14,"\003sysabort-load");
+lf[179]=C_h_intern(&lf[179],27,"\003syscurrent-source-filename");
+lf[180]=C_h_intern(&lf[180],21,"\003syscurrent-load-path");
+lf[181]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[182]=C_h_intern(&lf[182],18,"\003sysdload-disabled");
+lf[183]=C_h_intern(&lf[183],22,"set-dynamic-load-mode!");
+lf[184]=C_h_intern(&lf[184],21,"\003sysset-dlopen-flags!");
+lf[185]=C_h_intern(&lf[185],6,"global");
+lf[186]=C_h_intern(&lf[186],5,"local");
+lf[187]=C_h_intern(&lf[187],4,"lazy");
+lf[188]=C_h_intern(&lf[188],3,"now");
+lf[189]=C_h_intern(&lf[189],15,"\003syssignal-hook");
+lf[190]=C_decode_literal(C_heaptop,"\376B\000\000\031invalid dynamic-load mode");
+lf[191]=C_h_intern(&lf[191],4,"read");
+lf[192]=C_h_intern(&lf[192],7,"newline");
+lf[193]=C_h_intern(&lf[193],12,"flush-output");
+lf[194]=C_h_intern(&lf[194],15,"open-input-file");
+lf[195]=C_h_intern(&lf[195],16,"close-input-port");
+lf[196]=C_h_intern(&lf[196],13,"string-append");
+lf[197]=C_h_intern(&lf[197],8,"\003sysload");
+lf[198]=C_h_intern(&lf[198],31,"\003sysread-error-with-line-number");
+lf[199]=C_h_intern(&lf[199],17,"\003sysdisplay-times");
+lf[200]=C_h_intern(&lf[200],14,"\003sysstop-timer");
+lf[201]=C_h_intern(&lf[201],15,"\003sysstart-timer");
+lf[202]=C_h_intern(&lf[202],4,"load");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\036unable to load compiled module");
+lf[204]=C_h_intern(&lf[204],9,"peek-char");
+lf[205]=C_h_intern(&lf[205],13,"\003syssubstring");
+lf[206]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[207]=C_h_intern(&lf[207],30,"call-with-current-continuation");
+lf[208]=C_h_intern(&lf[208],9,"\003sysdload");
+lf[209]=C_h_intern(&lf[209],17,"\003sysmake-c-string");
+lf[210]=C_decode_literal(C_heaptop,"\376B\000\000\002./");
+lf[211]=C_h_intern(&lf[211],11,"\000file-error");
+lf[212]=C_decode_literal(C_heaptop,"\376B\000\000\020cannot open file");
+lf[213]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
+lf[214]=C_decode_literal(C_heaptop,"\376B\000\000\012; loading ");
+lf[215]=C_h_intern(&lf[215],13,"\003sysfile-info");
+lf[216]=C_h_intern(&lf[216],26,"\003sysload-dynamic-extension");
+lf[217]=C_h_intern(&lf[217],11,"\000type-error");
+lf[218]=C_decode_literal(C_heaptop,"\376B\000\000(bad argument type - not a port or string");
+lf[219]=C_h_intern(&lf[219],5,"port\077");
+lf[220]=C_h_intern(&lf[220],20,"\003sysexpand-home-path");
+lf[221]=C_h_intern(&lf[221],13,"load-relative");
+lf[222]=C_h_intern(&lf[222],12,"load-noisily");
+lf[223]=C_h_intern(&lf[223],15,"\003sysget-keyword");
+lf[224]=C_h_intern(&lf[224],8,"\000printer");
+lf[225]=C_h_intern(&lf[225],5,"\000time");
+lf[226]=C_h_intern(&lf[226],10,"\000evaluator");
+lf[227]=C_h_intern(&lf[227],26,"\003sysload-library-extension");
+lf[228]=C_h_intern(&lf[228],6,"cygwin");
+lf[229]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\014cygchicken-0\376\377\016");
+lf[230]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\012libchicken\376\377\016");
+lf[231]=C_h_intern(&lf[231],34,"\003sysdefault-dynamic-load-libraries");
+lf[232]=C_h_intern(&lf[232],22,"dynamic-load-libraries");
+lf[233]=C_h_intern(&lf[233],18,"\003sysload-library-0");
+lf[234]=C_decode_literal(C_heaptop,"\376B\000\000\005 ...\012");
+lf[235]=C_decode_literal(C_heaptop,"\376B\000\000\022; loading library ");
+lf[236]=C_decode_literal(C_heaptop,"\376B\000\000\002C_");
+lf[237]=C_decode_literal(C_heaptop,"\376B\000\000\011_toplevel");
+lf[238]=C_h_intern(&lf[238],24,"\003sysstring->c-identifier");
+lf[239]=C_h_intern(&lf[239],16,"\003sys->feature-id");
+lf[240]=C_h_intern(&lf[240],16,"\003sysload-library");
+lf[241]=C_h_intern(&lf[241],12,"load-library");
+lf[242]=C_decode_literal(C_heaptop,"\376B\000\000\026unable to load library");
+lf[243]=C_h_intern(&lf[243],31,"\003syscanonicalize-extension-path");
+lf[244]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid extension path");
+lf[245]=C_h_intern(&lf[245],18,"\003syssymbol->string");
+lf[246]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[247]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[248]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[249]=C_h_intern(&lf[249],19,"\003sysrepository-path");
+lf[250]=C_h_intern(&lf[250],15,"repository-path");
+lf[251]=C_h_intern(&lf[251],14,"\003syssetup-mode");
+lf[252]=C_h_intern(&lf[252],12,"file-exists\077");
+lf[253]=C_h_intern(&lf[253],18,"\003sysfind-extension");
+lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[255]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
+lf[256]=C_h_intern(&lf[256],21,"\003sysinclude-pathnames");
+lf[257]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376B\000\000\001.\376\377\016");
+lf[258]=C_h_intern(&lf[258],21,"\003sysloaded-extensions");
+lf[259]=C_h_intern(&lf[259],14,"string->symbol");
+lf[260]=C_h_intern(&lf[260],18,"\003sysload-extension");
+lf[261]=C_decode_literal(C_heaptop,"\376B\000\000\030cannot load core library");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot load extension");
+lf[263]=C_h_intern(&lf[263],11,"\003sysprovide");
+lf[264]=C_h_intern(&lf[264],7,"provide");
+lf[265]=C_h_intern(&lf[265],13,"\003sysprovided\077");
+lf[266]=C_h_intern(&lf[266],9,"provided\077");
+lf[267]=C_h_intern(&lf[267],7,"require");
+lf[268]=C_h_intern(&lf[268],12,"\003sysfor-each");
+lf[269]=C_h_intern(&lf[269],25,"\003sysextension-information");
+lf[270]=C_decode_literal(C_heaptop,"\376B\000\000\012setup-info");
+lf[271]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[272]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[273]=C_h_intern(&lf[273],21,"extension-information");
+lf[274]=C_h_intern(&lf[274],18,"require-at-runtime");
+lf[275]=C_h_intern(&lf[275],12,"vector->list");
+lf[276]=C_h_intern(&lf[276],14,"dynamic/syntax");
+lf[277]=C_h_intern(&lf[277],7,"dynamic");
+lf[278]=C_h_intern(&lf[278],11,"lset-adjoin");
+lf[279]=C_h_intern(&lf[279],3,"eq\077");
+lf[280]=C_h_intern(&lf[280],26,"\010compilerfile-requirements");
+lf[281]=C_h_intern(&lf[281],6,"import");
+lf[282]=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-88\376\003\000\000\002\376\001\000\000\007srfi-98\376\377\016");
+lf[283]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[284]=C_h_intern(&lf[284],4,"uses");
+lf[285]=C_h_intern(&lf[285],11,"import-only");
+lf[286]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[287]=C_h_intern(&lf[287],17,"require-extension");
+lf[288]=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\003\000\000\002\376\001\000\000\007srfi-55\376\377\016");
+lf[289]=C_h_intern(&lf[289],12,"\003sysfeature\077");
+lf[290]=C_h_intern(&lf[290],24,"\003sysextension-specifiers");
+lf[291]=C_decode_literal(C_heaptop,"\376B\000\000\035undefined extension specifier");
+lf[292]=C_decode_literal(C_heaptop,"\376B\000\000\033invalid extension specifier");
+lf[293]=C_h_intern(&lf[293],24,"set-extension-specifier!");
+lf[294]=C_h_intern(&lf[294],11,"string-copy");
+lf[297]=C_h_intern(&lf[297],11,"environment");
+lf[299]=C_h_intern(&lf[299],16,"\003sysenvironment\077");
+lf[300]=C_h_intern(&lf[300],18,"\003syscopy-env-table");
+lf[301]=C_h_intern(&lf[301],23,"\003sysenvironment-symbols");
+lf[302]=C_h_intern(&lf[302],18,"\003syswalk-namespace");
+lf[303]=C_h_intern(&lf[303],23,"interaction-environment");
+lf[304]=C_h_intern(&lf[304],25,"scheme-report-environment");
+lf[305]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
+lf[306]=C_h_intern(&lf[306],11,"make-vector");
+lf[307]=C_h_intern(&lf[307],16,"null-environment");
+lf[308]=C_decode_literal(C_heaptop,"\376B\000\000\026no support for version");
+lf[309]=C_h_intern(&lf[309],28,"\003sysresolve-include-filename");
+lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[311]=C_decode_literal(C_heaptop,"\376B\000\000\0010");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000\013 major GCs\012");
+lf[313]=C_decode_literal(C_heaptop,"\376B\000\000\013 minor GCs\012");
+lf[314]=C_decode_literal(C_heaptop,"\376B\000\000\013 mutations\012");
+lf[315]=C_decode_literal(C_heaptop,"\376B\000\000\027 seconds in (major) GC\012");
+lf[316]=C_decode_literal(C_heaptop,"\376B\000\000\021 seconds elapsed\012");
+lf[317]=C_h_intern(&lf[317],18,"\003sysrepl-eval-hook");
+lf[318]=C_h_intern(&lf[318],27,"\003sysrepl-print-length-limit");
+lf[319]=C_h_intern(&lf[319],18,"\003sysrepl-read-hook");
+lf[320]=C_h_intern(&lf[320],19,"\003sysrepl-print-hook");
+lf[321]=C_h_intern(&lf[321],16,"\003syswrite-char-0");
+lf[322]=C_h_intern(&lf[322],9,"\003sysprint");
+lf[323]=C_h_intern(&lf[323],27,"\003syswith-print-length-limit");
+lf[324]=C_h_intern(&lf[324],11,"repl-prompt");
+lf[325]=C_h_intern(&lf[325],20,"\003sysread-prompt-hook");
+lf[326]=C_h_intern(&lf[326],16,"\003sysflush-output");
+lf[327]=C_h_intern(&lf[327],19,"\003sysstandard-output");
+lf[328]=C_h_intern(&lf[328],22,"\003sysclear-trace-buffer");
+lf[329]=C_h_intern(&lf[329],16,"print-call-chain");
+lf[330]=C_h_intern(&lf[330],5,"reset");
+lf[331]=C_h_intern(&lf[331],4,"repl");
+lf[332]=C_h_intern(&lf[332],18,"\003sysstandard-error");
+lf[333]=C_h_intern(&lf[333],18,"\003sysstandard-input");
+lf[334]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[335]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\006\012Error");
+lf[337]=C_h_intern(&lf[337],17,"\003syserror-handler");
+lf[338]=C_h_intern(&lf[338],20,"\003syswarnings-enabled");
+lf[339]=C_decode_literal(C_heaptop,"\376B\000\000\005 (in ");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000\002 ");
+lf[341]=C_decode_literal(C_heaptop,"\376B\000\000FWarning: the following toplevel variables are referenced but unbound:\012");
+lf[342]=C_h_intern(&lf[342],15,"\003sysread-char-0");
+lf[343]=C_h_intern(&lf[343],15,"\003syspeek-char-0");
+lf[344]=C_h_intern(&lf[344],21,"\003sysenable-qualifiers");
+lf[345]=C_h_intern(&lf[345],17,"\003sysreset-handler");
+lf[346]=C_h_intern(&lf[346],28,"\003syssharp-comma-reader-ctors");
+lf[347]=C_h_intern(&lf[347],18,"define-reader-ctor");
+lf[348]=C_h_intern(&lf[348],18,"\003sysuser-read-hook");
+lf[349]=C_h_intern(&lf[349],9,"read-char");
+lf[350]=C_h_intern(&lf[350],14,"\003sysread-error");
+lf[351]=C_decode_literal(C_heaptop,"\376B\000\000!invalid sharp-comma external form");
+lf[352]=C_decode_literal(C_heaptop,"\376B\000\000!undefined sharp-comma constructor");
+lf[355]=C_h_intern(&lf[355],19,"print-error-message");
+lf[356]=C_h_intern(&lf[356],22,"with-exception-handler");
+lf[358]=C_h_intern(&lf[358],6,"\003sysgc");
+lf[360]=C_h_intern(&lf[360],17,"\003systhread-yield!");
+lf[363]=C_h_intern(&lf[363],17,"open-input-string");
+lf[365]=C_decode_literal(C_heaptop,"\376B\000\000(Error: not enough room for result string");
+lf[373]=C_decode_literal(C_heaptop,"\376B\000\000\010No error");
+lf[374]=C_h_intern(&lf[374],15,"\003sysmake-string");
+lf[375]=C_decode_literal(C_heaptop,"\376B\000\000\004#;> ");
+lf[376]=C_h_intern(&lf[376],14,"make-parameter");
+lf[377]=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[378]=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[379]=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[380]=C_h_intern(&lf[380],18,"\003sysnumber->string");
+lf[381]=C_h_intern(&lf[381],5,"error");
+lf[382]=C_decode_literal(C_heaptop,"\376B\000\000\031invalid extension version");
+lf[383]=C_h_intern(&lf[383],7,"version");
+lf[384]=C_h_intern(&lf[384],2,"id");
+lf[385]=C_decode_literal(C_heaptop,"\376B\000\0003installed extension does not match required version");
+lf[386]=C_h_intern(&lf[386],9,"string>=\077");
+lf[387]=C_decode_literal(C_heaptop,"\376B\000\000\035invalid version specification");
+lf[388]=C_h_intern(&lf[388],12,"list->vector");
+lf[389]=C_h_intern(&lf[389],18,"\003sysstring->symbol");
+lf[390]=C_decode_literal(C_heaptop,"\376B\000\000\005srfi-");
+lf[391]=C_h_intern(&lf[391],4,"srfi");
+lf[392]=C_decode_literal(C_heaptop,"\376B\000\000\014lib/chicken/");
+lf[393]=C_h_intern(&lf[393],22,"default-binary-version");
+lf[394]=C_h_intern(&lf[394],24,"get-environment-variable");
+lf[395]=C_decode_literal(C_heaptop,"\376B\000\000\022CHICKEN_REPOSITORY");
+lf[396]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[397]=C_h_intern(&lf[397],5,"linux");
+lf[398]=C_h_intern(&lf[398],6,"netbsd");
+lf[399]=C_h_intern(&lf[399],7,"openbsd");
+lf[400]=C_h_intern(&lf[400],7,"freebsd");
+lf[401]=C_h_intern(&lf[401],16,"software-version");
+lf[402]=C_h_intern(&lf[402],14,"build-platform");
+lf[403]=C_h_intern(&lf[403],7,"windows");
+lf[404]=C_decode_literal(C_heaptop,"\376B\000\000\004.dll");
+lf[405]=C_h_intern(&lf[405],6,"macosx");
+lf[406]=C_decode_literal(C_heaptop,"\376B\000\000\006.dylib");
+lf[407]=C_h_intern(&lf[407],4,"hpux");
+lf[408]=C_h_intern(&lf[408],4,"hppa");
+lf[409]=C_decode_literal(C_heaptop,"\376B\000\000\003.sl");
+lf[410]=C_h_intern(&lf[410],12,"machine-type");
+lf[411]=C_h_intern(&lf[411],13,"software-type");
+lf[412]=C_decode_literal(C_heaptop,"\376B\000\000\012C_toplevel");
+lf[413]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[414]=C_decode_literal(C_heaptop,"\376B\000\000\001/");
+lf[415]=C_decode_literal(C_heaptop,"\376B\000\000\016CHICKEN_PREFIX");
+C_register_lf2(lf,416,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 t8;
+C_word ab[6],*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! d ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2956,a[2]=((C_word)li0),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[5]+1 /* (set! core-library-modules ...) */,lf[6]);
+t4=C_set_block_item(lf[7] /* explicit-library-modules */,0,C_SCHEME_END_OF_LIST);
+t5=C_mutate(&lf[8] /* (set! constant62 ...) */,lf[9]);
+t6=C_mutate(&lf[10] /* (set! constant70 ...) */,lf[11]);
+t7=(*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 */
+t8=*((C_word*)lf[394]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,lf[415]);}
+
+/* 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_word)C_block_size(t1);
+t4=(C_word)C_fixnum_difference(t3,C_fix(1));
+t5=(C_word)C_i_string_ref(t1,t4);
+if(C_truep((C_truep((C_word)C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+/* eval.scm: 138 ##sys#string-append */
+t6=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[413]);}
+else{
+/* eval.scm: 138 ##sys#string-append */
+t6=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t2,t1,lf[414]);}}
+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[12]+1 /* (set! chicken-prefix ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2991,a[2]=t1,a[3]=((C_word)li1),tmp=(C_word)a,a+=4,tmp));
+t3=C_mutate((C_word*)lf[15]+1 /* (set! chicken-home ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3025,a[2]=((C_word)li2),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[18]+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)li3),tmp=(C_word)a,a+=5,tmp));
+t9=C_mutate((C_word*)lf[19]+1 /* (set! hash-table-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3052,a[2]=((C_word)li5),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[20]+1 /* (set! hash-table-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3107,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[21]+1 /* (set! hash-table-update! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3167,a[2]=((C_word)li8),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[22]+1 /* (set! hash-table-for-each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3187,a[2]=((C_word)li12),tmp=(C_word)a,a+=3,tmp));
+t13=(C_word)C_slot(lf[23],C_fix(0));
+t14=C_mutate((C_word*)lf[24]+1 /* (set! hash-table-location ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3255,a[2]=t13,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));
+t15=C_set_block_item(lf[25] /* eval-environment */,0,C_SCHEME_FALSE);
+t16=C_set_block_item(lf[26] /* environment-is-mutable */,0,C_SCHEME_FALSE);
+t17=C_mutate((C_word*)lf[27]+1 /* (set! eval-decorator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3315,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp));
+t18=C_set_block_item(lf[33] /* unbound-in-eval */,0,C_SCHEME_FALSE);
+t19=C_set_block_item(lf[34] /* eval-debug-level */,0,C_fix(1));
+t20=*((C_word*)lf[30]+1);
+t21=*((C_word*)lf[35]+1);
+t22=*((C_word*)lf[31]+1);
+t23=*((C_word*)lf[29]+1);
+t24=C_retrieve(lf[36]);
+t25=(C_word)C_slot(lf[23],C_fix(0));
+t26=*((C_word*)lf[37]+1);
+t27=C_mutate((C_word*)lf[38]+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)li143),tmp=(C_word)a,a+=5,tmp));
+t28=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6852,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10702,a[2]=((C_word)li299),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 824 make-parameter */
+t30=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t30+1)))(3,t30,t28,t29);}
+
+/* a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10702(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*)tr3rv,(void*)f_10702r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_10702r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10702r(C_word t0,C_word 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[26]);
+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_10706,a[2]=t2,a[3]=t1,a[4]=t7,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_notvemptyp(t3))){
+t9=(C_word)C_i_vector_ref(t3,C_fix(0));
+if(C_truep(t9)){
+t10=(C_word)C_i_check_structure(t9,lf[297]);
+t11=(C_word)C_slot(t9,C_fix(1));
+t12=C_set_block_item(t7,0,t11);
+t13=(C_word)C_slot(t9,C_fix(2));
+t14=C_set_block_item(t5,0,t13);
+t15=t8;
+f_10706(t15,t14);}
+else{
+t10=C_SCHEME_UNDEFINED;
+t11=t8;
+f_10706(t11,t10);}}
+else{
+t9=t8;
+f_10706(t9,C_SCHEME_UNDEFINED);}}
+
+/* k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_fcall f_10706(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_10706,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_10709,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10714,a[2]=t5,a[3]=t3,a[4]=t9,a[5]=t7,a[6]=((C_word)li296),tmp=(C_word)a,a+=7,tmp);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10721,a[2]=((C_word*)t0)[2],a[3]=((C_word)li297),tmp=(C_word)a,a+=4,tmp);
+t13=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10731,a[2]=t9,a[3]=t7,a[4]=t5,a[5]=t3,a[6]=((C_word)li298),tmp=(C_word)a,a+=7,tmp);
+/* ##sys#dynamic-wind */
+t14=*((C_word*)lf[47]+1);
+((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t10,t11,t12,t13);}
+
+/* a10730 in k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10731(C_word c,C_word 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_10731,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[26]));
+t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[25]));
+t4=C_mutate((C_word*)lf[26]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t5=C_mutate((C_word*)lf[25]+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);}
+
+/* a10720 in k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10721(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_10721,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10729,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 836 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t2);}
+
+/* k10727 in a10720 in k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10729(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 836 ##sys#compile-to-closure */
+t2=*((C_word*)lf[38]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t1);}
+
+/* a10713 in k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10714(C_word c,C_word 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_10714,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,C_retrieve(lf[26]));
+t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,C_retrieve(lf[25]));
+t4=C_mutate((C_word*)lf[26]+1 /* (set! environment-is-mutable ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t5=C_mutate((C_word*)lf[25]+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);}
+
+/* k10707 in k10704 in a10701 in k2988 in k2985 in k2952 */
+static void C_ccall f_10709(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g14051406 */
+t2=t1;
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6852(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6852,2,t0,t1);}
+t2=C_mutate((C_word*)lf[172]+1 /* (set! eval-handler ...) */,t1);
+t3=C_mutate((C_word*)lf[173]+1 /* (set! eval-handler ...) */,*((C_word*)lf[172]+1));
+t4=C_mutate((C_word*)lf[174]+1 /* (set! eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6855,a[2]=((C_word)li144),tmp=(C_word)a,a+=3,tmp));
+t5=*((C_word*)lf[35]+1);
+t6=C_mutate((C_word*)lf[98]+1 /* (set! decompose-lambda-list ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6865,a[2]=t5,a[3]=((C_word)li147),tmp=(C_word)a,a+=4,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6947,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_fudge(C_fix(13));
+/* eval.scm: 868 make-parameter */
+t9=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
+
+/* k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6947(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_6947,2,t0,t1);}
+t2=C_mutate((C_word*)lf[177]+1 /* (set! load-verbose ...) */,t1);
+t3=C_mutate((C_word*)lf[178]+1 /* (set! abort-load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6949,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(lf[179] /* current-source-filename */,0,C_SCHEME_FALSE);
+t5=C_mutate((C_word*)lf[180]+1 /* (set! current-load-path ...) */,lf[181]);
+t6=C_set_block_item(lf[182] /* dload-disabled */,0,C_SCHEME_FALSE);
+t7=C_mutate((C_word*)lf[183]+1 /* (set! set-dynamic-load-mode! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6955,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp));
+t8=*((C_word*)lf[191]+1);
+t9=*((C_word*)lf[30]+1);
+t10=*((C_word*)lf[37]+1);
+t11=*((C_word*)lf[192]+1);
+t12=*((C_word*)lf[193]+1);
+t13=*((C_word*)lf[174]+1);
+t14=*((C_word*)lf[194]+1);
+t15=*((C_word*)lf[195]+1);
+t16=*((C_word*)lf[196]+1);
+t17=*((C_word*)lf[177]+1);
+t18=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7028,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: 902 ##sys#make-c-string */
+t19=*((C_word*)lf[209]+1);
+((C_proc3)(void*)(*((C_word*)t19+1)))(3,t19,t18,lf[412]);}
+
+/* k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7028(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7028,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7030,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp);
+t3=C_mutate((C_word*)lf[197]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7076,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)li171),tmp=(C_word)a,a+=14,tmp));
+t4=C_mutate((C_word*)lf[202]+1 /* (set! load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7497,a[2]=((C_word)li172),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[221]+1 /* (set! load-relative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7526,a[2]=((C_word)li173),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[222]+1 /* (set! load-noisily ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7569,a[2]=((C_word)li177),tmp=(C_word)a,a+=3,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7595,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10696,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 995 software-type */
+t9=*((C_word*)lf[411]+1);
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}
+
+/* k10694 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 t4;
+C_word ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10696,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[403]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[2];
+f_7595(t3,lf[404]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10692,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 996 software-version */
+t4=*((C_word*)lf[401]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10690 in k10694 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10692,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[405]);
+if(C_truep(t2)){
+t3=((C_word*)t0)[2];
+f_7595(t3,lf[406]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10688,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 997 software-version */
+t4=*((C_word*)lf[401]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10686 in k10690 in k10694 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 t4;
+C_word ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10688,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[407]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10684,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 998 machine-type */
+t4=*((C_word*)lf[410]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=((C_word*)t0)[2];
+f_7595(t3,lf[8]);}}
+
+/* k10682 in k10686 in k10690 in k10694 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10684(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(t1,lf[408]);
+t3=((C_word*)t0)[2];
+f_7595(t3,(C_truep(t2)?lf[409]:lf[8]));}
+
+/* k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7595(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_7595,NULL,2,t0,t1);}
+t2=C_mutate((C_word*)lf[227]+1 /* (set! load-library-extension ...) */,t1);
+t3=C_mutate((C_word*)lf[216]+1 /* (set! load-dynamic-extension ...) */,lf[8]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7600,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1004 build-platform */
+t5=*((C_word*)lf[402]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7600(C_word c,C_word t0,C_word t1){
+C_word 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_7600,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[228]);
+t3=(C_truep(t2)?lf[229]:lf[230]);
+t4=C_mutate((C_word*)lf[231]+1 /* (set! default-dynamic-load-libraries ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7607,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10635,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10656,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1010 software-version */
+t8=*((C_word*)lf[401]+1);
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}
+
+/* k10654 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10656(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_word)C_eqp(t1,lf[397]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t1,lf[398]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t1,lf[399]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t1,lf[400]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))))){
+t2=(C_word)C_i_zerop(C_fix((C_word)C_BINARY_VERSION));
+t3=((C_word*)t0)[2];
+f_10635(t3,(C_word)C_i_not(t2));}
+else{
+t2=((C_word*)t0)[2];
+f_10635(t2,C_SCHEME_FALSE);}}
+
+/* k10633 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10635(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_10635,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10642,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1015 number->string */
+C_number_to_string(3,0,t2,C_fix((C_word)C_BINARY_VERSION));}
+else{
+t2=((C_word*)t0)[2];
+f_7607(2,t2,C_retrieve(lf[227]));}}
+
+/* k10640 in k10633 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10642(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1012 string-append */
+t2=*((C_word*)lf[196]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],C_retrieve(lf[227]),lf[396],t1);}
+
+/* k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7607(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_7607,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7609,a[2]=t1,a[3]=((C_word)li178),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7616,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_10591,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_10599,a[2]=t2,a[3]=t5,a[4]=t10,a[5]=t7,a[6]=((C_word)li295),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_10599(t12,t8,C_retrieve(lf[231]));}
+
+/* loop1725 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10599(C_word 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_10599,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_10628,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));
+/* g17411742 */
+t5=((C_word*)t0)[2];
+f_7609(t5,t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10626 in loop1725 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10628,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));
+/* loop17251738 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10599(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));
+/* loop17251738 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10599(t6,((C_word*)t0)[3],t5);}}
+
+/* k10589 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10591,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10593,a[2]=((C_word)li294),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1019 make-parameter */
+t3=*((C_word*)lf[376]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
+
+/* a10592 in k10589 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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);
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr3,(void*)f_10593,3,t0,t1,t2);}
+t3=(C_word)C_i_check_list(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
+
+/* k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_7616,2,t0,t1);}
+t2=C_mutate((C_word*)lf[232]+1 /* (set! dynamic-load-libraries ...) */,t1);
+t3=*((C_word*)lf[177]+1);
+t4=*((C_word*)lf[196]+1);
+t5=*((C_word*)lf[232]+1);
+t6=*((C_word*)lf[37]+1);
+t7=C_mutate((C_word*)lf[233]+1 /* (set! load-library-0 ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7618,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t6,a[6]=((C_word)li180),tmp=(C_word)a,a+=7,tmp));
+t8=C_mutate((C_word*)lf[240]+1 /* (set! load-library ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7724,a[2]=((C_word)li181),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[241]+1 /* (set! load-library ...) */,*((C_word*)lf[240]+1));
+t10=*((C_word*)lf[35]+1);
+t11=*((C_word*)lf[196]+1);
+t12=C_mutate((C_word*)lf[243]+1 /* (set! canonicalize-extension-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7810,a[2]=t11,a[3]=((C_word)li185),tmp=(C_word)a,a+=4,tmp));
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7970,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10560,a[2]=t13,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1109 get-environment-variable */
+t15=*((C_word*)lf[394]+1);
+((C_proc3)(void*)(*((C_word*)t15+1)))(3,t15,t14,lf[395]);}
+
+/* k10558 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10560(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10563,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t1)){
+t3=t1;
+/* eval.scm: 1108 make-parameter */
+t4=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10566,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_10576,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10580,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_fudge(C_fix(42));
+if(C_truep(t6)){
+/* eval.scm: 1113 ##sys#number->string */
+((C_proc3)C_retrieve_symbol_proc(lf[380]))(3,*((C_word*)lf[380]+1),t5,t6);}
+else{
+t7=C_retrieve(lf[393]);
+/* eval.scm: 1113 ##sys#number->string */
+((C_proc3)C_retrieve_symbol_proc(lf[380]))(3,*((C_word*)lf[380]+1),t5,t7);}}}
+
+/* k10578 in k10558 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10580(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1111 ##sys#string-append */
+t2=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[392],t1);}
+
+/* k10574 in k10558 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10576(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1110 ##sys#chicken-prefix */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[12]+1)))(3,*((C_word*)lf[12]+1),((C_word*)t0)[2],t1);}
+
+/* k10564 in k10558 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10566(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_10566,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+/* eval.scm: 1108 make-parameter */
+t3=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[3],t2);}
+else{
+/* ##sys#peek-c-string */
+t2=*((C_word*)lf[16]+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));}}
+
+/* k10561 in k10558 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10563(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1108 make-parameter */
+t2=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7970(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[45],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7970,2,t0,t1);}
+t2=C_mutate((C_word*)lf[249]+1 /* (set! repository-path ...) */,t1);
+t3=C_mutate((C_word*)lf[250]+1 /* (set! repository-path ...) */,*((C_word*)lf[249]+1));
+t4=C_set_block_item(lf[251] /* setup-mode */,0,C_SCHEME_FALSE);
+t5=*((C_word*)lf[252]+1);
+t6=*((C_word*)lf[196]+1);
+t7=C_mutate((C_word*)lf[253]+1 /* (set! find-extension ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7974,a[2]=t6,a[3]=t5,a[4]=((C_word)li188),tmp=(C_word)a,a+=5,tmp));
+t8=C_set_block_item(lf[258] /* loaded-extensions */,0,C_SCHEME_END_OF_LIST);
+t9=*((C_word*)lf[259]+1);
+t10=C_mutate((C_word*)lf[260]+1 /* (set! load-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8073,a[2]=t9,a[3]=((C_word)li189),tmp=(C_word)a,a+=4,tmp));
+t11=C_mutate((C_word*)lf[263]+1 /* (set! provide ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8157,a[2]=((C_word)li191),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[264]+1 /* (set! provide ...) */,C_retrieve(lf[263]));
+t13=C_mutate((C_word*)lf[265]+1 /* (set! provided? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8199,a[2]=((C_word)li192),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[266]+1 /* (set! provided? ...) */,C_retrieve(lf[265]));
+t15=C_mutate((C_word*)lf[131]+1 /* (set! require ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8213,a[2]=((C_word)li194),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[267]+1 /* (set! require ...) */,C_retrieve(lf[131]));
+t17=C_retrieve(lf[36]);
+t18=*((C_word*)lf[252]+1);
+t19=*((C_word*)lf[196]+1);
+t20=*((C_word*)lf[191]+1);
+t21=C_mutate((C_word*)lf[269]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8226,a[2]=t19,a[3]=t18,a[4]=t20,a[5]=t17,a[6]=((C_word)li196),tmp=(C_word)a,a+=7,tmp));
+t22=C_mutate((C_word*)lf[273]+1 /* (set! extension-information ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8259,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
+t23=C_retrieve(lf[36]);
+t24=*((C_word*)lf[191]+1);
+t25=C_mutate((C_word*)lf[132]+1 /* (set! lookup-runtime-requirements ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8265,a[2]=((C_word)li199),tmp=(C_word)a,a+=3,tmp));
+t26=*((C_word*)lf[275]+1);
+t27=C_mutate((C_word*)lf[135]+1 /* (set! do-the-right-thing ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8314,a[2]=t26,a[3]=((C_word)li209),tmp=(C_word)a,a+=4,tmp));
+t28=C_set_block_item(lf[290] /* extension-specifiers */,0,C_SCHEME_END_OF_LIST);
+t29=C_mutate((C_word*)lf[293]+1 /* (set! set-extension-specifier! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8870,a[2]=((C_word)li212),tmp=(C_word)a,a+=3,tmp));
+t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8909,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t31=*((C_word*)lf[388]+1);
+t32=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10506,a[2]=t31,a[3]=((C_word)li293),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1326 set-extension-specifier! */
+((C_proc4)C_retrieve_symbol_proc(lf[293]))(4,*((C_word*)lf[293]+1),t30,lf[391],t32);}
+
+/* a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10506(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);
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr4,(void*)f_10506,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10514,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+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|3,a[1]=(C_word)f_10520,a[2]=t7,a[3]=((C_word)li292),tmp=(C_word)a,a+=4,tmp));
+t9=((C_word*)t7)[1];
+f_10520(t9,t4,t5);}
+
+/* loop in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10520(C_word t0,C_word 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_10520,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_check_exact_2(t3,lf[287]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10540,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10552,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10556,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1336 number->string */
+C_number_to_string(3,0,t7,t3);}}
+
+/* k10554 in loop in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10556(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1336 ##sys#string-append */
+t2=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[390],t1);}
+
+/* k10550 in loop in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10552(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1336 ##sys#string->symbol */
+t2=*((C_word*)lf[389]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10538 in loop in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10540(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_10540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10544,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]);
+/* eval.scm: 1337 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_10520(t4,t2,t3);}
+
+/* k10542 in k10538 in loop in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10544(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_10544,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));}
+
+/* k10512 in a10505 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10514(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1330 list->vector */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8909(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_8909,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8912,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10409,a[2]=((C_word)li291),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1342 set-extension-specifier! */
+((C_proc4)C_retrieve_symbol_proc(lf[293]))(4,*((C_word*)lf[293]+1),t2,lf[383],t3);}
+
+/* a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10409(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_10409,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10412,a[2]=((C_word)li290),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10446,a[2]=t4,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_listp(t2))){
+t6=(C_word)C_i_length(t2);
+t7=t5;
+f_10446(t7,(C_word)C_eqp(C_fix(3),t6));}
+else{
+t6=t5;
+f_10446(t6,C_SCHEME_FALSE);}}
+
+/* k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10446(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_10446,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10449,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_cadr(((C_word*)t0)[3]);
+/* eval.scm: 1351 extension-information */
+t4=*((C_word*)lf[273]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
+else{
+/* eval.scm: 1356 ##sys#syntax-error-hook */
+t2=*((C_word*)lf[50]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],lf[387],((C_word*)t0)[3]);}}
+
+/* k10447 in k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10449(C_word c,C_word t0,C_word 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_10449,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_i_assq(lf[383],t1):C_SCHEME_FALSE);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10455,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10458,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(t2)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10472,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_i_car(t2);
+/* eval.scm: 1353 ->string */
+f_10412(t5,t6);}
+else{
+t5=t4;
+f_10458(2,t5,C_SCHEME_FALSE);}}
+
+/* k10470 in k10447 in k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10472(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_10472,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10476,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_caddr(((C_word*)t0)[3]);
+/* eval.scm: 1353 ->string */
+f_10412(t2,t3);}
+
+/* k10474 in k10470 in k10447 in k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10476(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1353 string>=? */
+t2=*((C_word*)lf[386]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10456 in k10447 in k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10458(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_retrieve(lf[384]);
+t3=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+t2=(C_word)C_i_caddr(((C_word*)t0)[4]);
+/* eval.scm: 1354 error */
+t3=*((C_word*)lf[381]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[3],lf[385],C_retrieve(lf[384]),((C_word*)t0)[2],t2);}}
+
+/* k10453 in k10447 in k10444 in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10455(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_retrieve(lf[384]);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* ->string in a10408 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10412(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_10412,NULL,2,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))){
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_slot(t2,C_fix(1)));}
+else{
+if(C_truep((C_word)C_i_numberp(t2))){
+/* eval.scm: 1348 ##sys#number->string */
+((C_proc3)C_retrieve_symbol_proc(lf[380]))(3,*((C_word*)lf[380]+1),t1,t2);}
+else{
+/* eval.scm: 1349 error */
+t3=*((C_word*)lf[381]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[382],t2);}}}}
+
+/* k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8912(C_word c,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_8912,2,t0,t1);}
+t2=*((C_word*)lf[294]+1);
+t3=C_mutate((C_word*)lf[238]+1 /* (set! string->c-identifier ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8914,a[2]=t2,a[3]=((C_word)li214),tmp=(C_word)a,a+=4,tmp));
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8970,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1375 make-vector */
+t5=*((C_word*)lf[306]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8970(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8970,2,t0,t1);}
+t2=C_mutate(&lf[295] /* (set! r4rs-environment ...) */,t1);
+t3=lf[296] /* r5rs-environment */ =C_SCHEME_FALSE;;
+t4=(C_word)C_a_i_record(&a,3,lf[297],C_SCHEME_FALSE,C_SCHEME_TRUE);
+t5=C_mutate(&lf[298] /* (set! interaction-environment ...) */,t4);
+t6=C_mutate((C_word*)lf[299]+1 /* (set! environment? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8977,a[2]=((C_word)li215),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[300]+1 /* (set! copy-env-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8993,a[2]=((C_word)li218),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[301]+1 /* (set! environment-symbols ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9101,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[303]+1 /* (set! interaction-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9220,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[304]+1 /* (set! scheme-report-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9223,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp));
+t11=*((C_word*)lf[306]+1);
+t12=C_mutate((C_word*)lf[307]+1 /* (set! null-environment ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9267,a[2]=t11,a[3]=((C_word)li225),tmp=(C_word)a,a+=4,tmp));
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9305,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9321,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_10407,a[2]=t14,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1459 initb */
+f_9305(t15,C_retrieve2(lf[295],"r4rs-environment"));}
+
+/* k10405 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10407(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* for-each */
+t2=*((C_word*)lf[268]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[379]);}
+
+/* k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9321(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_9321,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9325,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1480 ##sys#copy-env-table */
+t3=*((C_word*)lf[300]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve2(lf[295],"r4rs-environment"),C_SCHEME_TRUE,C_SCHEME_TRUE);}
+
+/* k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 ab[6],*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_mutate(&lf[296] /* (set! r5rs-environment ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9328,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10403,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1482 initb */
+f_9305(t4,C_retrieve2(lf[296],"r5rs-environment"));}
+
+/* k10401 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10403(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* for-each */
+t2=*((C_word*)lf[268]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[378]);}
+
+/* k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9328(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_9328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9332,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1489 chicken-home */
+t3=*((C_word*)lf[15]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9332(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_9332,2,t0,t1);}
+t2=(C_truep(t1)?(C_word)C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
+t3=C_mutate((C_word*)lf[256]+1 /* (set! include-pathnames ...) */,t2);
+t4=*((C_word*)lf[196]+1);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9338,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp);
+t6=C_mutate((C_word*)lf[309]+1 /* (set! resolve-include-filename ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9357,a[2]=t4,a[3]=t5,a[4]=((C_word)li232),tmp=(C_word)a,a+=5,tmp));
+t7=*((C_word*)lf[37]+1);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9506,a[2]=t7,a[3]=((C_word)li234),tmp=(C_word)a,a+=4,tmp);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9530,a[2]=t8,a[3]=t7,a[4]=((C_word)li235),tmp=(C_word)a,a+=5,tmp);
+t10=C_mutate((C_word*)lf[199]+1 /* (set! display-times ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9551,a[2]=t9,a[3]=t7,a[4]=((C_word)li236),tmp=(C_word)a,a+=5,tmp));
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9606,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1558 append */
+t12=*((C_word*)lf[84]+1);
+((C_proc4)(void*)(*((C_word*)t12+1)))(4,t12,t11,lf[377],C_retrieve(lf[146]));}
+
+/* k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9606(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9606,2,t0,t1);}
+t2=C_mutate((C_word*)lf[146]+1 /* (set! features ...) */,t1);
+t3=C_set_block_item(lf[317] /* repl-eval-hook */,0,C_SCHEME_FALSE);
+t4=C_set_block_item(lf[318] /* repl-print-length-limit */,0,C_SCHEME_FALSE);
+t5=C_set_block_item(lf[319] /* repl-read-hook */,0,C_SCHEME_FALSE);
+t6=C_mutate((C_word*)lf[320]+1 /* (set! repl-print-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9611,a[2]=((C_word)li238),tmp=(C_word)a,a+=3,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9628,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10395,a[2]=((C_word)li289),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1572 make-parameter */
+t9=*((C_word*)lf[376]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t7,t8);}
+
+/* a10394 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10395(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_10395,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,lf[375]);}
+
+/* k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9628(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9628,2,t0,t1);}
+t2=C_mutate((C_word*)lf[324]+1 /* (set! repl-prompt ...) */,t1);
+t3=*((C_word*)lf[324]+1);
+t4=C_mutate((C_word*)lf[325]+1 /* (set! read-prompt-hook ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9630,a[2]=t3,a[3]=((C_word)li239),tmp=(C_word)a,a+=4,tmp));
+t5=C_mutate((C_word*)lf[328]+1 /* (set! clear-trace-buffer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9646,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp));
+t6=*((C_word*)lf[174]+1);
+t7=*((C_word*)lf[191]+1);
+t8=*((C_word*)lf[207]+1);
+t9=*((C_word*)lf[329]+1);
+t10=*((C_word*)lf[193]+1);
+t11=*((C_word*)lf[177]+1);
+t12=C_retrieve(lf[330]);
+t13=C_mutate((C_word*)lf[331]+1 /* (set! repl ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9649,a[2]=t8,a[3]=t6,a[4]=t7,a[5]=t11,a[6]=t9,a[7]=t10,a[8]=((C_word)li255),tmp=(C_word)a,a+=9,tmp));
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10013,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1689 make-vector */
+t15=*((C_word*)lf[306]+1);
+((C_proc4)(void*)(*((C_word*)t15+1)))(4,t15,t14,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10013(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10013,2,t0,t1);}
+t2=C_mutate((C_word*)lf[346]+1 /* (set! sharp-comma-reader-ctors ...) */,t1);
+t3=C_mutate((C_word*)lf[347]+1 /* (set! define-reader-ctor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10015,a[2]=((C_word)li256),tmp=(C_word)a,a+=3,tmp));
+t4=C_retrieve(lf[348]);
+t5=*((C_word*)lf[349]+1);
+t6=*((C_word*)lf[191]+1);
+t7=C_mutate((C_word*)lf[348]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10024,a[2]=t4,a[3]=t5,a[4]=t6,a[5]=((C_word)li258),tmp=(C_word)a,a+=6,tmp));
+t8=lf[353] /* last-error */ =C_SCHEME_FALSE;;
+t9=C_mutate(&lf[354] /* (set! run-safe ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10099,a[2]=((C_word)li266),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate(&lf[357] /* (set! store-result ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10158,a[2]=((C_word)li267),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate(&lf[359] /* (set! CHICKEN_yield ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10167,a[2]=((C_word)li269),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate(&lf[361] /* (set! CHICKEN_eval ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10179,a[2]=((C_word)li271),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate(&lf[362] /* (set! CHICKEN_eval_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10195,a[2]=((C_word)li273),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate(&lf[364] /* (set! store-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10221,a[2]=((C_word)li274),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate(&lf[366] /* (set! CHICKEN_eval_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10234,a[2]=((C_word)li276),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate(&lf[367] /* (set! CHICKEN_eval_string_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10260,a[2]=((C_word)li278),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate(&lf[368] /* (set! CHICKEN_apply ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10297,a[2]=((C_word)li280),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate(&lf[369] /* (set! CHICKEN_apply_to_string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10313,a[2]=((C_word)li282),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate(&lf[370] /* (set! CHICKEN_read ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10339,a[2]=((C_word)li284),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate(&lf[371] /* (set! CHICKEN_load ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10361,a[2]=((C_word)li286),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate(&lf[372] /* (set! CHICKEN_get_error_message ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10376,a[2]=((C_word)li287),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[28]+1 /* (set! make-lambda-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10386,a[2]=((C_word)li288),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 k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10386(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_10386,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10393,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1820 ##sys#make-string */
+t5=*((C_word*)lf[374]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k10391 in ##sys#make-lambda-info in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *a;
+t2=(C_word)C_copy_memory(t1,((C_word*)t0)[4],((C_word*)t0)[3]);
+t3=(C_word)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 k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_10376(C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_stack_check;
+t3=C_retrieve2(lf[353],"last-error");
+if(C_truep(t3)){
+return(f_10221(t3,t2,t1));}
+else{
+return(f_10221(lf[373],t2,t1));}}
+
+/* CHICKEN_load in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10361(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_10361,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10365,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#peek-c-string */
+t4=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,C_fix(0));}
+
+/* k10363 in CHICKEN_load in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10365(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_10365,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10370,a[2]=t1,a[3]=((C_word)li285),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1810 run-safe */
+f_10099(((C_word*)t0)[2],t2);}
+
+/* a10369 in k10363 in CHICKEN_load in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10370(C_word 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_10370,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10374,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1810 load */
+((C_proc3)C_retrieve_symbol_proc(lf[202]))(3,*((C_word*)lf[202]+1),t2,((C_word*)t0)[2]);}
+
+/* k10372 in a10369 in k10363 in CHICKEN_load in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10374(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 k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10339(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_10339,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10343,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#peek-c-string */
+t5=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_fix(0));}
+
+/* k10341 in CHICKEN_read in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10343(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_10343,2,t0,t1);}
+t2=((C_word*)t0)[3];
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10348,a[2]=t1,a[3]=t2,a[4]=((C_word)li283),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1804 run-safe */
+f_10099(((C_word*)t0)[2],t3);}
+
+/* a10347 in k10341 in CHICKEN_read in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10348,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10352,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1806 open-input-string */
+t3=*((C_word*)lf[363]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10350 in a10347 in k10341 in CHICKEN_read in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10352(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_10352,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10359,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1807 read */
+t3=*((C_word*)lf[191]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
+
+/* k10357 in k10350 in a10347 in k10341 in CHICKEN_read in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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;
+/* eval.scm: 1807 store-result */
+f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10313(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_10313,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10319,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=t5,a[6]=((C_word)li281),tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1797 run-safe */
+f_10099(t1,t6);}
+
+/* a10318 in CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10319(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_10319,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10323,a[2]=((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: 1799 open-output-string */
+t3=*((C_word*)lf[31]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k10321 in a10318 in CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 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_10323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10326,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_10337,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]);}
+
+/* k10335 in k10321 in a10318 in CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10337(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1800 write */
+t2=*((C_word*)lf[30]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k10324 in k10321 in a10318 in CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10326(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_10326,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10333,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: 1801 get-output-string */
+t3=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10331 in k10324 in k10321 in a10318 in CHICKEN_apply_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10333(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1801 store-string */
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10221(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* CHICKEN_apply in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10297(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_10297,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10303,a[2]=t3,a[3]=t2,a[4]=t4,a[5]=((C_word)li279),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1792 run-safe */
+f_10099(t1,t5);}
+
+/* a10302 in CHICKEN_apply in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10303(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_10303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10311,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]);}
+
+/* k10309 in a10302 in CHICKEN_apply in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10311(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1792 store-result */
+f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10260(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_10260,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10264,a[2]=t1,a[3]=t4,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* ##sys#peek-c-string */
+t6=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,C_fix(0));}
+
+/* k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10264,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=((C_word*)t0)[3];
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10269,a[2]=t1,a[3]=t2,a[4]=t3,a[5]=((C_word)li277),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1783 run-safe */
+f_10099(((C_word*)t0)[2],t4);}
+
+/* a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10269(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_10269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10273,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: 1785 open-output-string */
+t3=*((C_word*)lf[31]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10273,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10276,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_10287,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10291,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10295,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1786 open-input-string */
+t6=*((C_word*)lf[363]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
+
+/* k10293 in k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10295(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1786 read */
+t2=*((C_word*)lf[191]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10289 in k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10291(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1786 eval */
+t2=*((C_word*)lf[174]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10285 in k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1786 write */
+t2=*((C_word*)lf[30]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k10274 in k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10276,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10283,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: 1787 get-output-string */
+t3=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10281 in k10274 in k10271 in a10268 in k10262 in CHICKEN_eval_string_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1787 store-string */
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10221(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10234(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_10234,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10240,a[2]=t2,a[3]=t3,a[4]=t4,a[5]=((C_word)li275),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1774 run-safe */
+f_10099(t1,t5);}
+
+/* a10239 in CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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[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_10240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10244,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: 1776 open-output-string */
+t3=*((C_word*)lf[31]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k10242 in a10239 in CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10244(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_10244,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10247,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_10258,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1777 eval */
+t4=*((C_word*)lf[174]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k10256 in k10242 in a10239 in CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10258(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1777 write */
+t2=*((C_word*)lf[30]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k10245 in k10242 in a10239 in CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 t3;
+C_word ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10254,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: 1778 get-output-string */
+t3=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10252 in k10245 in k10242 in a10239 in CHICKEN_eval_to_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10254(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1778 store-string */
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,f_10221(t1,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* store-string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_10221(C_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_word)C_block_size(t1);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,t2))){
+t5=C_mutate(&lf[353] /* (set! last-error ...) */,lf[365]);
+return(C_SCHEME_FALSE);}
+else{
+t5=(C_word)C_copy_result_string(t1,t3,t4);
+return(t5);}}
+
+/* CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10195(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_10195,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10199,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#peek-c-string */
+t5=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,C_fix(0));}
+
+/* k10197 in CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10199(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_10199,2,t0,t1);}
+t2=((C_word*)t0)[3];
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10204,a[2]=t1,a[3]=t2,a[4]=((C_word)li272),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1755 run-safe */
+f_10099(((C_word*)t0)[2],t3);}
+
+/* a10203 in k10197 in CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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[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_10204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10208,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1757 open-input-string */
+t3=*((C_word*)lf[363]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10206 in a10203 in k10197 in CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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[7],*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|3,a[1]=(C_word)f_10215,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_10219,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1758 read */
+t4=*((C_word*)lf[191]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
+
+/* k10217 in k10206 in a10203 in k10197 in CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10219(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1758 eval */
+t2=*((C_word*)lf[174]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10213 in k10206 in a10203 in k10197 in CHICKEN_eval_string in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10215(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1758 store-result */
+f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* CHICKEN_eval in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10179(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_10179,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10185,a[2]=t2,a[3]=t3,a[4]=((C_word)li270),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1750 run-safe */
+f_10099(t1,t4);}
+
+/* a10184 in CHICKEN_eval in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10185,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10193,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1752 eval */
+t3=*((C_word*)lf[174]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10191 in a10184 in CHICKEN_eval in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10193(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1752 store-result */
+f_10158(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* CHICKEN_yield in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10167(C_word 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_10167,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10173,a[2]=((C_word)li268),tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1747 run-safe */
+f_10099(t1,t2);}
+
+/* a10172 in CHICKEN_yield in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_10173,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10177,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1747 ##sys#thread-yield! */
+((C_proc2)C_retrieve_symbol_proc(lf[360]))(2,*((C_word*)lf[360]+1),t2);}
+
+/* k10175 in a10172 in CHICKEN_yield in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10177(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 k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10158(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_10158,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10162,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1741 ##sys#gc */
+t5=*((C_word*)lf[358]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,C_SCHEME_FALSE);}
+
+/* k10160 in store-result in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10162(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)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 k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10099(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_10099,NULL,2,t1,t2);}
+t3=lf[353] /* last-error */ =C_SCHEME_FALSE;;
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10104,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10109,a[2]=t2,a[3]=((C_word)li265),tmp=(C_word)a,a+=4,tmp);
+/* call-with-current-continuation */
+t6=*((C_word*)lf[207]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10109(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_10109,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10115,a[2]=t2,a[3]=((C_word)li260),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10134,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li264),tmp=(C_word)a,a+=5,tmp);
+/* with-exception-handler */
+t5=*((C_word*)lf[356]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,t3,t4);}
+
+/* a10133 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10134(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_10134,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10140,a[2]=((C_word*)t0)[3],a[3]=((C_word)li261),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10146,a[2]=((C_word*)t0)[2],a[3]=((C_word)li263),tmp=(C_word)a,a+=4,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,t1,t2,t3);}
+
+/* a10145 in a10133 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10146(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_10146r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_10146r(t0,t1,t2);}}
+
+static void C_ccall f_10146r(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_10152,a[2]=t2,a[3]=((C_word)li262),tmp=(C_word)a,a+=4,tmp);
+/* k27092714 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a10151 in a10145 in a10133 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10152(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_10152,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a10139 in a10133 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10140(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_10140,2,t0,t1);}
+/* eval.scm: 1734 thunk */
+t2=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t2))(2,t2,t1);}
+
+/* a10114 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10115(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_10115,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10121,a[2]=t2,a[3]=((C_word)li259),tmp=(C_word)a,a+=4,tmp);
+/* k27092714 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a10120 in a10114 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10121(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_10121,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10125,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1730 open-output-string */
+t3=*((C_word*)lf[31]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k10123 in a10120 in a10114 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10125(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_10125,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10128,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1731 print-error-message */
+t3=*((C_word*)lf[355]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
+
+/* k10126 in k10123 in a10120 in a10114 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10128(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_10128,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10132,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1732 get-output-string */
+t3=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10130 in k10126 in k10123 in a10120 in a10114 in a10108 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10132(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[353] /* (set! last-error ...) */,t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+
+/* k10102 in run-safe in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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;
+/* g27122713 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10024(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_10024,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t2,C_make_character(44));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10034,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1701 read-char */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t3);}
+else{
+/* eval.scm: 1713 old */
+t5=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t1,t2,t3);}}
+
+/* k10032 in ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10034(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_10034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10037,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1702 read */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[4]);}
+
+/* k10035 in k10032 in ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10037(C_word c,C_word t0,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_10037,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10038,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li257),tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_nullp(t1);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10051,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_10051(t5,t3);}
+else{
+t5=(C_word)C_i_listp(t1);
+t6=t4;
+f_10051(t6,(C_word)C_i_not(t5));}}
+
+/* k10049 in k10035 in k10032 in ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10051(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_10051,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* eval.scm: 1705 err */
+t2=((C_word*)t0)[5];
+f_10038(t2,((C_word*)t0)[4]);}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(0));
+if(C_truep((C_word)C_i_symbolp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10069,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: 1709 ##sys#hash-table-ref */
+t4=*((C_word*)lf[19]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_retrieve(lf[346]),t2);}
+else{
+/* eval.scm: 1708 err */
+t3=((C_word*)t0)[5];
+f_10038(t3,((C_word*)t0)[4]);}}}
+
+/* k10067 in k10049 in k10035 in k10032 in ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10069(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)[5],C_fix(1));
+C_apply(4,0,((C_word*)t0)[4],t1,t2);}
+else{
+/* eval.scm: 1712 ##sys#read-error */
+t2=*((C_word*)lf[350]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[352],((C_word*)t0)[2]);}}
+
+/* err in k10035 in k10032 in ##sys#user-read-hook in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_10038(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_10038,NULL,2,t0,t1);}
+/* eval.scm: 1703 ##sys#read-error */
+t2=*((C_word*)lf[350]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[351],((C_word*)t0)[2]);}
+
+/* define-reader-ctor in k10011 in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10015(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_10015,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_symbol_2(t2,lf[347]);
+/* eval.scm: 1693 ##sys#hash-table-set! */
+t5=*((C_word*)lf[20]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,C_retrieve(lf[346]),t2,t3);}
+
+/* repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9649(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9649,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9652,a[2]=((C_word)li242),tmp=(C_word)a,a+=3,tmp);
+t3=*((C_word*)lf[333]+1);
+t4=(*a=C_VECTOR_TYPE|1,a[1]=t3,tmp=(C_word)a,a+=2,tmp);
+t5=*((C_word*)lf[327]+1);
+t6=(*a=C_VECTOR_TYPE|1,a[1]=t5,tmp=(C_word)a,a+=2,tmp);
+t7=*((C_word*)lf[332]+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_9693,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: 1602 ##sys#error-handler */
+t10=*((C_word*)lf[337]+1);
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}
+
+/* k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9693(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_9693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_9696,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: 1603 ##sys#reset-handler */
+t3=*((C_word*)lf[345]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9696(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_9696,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[33]);
+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_9698,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_9704,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_9713,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)li244),tmp=(C_word)a,a+=9,tmp);
+t12=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9778,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)li253),tmp=(C_word)a,a+=8,tmp);
+t13=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9998,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)li254),tmp=(C_word)a,a+=8,tmp);
+/* eval.scm: 1617 ##sys#dynamic-wind */
+t14=*((C_word*)lf[47]+1);
+((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,((C_word*)t0)[2],t11,t12,t13);}
+
+/* a9997 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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[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_9998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10002,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: 1681 load-verbose */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k10000 in a9997 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10002(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_10002,2,t0,t1);}
+t2=C_mutate((C_word*)lf[33]+1 /* (set! unbound-in-eval ...) */,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10006,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1683 ##sys#error-handler */
+t4=*((C_word*)lf[337]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k10004 in k10000 in a9997 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_10006(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1684 ##sys#reset-handler */
+t2=*((C_word*)lf[345]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9778(C_word c,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_9778,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_9784,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)li252),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_9784(t5,t1);}
+
+/* loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9784(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_9784,NULL,2,t0,t1);}
+t2=f_9698(((C_word*)((C_word*)t0)[7])[1]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9791,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_9981,a[2]=((C_word*)t0)[3],a[3]=((C_word)li251),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1640 call-with-current-continuation */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
+
+/* a9980 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9981(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_9981,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9987,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=((C_word)li250),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1642 ##sys#reset-handler */
+t4=*((C_word*)lf[345]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t3);}
+
+/* a9986 in a9980 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9987(C_word 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_9987,2,t0,t1);}
+t2=C_set_block_item(lf[198] /* read-error-with-line-number */,0,C_SCHEME_FALSE);
+t3=C_set_block_item(lf[344] /* enable-qualifiers */,0,C_SCHEME_TRUE);
+t4=f_9704(((C_word*)((C_word*)t0)[3])[1]);
+/* eval.scm: 1647 c */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t1,C_SCHEME_FALSE);}
+
+/* k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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;
+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_9791,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9794,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: 1648 ##sys#read-prompt-hook */
+t3=*((C_word*)lf[325]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9794(C_word c,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_9794,2,t0,t1);}
+t2=C_retrieve(lf[319]);
+t3=(C_truep(t2)?t2:((C_word*)t0)[5]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9800,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);
+/* g25992600 */
+t5=t3;
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_9800,2,t0,t1);}
+if(C_truep((C_word)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_9809,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_9979,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1651 ##sys#peek-char-0 */
+t4=*((C_word*)lf[343]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,*((C_word*)lf[333]+1));}}
+
+/* k9977 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9979(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_make_character(10),t1);
+if(C_truep(t2)){
+/* eval.scm: 1652 ##sys#read-char-0 */
+t3=*((C_word*)lf[342]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],*((C_word*)lf[333]+1));}
+else{
+t3=((C_word*)t0)[2];
+f_9809(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9809(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_9809,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9812,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: 1653 ##sys#clear-trace-buffer */
+t3=*((C_word*)lf[328]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9812(C_word c,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_9812,2,t0,t1);}
+t2=C_set_block_item(lf[33] /* unbound-in-eval */,0,C_SCHEME_END_OF_LIST);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9818,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li245),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9827,a[2]=((C_word*)t0)[3],a[3]=((C_word)li249),tmp=(C_word)a,a+=4,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[2],t3,t4);}
+
+/* a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9827(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_9827r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_9827r(t0,t1,t2);}}
+
+static void C_ccall f_9827r(C_word t0,C_word 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_9831,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[338]))?(C_word)C_i_pairp(C_retrieve(lf[33])):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_9845,a[2]=t6,a[3]=((C_word)li248),tmp=(C_word)a,a+=4,tmp));
+t8=((C_word*)t6)[1];
+f_9845(t8,t3,C_retrieve(lf[33]),C_SCHEME_END_OF_LIST);}
+else{
+t5=t3;
+f_9831(2,t5,C_SCHEME_UNDEFINED);}}
+
+/* loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9845(C_word t0,C_word 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_9845,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9849,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+if(C_truep((C_word)C_i_pairp(t3))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9861,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1660 ##sys#print */
+t6=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[341],C_SCHEME_FALSE,*((C_word*)lf[332]+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_9966,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 1674 caar */
+t6=*((C_word*)lf[40]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}
+
+/* k9964 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 t5;
+C_word ab[9],*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_word)C_i_memq(t1,((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9933,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_9933(2,t4,t2);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9962,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1675 caar */
+t5=*((C_word*)lf[40]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[4]);}}
+
+/* k9960 in k9964 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1675 ##sys#symbol-has-toplevel-binding? */
+((C_proc3)C_retrieve_symbol_proc(lf[52]))(3,*((C_word*)lf[52]+1),((C_word*)t0)[2],t1);}
+
+/* k9931 in k9964 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9933(C_word c,C_word t0,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_9933,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[5]);
+/* eval.scm: 1676 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_9845(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]);
+/* eval.scm: 1677 loop */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_9845(t5,((C_word*)t0)[3],t2,t4);}}
+
+/* k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_9861,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9864,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_9869,a[2]=t4,a[3]=((C_word)li247),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_9869(t6,t2,((C_word*)t0)[2]);}
+
+/* loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9869(C_word t0,C_word 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_9869,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_9913,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_9881,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1665 ##sys#print */
+t6=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[340],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k9879 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9881(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_9881,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9884,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_car(((C_word*)t0)[2]);
+/* eval.scm: 1666 ##sys#print */
+t4=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[332]+1));}
+
+/* k9882 in k9879 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9884(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_9884,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9887,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_cdr(((C_word*)t0)[2]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9896,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1668 ##sys#print */
+t4=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[339],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+else{
+/* eval.scm: 1671 ##sys#write-char-0 */
+t3=*((C_word*)lf[321]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],C_make_character(10),*((C_word*)lf[332]+1));}}
+
+/* k9894 in k9882 in k9879 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9896,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9899,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[2]);
+/* eval.scm: 1669 ##sys#print */
+t4=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_TRUE,*((C_word*)lf[332]+1));}
+
+/* k9897 in k9894 in k9882 in k9879 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9899(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1670 ##sys#write-char-0 */
+t2=*((C_word*)lf[321]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(41),*((C_word*)lf[332]+1));}
+
+/* k9885 in k9882 in k9879 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9887(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1671 ##sys#write-char-0 */
+t2=*((C_word*)lf[321]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[332]+1));}
+
+/* k9911 in loop2637 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9913(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_9869(t3,((C_word*)t0)[2],t2);}
+
+/* k9862 in k9859 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9864(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1673 ##sys#flush-output */
+t2=*((C_word*)lf[326]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[332]+1));}
+
+/* k9847 in loop in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9849(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));}
+
+/* k9829 in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9831(C_word c,C_word t0,C_word 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_9831,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9834,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_word)C_i_nullp(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9674,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_9674(t6,t4);}
+else{
+t6=(C_word)C_i_car(t3);
+t7=t5;
+f_9674(t7,(C_word)C_eqp(C_SCHEME_UNDEFINED,t6));}}
+
+/* k9672 in k9829 in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9674(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_9674,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* eval.scm: 1679 loop */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_9784(t2,((C_word*)t0)[4]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9679,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp);
+/* for-each */
+t3=*((C_word*)lf[268]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}}
+
+/* a9678 in k9672 in k9829 in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9679(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_9679,3,t0,t1,t2);}
+t3=C_retrieve(lf[320]);
+/* g25622563 */
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[327]+1));}
+
+/* k9832 in k9829 in a9826 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9834(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1679 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_9784(t2,((C_word*)t0)[2]);}
+
+/* a9817 in k9810 in k9807 in k9798 in k9792 in k9789 in loop in a9777 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9818(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_9818,2,t0,t1);}
+t2=*((C_word*)lf[317]+1);
+if(C_truep(t2)){
+/* g26122613 */
+t3=t2;
+((C_proc3)C_retrieve_proc(t3))(3,t3,t1,((C_word*)t0)[3]);}
+else{
+/* g26122613 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t1,((C_word*)t0)[3]);}}
+
+/* a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9713(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_9713,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_9718,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: 1619 load-verbose */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9718(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_9718,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_9721,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: 1620 load-verbose */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_SCHEME_TRUE);}
+
+/* k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 t3;
+C_word ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9721,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9726,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)li243),tmp=(C_word)a,a+=7,tmp);
+/* eval.scm: 1621 ##sys#error-handler */
+t3=*((C_word*)lf[337]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[2],t2);}
+
+/* a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9726(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_9726r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_9726r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9726r(C_word 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_9704(((C_word*)((C_word*)t0)[5])[1]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9733,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: 1624 ##sys#print */
+t6=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[336],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+
+/* k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9733(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_9733,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9736,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_9773,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[322]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[335],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+else{
+t3=t2;
+f_9736(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k9771 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1627 ##sys#print */
+t2=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+
+/* k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9736(C_word c,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_9736,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9739,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_9748,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_word)C_i_pairp(((C_word*)t0)[2]))){
+t4=(C_word)C_i_cdr(((C_word*)t0)[2]);
+t5=t3;
+f_9748(t5,(C_word)C_i_nullp(t4));}
+else{
+t4=t3;
+f_9748(t4,C_SCHEME_FALSE);}}
+
+/* k9746 in k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_9748,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9751,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: 1630 ##sys#print */
+t3=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[334],C_SCHEME_FALSE,*((C_word*)lf[332]+1));}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9757,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: 1633 ##sys#write-char-0 */
+t3=*((C_word*)lf[321]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),*((C_word*)lf[332]+1));}}
+
+/* k9755 in k9746 in k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9757(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1634 write-err */
+f_9652(((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9749 in k9746 in k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9751(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1631 write-err */
+f_9652(((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k9737 in k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9739(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_9739,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9742,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1635 print-call-chain */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[332]+1));}
+
+/* k9740 in k9737 in k9734 in k9731 in a9725 in k9719 in k9716 in a9712 in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1636 flush-output */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],*((C_word*)lf[332]+1));}
+
+/* resetports in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_9704(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[333]+1 /* (set! standard-input ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t2=C_mutate((C_word*)lf[327]+1 /* (set! standard-output ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t3=C_mutate((C_word*)lf[332]+1 /* (set! standard-error ...) */,((C_word*)((C_word*)t0)[2])[1]);
+return(t3);}
+
+/* saveports in k9694 in k9691 in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_9698(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[333]+1));
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,*((C_word*)lf[327]+1));
+t3=C_mutate(((C_word *)((C_word*)t0)[2])+1,*((C_word*)lf[332]+1));
+return(t3);}
+
+/* write-err in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9652(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_9652,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9658,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp);
+/* for-each */
+t4=*((C_word*)lf[268]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t3,t2);}
+
+/* a9657 in write-err in repl in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9658(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_9658,3,t0,t1,t2);}
+t3=C_retrieve(lf[320]);
+/* g25392540 */
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,*((C_word*)lf[332]+1));}
+
+/* ##sys#clear-trace-buffer in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9646(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_9646,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)stub2508(C_SCHEME_UNDEFINED));}
+
+/* ##sys#read-prompt-hook in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9630(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_9630,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9634,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9641,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1577 repl-prompt */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k9639 in ##sys#read-prompt-hook in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9641(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_9641,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9644,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* g25052506 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k9642 in k9639 in ##sys#read-prompt-hook in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9644(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1577 ##sys#print */
+t2=*((C_word*)lf[322]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],t1,C_SCHEME_FALSE,*((C_word*)lf[327]+1));}
+
+/* k9632 in ##sys#read-prompt-hook in k9626 in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9634(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1578 ##sys#flush-output */
+t2=*((C_word*)lf[326]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[327]+1));}
+
+/* ##sys#repl-print-hook in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9611(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_9611,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9615,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9620,a[2]=t3,a[3]=t2,a[4]=((C_word)li237),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1569 ##sys#with-print-length-limit */
+t6=*((C_word*)lf[323]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[318]),t5);}
+
+/* a9619 in ##sys#repl-print-hook in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9620(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_9620,2,t0,t1);}
+t2=*((C_word*)lf[322]+1);
+/* g25012502 */
+t3=t2;
+((C_proc5)C_retrieve_proc(t3))(5,t3,t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
+
+/* k9613 in ##sys#repl-print-hook in k9604 in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9615(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1570 ##sys#write-char-0 */
+t2=*((C_word*)lf[321]+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 k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9551(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_9551,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9555,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 1543 display-rj */
+t5=((C_word*)t0)[2];
+f_9530(t5,t3,t4,C_fix(8));}
+
+/* k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9555,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9558,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: 1544 display */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[316]);}
+
+/* k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9558(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_9558,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9561,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_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1545 display-rj */
+t4=((C_word*)t0)[2];
+f_9530(t4,t2,t3,C_fix(8));}
+
+/* k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9561(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_9561,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9564,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: 1546 display */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[315]);}
+
+/* k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9564(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_9564,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9567,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_slot(((C_word*)t0)[3],C_fix(2));
+/* eval.scm: 1547 display-rj */
+t4=((C_word*)t0)[2];
+f_9530(t4,t2,t3,C_fix(8));}
+
+/* k9565 in k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9567(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_9567,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9570,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: 1548 display */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[314]);}
+
+/* k9568 in k9565 in k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 ab[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9570,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9573,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_slot(((C_word*)t0)[3],C_fix(3));
+/* eval.scm: 1549 display-rj */
+t4=((C_word*)t0)[2];
+f_9530(t4,t2,t3,C_fix(8));}
+
+/* k9571 in k9568 in k9565 in k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9573(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_9573,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9576,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: 1550 display */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[313]);}
+
+/* k9574 in k9571 in k9568 in k9565 in k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9576(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_9576,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9579,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(4));
+/* eval.scm: 1551 display-rj */
+t4=((C_word*)t0)[2];
+f_9530(t4,t2,t3,C_fix(8));}
+
+/* k9577 in k9574 in k9571 in k9568 in k9565 in k9562 in k9559 in k9556 in k9553 in ##sys#display-times in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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: 1552 display */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[312]);}
+
+/* display-rj in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9530(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_9530,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9534,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_word)C_i_zerop(t2))){
+t5=t4;
+f_9534(2,t5,lf[311]);}
+else{
+/* eval.scm: 1538 number->string */
+C_number_to_string(3,0,t4,t2);}}
+
+/* k9532 in display-rj in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 t5;
+C_word ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9534,2,t0,t1);}
+t2=(C_word)C_block_size(t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9537,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_fixnum_difference(((C_word*)t0)[3],t2);
+/* eval.scm: 1540 spaces */
+t5=((C_word*)t0)[2];
+f_9506(t5,t3,t4);}
+
+/* k9535 in k9532 in display-rj in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1541 display */
+t2=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* spaces in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9506(C_word 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_9506,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_9512,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word)li233),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_9512(t6,t1,t2);}
+
+/* doloop2470 in spaces in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9512(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_9512,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_9522,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1535 display */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,C_make_character(32));}}
+
+/* k9520 in doloop2470 in spaces in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+t2=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9512(t3,((C_word*)t0)[2],t2);}
+
+/* ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9357(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_9357r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_9357r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_9357r(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_9361,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_word)C_i_nullp(t4))){
+t6=t5;
+f_9361(2,t6,C_SCHEME_FALSE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=t5;
+f_9361(2,t7,(C_word)C_i_car(t4));}
+else{
+/* ##sys#error */
+t7=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,lf[0],t4);}}}
+
+/* k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9361,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_9363,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=((C_word)li229),tmp=(C_word)a,a+=5,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9398,a[2]=t3,a[3]=((C_word*)t0)[5],a[4]=((C_word)li230),tmp=(C_word)a,a+=5,tmp));
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9428,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: 1511 test */
+t9=((C_word*)t5)[1];
+f_9398(t9,t8,((C_word*)t0)[3]);}
+
+/* k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 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_9428,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_9438,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_9475,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1515 ##sys#repository-path */
+t4=*((C_word*)lf[249]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=t2;
+f_9438(2,t3,C_retrieve(lf[256]));}}}
+
+/* k9473 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9475(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_9475,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9485,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1517 ##sys#repository-path */
+t3=*((C_word*)lf[249]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+/* eval.scm: 1513 ##sys#append */
+t2=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_retrieve(lf[256]),C_SCHEME_END_OF_LIST);}}
+
+/* k9483 in k9473 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9485(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_9485,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+/* eval.scm: 1513 ##sys#append */
+t3=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],C_retrieve(lf[256]),t2);}
+
+/* k9436 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9438(C_word c,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_9438,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_9440,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)li231),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_9440(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k9436 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9440(C_word t0,C_word 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_9440,NULL,3,t0,t1,t2);}
+t3=(C_word)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_9450,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_9464,a[2]=t4,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_slot(t2,C_fix(0));
+/* eval.scm: 1521 string-append */
+t7=((C_word*)t0)[2];
+((C_proc5)C_retrieve_proc(t7))(5,t7,t5,t6,lf[310],((C_word*)t0)[5]);}}
+
+/* k9462 in loop in k9436 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9464(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1521 test */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_9398(t2,((C_word*)t0)[2],t1);}
+
+/* k9448 in loop in k9436 in k9426 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9450(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));
+/* eval.scm: 1524 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_9440(t3,((C_word*)t0)[4],t2);}}
+
+/* test in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9398(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_9398,NULL,3,t0,t1,t2);}
+t3=(C_word)C_fudge(C_fix(24));
+t4=(C_truep(t3)?(C_truep(((C_word*)t0)[3])?(C_word)C_a_i_list(&a,2,lf[10],C_retrieve(lf[216])):(C_word)C_a_i_list(&a,2,C_retrieve(lf[216]),lf[10])):(C_word)C_a_i_list(&a,1,lf[10]));
+/* eval.scm: 1506 test2 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_9363(t5,t1,t2,t4);}
+
+/* test2 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9363(C_word t0,C_word 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_9363,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9376,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1500 exists? */
+f_9338(t4,t2);}
+else{
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9379,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_word)C_i_car(t3);
+/* eval.scm: 1501 ##sys#string-append */
+t6=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t2,t5);}}
+
+/* k9377 in test2 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9379(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_9379,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9385,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: 1502 exists? */
+f_9338(t2,t1);}
+
+/* k9383 in k9377 in test2 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9385(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_word)C_i_cdr(((C_word*)t0)[4]);
+/* eval.scm: 1504 test2 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9363(t3,((C_word*)t0)[6],((C_word*)t0)[2],t2);}}
+
+/* k9374 in test2 in k9359 in ##sys#resolve-include-filename in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9376(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 k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9338(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_9338,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9342,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1495 ##sys#file-info */
+t4=*((C_word*)lf[215]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k9340 in exists? in k9330 in k9326 in k9323 in k9319 in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9342(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_slot(t1,C_fix(4));
+t3=(C_word)C_eqp(C_fix(1),t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_not(t3));}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* initb in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9305(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_9305,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_9307,a[2]=t2,a[3]=((C_word)li226),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_9307 in initb in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9307(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_9307,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9311,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1456 ##sys#hash-table-location */
+t4=*((C_word*)lf[24]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
+
+/* k9309 */
+static void C_ccall f_9311(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)[3],C_fix(0));
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_setslot(t1,C_fix(1),t2));}
+
+/* null-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9267(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*)tr3rv,(void*)f_9267r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_9267r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9267r(C_word t0,C_word 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_word)C_i_check_exact_2(t2,lf[307]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9274,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_fixnum_lessp(t2,C_fix(4));
+if(C_truep(t6)){
+if(C_truep(t6)){
+/* eval.scm: 1447 ##sys#error */
+t7=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[307],lf[308],t2);}
+else{
+t7=t5;
+f_9274(2,t7,C_SCHEME_UNDEFINED);}}
+else{
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(5)))){
+/* eval.scm: 1447 ##sys#error */
+t7=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t5,lf[307],lf[308],t2);}
+else{
+t7=t5;
+f_9274(2,t7,C_SCHEME_UNDEFINED);}}}
+
+/* k9272 in null-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9274(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_9274,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9281,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1450 make-vector */
+t3=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k9279 in k9272 in null-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9281(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_9281,2,t0,t1);}
+if(C_truep((C_word)C_notvemptyp(((C_word*)t0)[3]))){
+t2=(C_word)C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,3,lf[297],t1,t2));}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,3,lf[297],t1,C_SCHEME_FALSE));}}
+
+/* scheme-report-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9223(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_9223r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_9223r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9223r(C_word t0,C_word 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_word)C_i_check_exact_2(t2,lf[304]);
+t5=(C_word)C_notvemptyp(t3);
+t6=(C_truep(t5)?(C_word)C_i_vector_ref(t3,C_fix(0)):C_SCHEME_FALSE);
+t7=t2;
+switch(t7){
+case C_fix(4):
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9243,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1438 ##sys#copy-env-table */
+t9=*((C_word*)lf[300]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[295],"r4rs-environment"),C_SCHEME_TRUE,t6);
+case C_fix(5):
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9256,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1439 ##sys#copy-env-table */
+t9=*((C_word*)lf[300]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,C_retrieve2(lf[296],"r5rs-environment"),C_SCHEME_TRUE,t6);
+default:
+/* eval.scm: 1440 ##sys#error */
+t8=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t1,lf[304],lf[305],t2);}}
+
+/* k9254 in scheme-report-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9256(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_9256,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[297],t1,((C_word*)t0)[2]));}
+
+/* k9241 in scheme-report-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9243(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_9243,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[297],t1,((C_word*)t0)[2]));}
+
+/* interaction-environment in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *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_9220,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_retrieve2(lf[298],"interaction-environment"));}
+
+/* ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9101(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*)tr3rv,(void*)f_9101r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_9101r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9101r(C_word t0,C_word 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_word)C_i_check_structure(t2,lf[297]);
+t5=(C_word)C_notvemptyp(t3);
+t6=(C_truep(t5)?(C_word)C_i_vector_ref(t3,C_fix(0)):C_SCHEME_FALSE);
+t7=(C_word)C_slot(t2,C_fix(1));
+if(C_truep(t7)){
+t8=(C_word)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_9122,a[2]=t6,a[3]=t7,a[4]=t10,a[5]=t8,a[6]=((C_word)li220),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_9122(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_9193,a[2]=t1,a[3]=t9,tmp=(C_word)a,a+=4,tmp);
+t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9195,a[2]=t9,a[3]=t6,a[4]=((C_word)li221),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1425 ##sys#walk-namespace */
+((C_proc3)C_retrieve_symbol_proc(lf[302]))(3,*((C_word*)lf[302]+1),t10,t11);}}
+
+/* a9194 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9195(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_9195,3,t0,t1,t2);}
+t3=(C_word)C_i_not(((C_word*)t0)[3]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9205,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_9205(2,t5,t3);}
+else{
+/* eval.scm: 1427 pred */
+t5=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}}
+
+/* k9203 in a9194 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9205(C_word c,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_9205,2,t0,t1);}
+if(C_truep(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);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k9191 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9193(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);}
+
+/* doloop2329 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9122(C_word t0,C_word 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_9122,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_word)C_fixnum_plus(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9140,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)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_9146,a[2]=t8,a[3]=((C_word*)t0)[2],a[4]=((C_word)li219),tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_9146(t10,t5,t6,t3);}}
+
+/* loop in doloop2329 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9146(C_word t0,C_word 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_9146,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_i_car(t2);
+t5=(C_word)C_i_vector_ref(t4,C_fix(0));
+t6=(C_word)C_i_not(((C_word*)t0)[3]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9165,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_9165(2,t8,t6);}
+else{
+/* eval.scm: 1419 pred */
+t8=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t8))(3,t8,t7,t5);}}}
+
+/* k9163 in loop in doloop2329 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9165(C_word c,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_9165,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+/* eval.scm: 1420 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_9146(t4,((C_word*)t0)[2],t2,t3);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+/* eval.scm: 1421 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9146(t3,((C_word*)t0)[2],t2,((C_word*)t0)[4]);}}
+
+/* k9138 in doloop2329 in ##sys#environment-symbols in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9140(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_9122(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8993(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*)tr5rv,(void*)f_8993r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest_vector(a,C_rest_count(0));
+f_8993r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_8993r(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_word)C_notvemptyp(t5);
+t7=(C_truep(t6)?(C_word)C_i_vector_ref(t5,C_fix(0)):C_SCHEME_FALSE);
+t8=(C_word)C_block_size(t2);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9003,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: 1386 ##sys#make-vector */
+t10=*((C_word*)lf[82]+1);
+((C_proc4)(void*)(*((C_word*)t10+1)))(4,t10,t9,t8,C_SCHEME_END_OF_LIST);}
+
+/* k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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[12],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9003,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_9008,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)li217),tmp=(C_word)a,a+=10,tmp));
+t5=((C_word*)t3)[1];
+f_9008(t5,((C_word*)t0)[2],C_fix(0));}
+
+/* doloop2305 in k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9008(C_word t0,C_word 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_9008,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_9029,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_word)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_9035,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)li216),tmp=(C_word)a,a+=7,tmp));
+t8=((C_word*)t6)[1];
+f_9035(t8,t3,t4);}}
+
+/* copy in doloop2305 in k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9035(C_word t0,C_word 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_9035,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_slot(t2,C_fix(0));
+t4=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)C_i_not(((C_word*)t0)[5]);
+t6=(C_truep(t5)?t5:(C_word)C_i_memq(t4,((C_word*)t0)[5]));
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9064,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t8=(C_word)C_slot(t3,C_fix(1));
+if(C_truep(((C_word*)t0)[3])){
+t9=((C_word*)t0)[2];
+t10=t7;
+f_9064(t10,(C_word)C_a_i_vector(&a,3,t4,t8,t9));}
+else{
+t9=(C_word)C_slot(t3,C_fix(2));
+t10=t7;
+f_9064(t10,(C_word)C_a_i_vector(&a,3,t4,t8,t9));}}
+else{
+t7=(C_word)C_slot(t2,C_fix(1));
+/* eval.scm: 1402 copy */
+t13=t1;
+t14=t7;
+t1=t13;
+t2=t14;
+goto loop;}}}
+
+/* k9062 in copy in doloop2305 in k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_9064(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_9064,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9068,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1401 copy */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_9035(t4,t2,t3);}
+
+/* k9066 in k9062 in copy in doloop2305 in k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9068(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_9068,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));}
+
+/* k9027 in doloop2305 in k9001 in ##sys#copy-env-table in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_9029(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_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_9008(t4,((C_word*)t0)[2],t3);}
+
+/* ##sys#environment? in k8968 in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8977(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_8977,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_structurep(t2,lf[297]))){
+t3=(C_word)C_block_size(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)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 k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8914(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_8914,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8918,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1364 string-copy */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k8916 in ##sys#string->c-identifier in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8918,2,t0,t1);}
+t2=(C_word)C_block_size(t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8926,a[2]=t1,a[3]=t2,a[4]=((C_word)li213),tmp=(C_word)a,a+=5,tmp);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_8926(t3,C_fix(0)));}
+
+/* doloop2274 in k8916 in ##sys#string->c-identifier in k8910 in k8907 in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_8926(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+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_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
+t2=((C_word*)t0)[2];
+return(t2);}
+else{
+t2=(C_word)C_subchar(((C_word*)t0)[2],t1);
+if(C_truep((C_word)C_u_i_char_alphabeticp(t2))){
+t3=(C_word)C_fixnum_plus(t1,C_fix(1));
+t15=t3;
+t1=t15;
+goto loop;}
+else{
+t3=(C_word)C_u_i_char_numericp(t2);
+t4=(C_word)C_i_not(t3);
+if(C_truep(t4)){
+if(C_truep(t4)){
+t5=(C_word)C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
+t6=(C_word)C_fixnum_plus(t1,C_fix(1));
+t15=t6;
+t1=t15;
+goto loop;}
+else{
+t5=(C_word)C_fixnum_plus(t1,C_fix(1));
+t15=t5;
+t1=t15;
+goto loop;}}
+else{
+t5=(C_word)C_eqp(t1,C_fix(0));
+if(C_truep(t5)){
+t6=(C_word)C_setsubchar(((C_word*)t0)[2],t1,C_make_character(95));
+t7=(C_word)C_fixnum_plus(t1,C_fix(1));
+t15=t7;
+t1=t15;
+goto loop;}
+else{
+t6=(C_word)C_fixnum_plus(t1,C_fix(1));
+t15=t6;
+t1=t15;
+goto loop;}}}}}
+
+/* set-extension-specifier! in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8870(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[10],*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_8870,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_symbol_2(t2,lf[293]);
+t5=(C_word)C_i_assq(t2,C_retrieve(lf[290]));
+if(C_truep(t5)){
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8888,a[2]=t6,a[3]=t3,a[4]=((C_word)li210),tmp=(C_word)a,a+=5,tmp);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_i_setslot(t5,C_fix(1),t7));}
+else{
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8902,a[2]=t3,a[3]=((C_word)li211),tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_a_i_cons(&a,2,t2,t6);
+t8=(C_word)C_a_i_cons(&a,2,t7,C_retrieve(lf[290]));
+t9=C_mutate((C_word*)lf[290]+1 /* (set! extension-specifiers ...) */,t8);
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,t9);}}
+
+/* a8901 in set-extension-specifier! in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8902(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_8902,3,t0,t1,t2);}
+/* eval.scm: 1320 proc */
+t3=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,C_SCHEME_FALSE);}
+
+/* a8887 in set-extension-specifier! in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8888(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_8888,3,t0,t1,t2);}
+/* eval.scm: 1318 proc */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)t0)[2]);}
+
+/* ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8314(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[28],*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_8314,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_8317,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_8342,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_8383,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|7,a[1]=(C_word)f_8738,a[2]=t10,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t3,a[6]=t1,a[7]=t2,tmp=(C_word)a,a+=8,tmp);
+if(C_truep((C_word)C_i_pairp(t2))){
+t15=(C_word)C_i_car(t2);
+t16=t14;
+f_8738(t16,(C_word)C_i_symbolp(t15));}
+else{
+t15=t14;
+f_8738(t15,C_SCHEME_FALSE);}}
+
+/* k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8738(C_word t0,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*)trf_8738,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_slot(((C_word*)t0)[7],C_fix(0));
+t3=(C_word)C_i_assq(t2,C_retrieve(lf[290]));
+if(C_truep(t3)){
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8750,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);
+/* g21912192 */
+t6=t4;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[7]);}
+else{
+/* eval.scm: 1306 ##sys#error */
+t4=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[6],lf[291],((C_word*)t0)[7]);}}
+else{
+if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[7]))){
+/* eval.scm: 1308 doit */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_8383(t2,((C_word*)t0)[6],((C_word*)t0)[7]);}
+else{
+/* eval.scm: 1309 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[6],lf[292],((C_word*)t0)[7]);}}}
+
+/* k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8750(C_word c,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_8750,2,t0,t1);}
+if(C_truep((C_word)C_i_stringp(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[202],t2);
+/* eval.scm: 1294 values */
+C_values(4,0,((C_word*)t0)[5],t3,C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_i_vectorp(t1))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8780,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);
+/* eval.scm: 1296 vector->list */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}
+else{
+/* eval.scm: 1305 ##sys#do-the-right-thing */
+t2=*((C_word*)lf[135]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3]);}}}
+
+/* k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8780(C_word c,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_8780,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_8782,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li208),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_8782(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* loop in k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8782(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[13],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_8782,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8800,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8804,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1300 reverse */
+t7=*((C_word*)lf[35]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t3);}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8809,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t2,a[5]=((C_word)li206),tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8819,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,a[6]=((C_word)li207),tmp=(C_word)a,a+=7,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,t1,t5,t6);}}
+
+/* a8818 in loop in k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8819(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[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_8819,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t5=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
+if(C_truep(t3)){
+t6=t3;
+/* eval.scm: 1302 loop */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_8782(t7,t1,t4,t5,t6);}
+else{
+t6=((C_word*)t0)[2];
+/* eval.scm: 1302 loop */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_8782(t7,t1,t4,t5,t6);}}
+
+/* a8808 in loop in k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *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_8809,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[4]);
+/* eval.scm: 1301 ##sys#do-the-right-thing */
+t3=*((C_word*)lf[135]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8802 in loop in k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8804(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8798 in loop in k8778 in k8748 in k8736 in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8800(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_8800,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[69],t1);
+/* eval.scm: 1300 values */
+C_values(4,0,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8383(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_8383,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_memq(t2,lf[282]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8393,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,a[5]=((C_word*)t0)[4],a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+if(C_truep(t3)){
+t5=t4;
+f_8393(2,t5,t3);}
+else{
+if(C_truep(((C_word*)t0)[3])){
+t5=t4;
+f_8393(2,t5,(C_word)C_i_memq(t2,lf[288]));}
+else{
+/* eval.scm: 1239 ##sys#feature? */
+t5=*((C_word*)lf[289]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}}
+
+/* k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8393(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8393,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8400,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1240 impform */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_8342(t3,t2,lf[283],((C_word*)t0)[4],C_SCHEME_TRUE);}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],*((C_word*)lf[5]+1)))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8413,a[2]=((C_word*)t0)[6],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(((C_word*)t0)[3])){
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[284],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[143],t5);
+/* eval.scm: 1243 impform */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_8342(t7,t2,t6,((C_word*)t0)[4],C_SCHEME_TRUE);}
+else{
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[55],t3);
+t5=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,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[240],t6);
+/* eval.scm: 1243 impform */
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_8342(t8,t2,t7,((C_word*)t0)[4],C_SCHEME_TRUE);}}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[4],*((C_word*)lf[7]+1)))){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8460,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);
+/* eval.scm: 1250 ##sys#extension-information */
+t3=*((C_word*)lf[269]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[287]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8555,a[2]=((C_word*)t0)[2],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);
+/* eval.scm: 1265 ##sys#extension-information */
+t3=*((C_word*)lf[269]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[287]);}}}}
+
+/* k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[8],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8555,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_assq(lf[59],t1);
+t3=(C_word)C_i_assq(lf[285],t1);
+t4=(C_word)C_i_assq(lf[274],t1);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8570,a[2]=t2,a[3]=t4,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);
+if(C_truep(t2)){
+/* eval.scm: 1270 add-req */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_8317(t6,t5,((C_word*)t0)[3],C_SCHEME_TRUE);}
+else{
+t6=t5;
+f_8570(2,t6,C_SCHEME_UNDEFINED);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8700,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);
+/* eval.scm: 1284 add-req */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_8317(t3,t2,((C_word*)t0)[3],C_SCHEME_FALSE);}}
+
+/* k8698 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8700(C_word c,C_word t0,C_word 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_8700,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8707,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+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[55],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[131],t5);
+/* eval.scm: 1286 impform */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_8342(t7,t2,t6,((C_word*)t0)[3],C_SCHEME_FALSE);}
+
+/* k8705 in k8698 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8707(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1285 values */
+C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8570(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8570,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8577,a[2]=((C_word*)t0)[7],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8585,a[2]=((C_word*)t0)[5],a[3]=t2,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8589,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[4],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+if(C_truep(((C_word*)t0)[2])){
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_SCHEME_END_OF_LIST);
+t6=(C_word)C_a_i_cons(&a,2,lf[55],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,lf[129],t7);
+t9=t4;
+f_8589(t9,(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST));}
+else{
+t5=t4;
+f_8589(t5,C_SCHEME_END_OF_LIST);}}
+
+/* k8587 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8589(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_8589,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8593,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[71]+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_8611,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_8615,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t10=(C_truep(((C_word*)t0)[4])?(C_word)C_i_cdr(((C_word*)t0)[4]):(C_word)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_8621,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_8621(t14,t9,t10);}}
+
+/* loop2149 in k8587 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8621(C_word t0,C_word 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_8621,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[55],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));
+/* loop21492162 */
+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));
+/* loop21492162 */
+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);}}
+
+/* k8613 in k8587 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8615(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k8609 in k8587 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8611(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_8611,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[131],t1);
+t3=(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],t3,C_SCHEME_END_OF_LIST);}
+
+/* k8591 in k8587 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8593(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8583 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8585(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_8585,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[69],t1);
+/* eval.scm: 1272 impform */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_8342(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k8575 in k8568 in k8553 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8577(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1271 values */
+C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
+
+/* k8458 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8460(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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[25],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8460,2,t0,t1);}
+t2=(C_word)C_i_assq(lf[285],t1);
+t3=(C_word)C_i_assq(lf[59],t1);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8477,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8481,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=t2,a[6]=t4,tmp=(C_word)a,a+=7,tmp);
+if(C_truep(t3)){
+t6=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,lf[55],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,lf[129],t8);
+t10=t5;
+f_8481(t10,(C_word)C_a_i_cons(&a,2,t9,C_SCHEME_END_OF_LIST));}
+else{
+t6=t5;
+f_8481(t6,C_SCHEME_END_OF_LIST);}}
+
+/* k8479 in k8458 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8481(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_8481,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8489,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[5])){
+/* eval.scm: 1256 impform */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_8342(t3,t2,lf[286],((C_word*)t0)[3],C_SCHEME_FALSE);}
+else{
+if(C_truep(((C_word*)t0)[2])){
+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[284],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[143],t5);
+/* eval.scm: 1256 impform */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_8342(t7,t2,t6,((C_word*)t0)[3],C_SCHEME_FALSE);}
+else{
+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[55],t3);
+t5=(C_word)C_a_i_cons(&a,2,C_SCHEME_FALSE,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[240],t6);
+/* eval.scm: 1256 impform */
+t8=((C_word*)((C_word*)t0)[4])[1];
+f_8342(t8,t2,t7,((C_word*)t0)[3],C_SCHEME_FALSE);}}}
+
+/* k8487 in k8479 in k8458 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8489(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_8489,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t3=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k8475 in k8458 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[3],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8477,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[69],t1);
+/* eval.scm: 1253 values */
+C_values(4,0,((C_word*)t0)[2],t2,C_SCHEME_TRUE);}
+
+/* k8411 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1242 values */
+C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
+
+/* k8398 in k8391 in doit in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8400(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1240 values */
+C_values(4,0,((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
+
+/* impform in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8342(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_8342,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8354,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8361,a[2]=t5,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(((C_word*)t0)[2])){
+t7=(C_word)C_i_not(t4);
+if(C_truep(t7)){
+t8=t6;
+f_8361(2,t8,t7);}
+else{
+/* eval.scm: 1232 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[44]))(2,*((C_word*)lf[44]+1),t6);}}
+else{
+t7=t6;
+f_8361(2,t7,C_SCHEME_FALSE);}}
+
+/* k8359 in impform in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[9],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8361,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+t3=(C_word)C_a_i_cons(&a,2,lf[281],t2);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t5=*((C_word*)lf[71]+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[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}}
+
+/* k8352 in impform in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8354(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_8354,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[69],t2));}
+
+/* add-req in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8317(C_word t0,C_word 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_8317,NULL,4,t0,t1,t2,t3);}
+if(C_truep(((C_word*)t0)[2])){
+t4=(C_truep(t3)?lf[276]:lf[277]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8330,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_8336,a[2]=t2,a[3]=((C_word)li201),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1224 ##sys#hash-table-update! */
+((C_proc6)C_retrieve_symbol_proc(lf[21]))(6,*((C_word*)lf[21]+1),t1,C_retrieve(lf[280]),t4,t5,t6);}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* a8335 in add-req in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8336(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_8336,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,1,((C_word*)t0)[2]));}
+
+/* a8329 in add-req in ##sys#do-the-right-thing in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8330(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_8330,3,t0,t1,t2);}
+t3=C_retrieve(lf[278]);
+/* g20562057 */
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,*((C_word*)lf[279]+1),t2,((C_word*)t0)[2]);}
+
+/* ##sys#lookup-runtime-requirements in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8265(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_8265,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_8271,a[2]=t4,a[3]=((C_word)li198),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8271(t6,t1,t2);}
+
+/* loop1 in ##sys#lookup-runtime-requirements in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8271(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_8271,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_8285,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_i_car(t2);
+/* eval.scm: 1213 ##sys#extension-information */
+t5=*((C_word*)lf[269]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,C_SCHEME_FALSE);}}
+
+/* k8283 in loop1 in ##sys#lookup-runtime-requirements in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8285(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_8285,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8288,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_word)C_i_assq(lf[274],t1);
+t4=t2;
+f_8288(t4,(C_truep(t3)?(C_word)C_i_cdr(t3):C_SCHEME_FALSE));}
+else{
+t3=t2;
+f_8288(t3,C_SCHEME_FALSE);}}
+
+/* k8286 in k8283 in loop1 in ##sys#lookup-runtime-requirements in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8288(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_8288,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_8295,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* eval.scm: 1217 loop1 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_8271(t5,t3,t4);}
+
+/* k8293 in k8286 in k8283 in loop1 in ##sys#lookup-runtime-requirements in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8295(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1212 append */
+t2=*((C_word*)lf[84]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8259(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_8259,3,t0,t1,t2);}
+/* eval.scm: 1203 ##sys#extension-information */
+t3=*((C_word*)lf[269]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[273]);}
+
+/* ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8226(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_8226,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8230,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: 1195 ##sys#repository-path */
+t5=*((C_word*)lf[249]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8230(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_8230,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8236,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: 1196 ##sys#canonicalize-extension-path */
+t3=*((C_word*)lf[243]+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);}}
+
+/* k8234 in k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8236(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_8236,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8239,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: 1197 string-append */
+t3=((C_word*)t0)[3];
+((C_proc6)C_retrieve_proc(t3))(6,t3,t2,((C_word*)t0)[2],lf[271],t1,lf[272]);}
+
+/* k8237 in k8234 in k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8239(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_8239,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8242,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_8257,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1198 string-append */
+t4=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t3,t1,lf[270]);}
+
+/* k8255 in k8237 in k8234 in k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8257(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1198 file-exists? */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8240 in k8237 in k8234 in k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8242(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_8242,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8246,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li195),tmp=(C_word)a,a+=5,tmp);
+/* g20092010 */
+t3=t2;
+f_8246(t3,((C_word*)t0)[2],t1);}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* g2009 in k8240 in k8237 in k8234 in k8228 in ##sys#extension-information in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8246(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_8246,NULL,3,t0,t1,t2);}
+/* g20182019 */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)t0)[2]);}
+
+/* ##sys#require in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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;
+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_8213r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_8213r(t0,t1,t2);}}
+
+static void C_ccall f_8213r(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_8219,a[2]=((C_word)li193),tmp=(C_word)a,a+=3,tmp);
+/* for-each */
+t4=*((C_word*)lf[268]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t3,t2);}
+
+/* a8218 in ##sys#require in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8219(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_8219,3,t0,t1,t2);}
+t3=*((C_word*)lf[260]+1);
+/* g19861987 */
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,lf[267]);}
+
+/* ##sys#provided? in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8199(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_8199,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8210,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 1176 ##sys#canonicalize-extension-path */
+t4=*((C_word*)lf[243]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[266]);}
+
+/* k8208 in ##sys#provided? in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8210(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_member(t1,C_retrieve(lf[258]));
+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 k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8157(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_8157r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_8157r(t0,t1,t2);}}
+
+static void C_ccall f_8157r(C_word 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_8163,a[2]=t4,a[3]=((C_word)li190),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8163(t6,t1,t2);}
+
+/* loop1948 in ##sys#provide in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8163(C_word t0,C_word 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_8163,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_symbol_2(t3,lf[264]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8178,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1169 ##sys#canonicalize-extension-path */
+t6=*((C_word*)lf[243]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,lf[264]);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8176 in loop1948 in ##sys#provide in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8178(C_word c,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_8178,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,C_retrieve(lf[258]));
+t3=C_mutate((C_word*)lf[258]+1 /* (set! loaded-extensions ...) */,t2);
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_8163(t5,((C_word*)t0)[2],t4);}
+
+/* ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8073(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_8073r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_8073r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_8073r(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_8077,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_word)C_i_nullp(t4))){
+t7=t6;
+f_8077(2,t7,C_SCHEME_TRUE);}
+else{
+t7=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=t6;
+f_8077(2,t8,(C_word)C_i_car(t4));}
+else{
+/* ##sys#error */
+t8=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t6,lf[0],t4);}}}
+
+/* k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8077(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_8077,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8080,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)C_i_stringp(((C_word*)((C_word*)t0)[4])[1]))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8133,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1148 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_8080(t3,(C_word)C_i_check_symbol_2(((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[3]));}}
+
+/* k8131 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_8080(t3,t2);}
+
+/* k8078 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8080(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_8080,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8083,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: 1150 ##sys#canonicalize-extension-path */
+t3=*((C_word*)lf[243]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[4])[1],((C_word*)t0)[2]);}
+
+/* k8081 in k8078 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8083(C_word c,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_8083,2,t0,t1);}
+t2=(C_word)C_i_member(t1,C_retrieve(lf[258]));
+if(C_truep(t2)){
+t3=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)((C_word*)t0)[4])[1],*((C_word*)lf[5]+1)))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8098,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: 1153 ##sys#load-library-0 */
+t4=*((C_word*)lf[233]+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_8110,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: 1157 ##sys#find-extension */
+t4=*((C_word*)lf[253]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,C_SCHEME_TRUE);}}}
+
+/* k8108 in k8081 in k8078 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8110(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_8110,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8116,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1159 ##sys#load */
+t3=*((C_word*)lf[197]+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: 1162 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[262],((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);}}}
+
+/* k8114 in k8108 in k8081 in k8078 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8116(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_8116,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_retrieve(lf[258]));
+t3=C_mutate((C_word*)lf[258]+1 /* (set! loaded-extensions ...) */,t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}
+
+/* k8096 in k8081 in k8078 in k8075 in ##sys#load-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *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: 1155 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[3],lf[261],((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 k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7974(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_7974,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7978,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: 1124 ##sys#repository-path */
+t5=*((C_word*)lf[249]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_7978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7980,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_8026,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_truep(C_retrieve(lf[251]))?lf[255]:C_SCHEME_END_OF_LIST);
+t5=(C_truep(t1)?(C_word)C_a_i_list(&a,1,t1):C_SCHEME_END_OF_LIST);
+t6=(C_truep(((C_word*)t0)[2])?C_retrieve(lf[256]):C_SCHEME_END_OF_LIST);
+if(C_truep(C_retrieve(lf[251]))){
+/* eval.scm: 1133 ##sys#append */
+t7=*((C_word*)lf[71]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,C_SCHEME_END_OF_LIST);}
+else{
+/* eval.scm: 1133 ##sys#append */
+t7=*((C_word*)lf[71]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t3,t4,t5,t6,lf[257]);}}
+
+/* k8024 in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8026(C_word c,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_8026,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_8028,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_8028(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k8024 in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_8028(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_8028,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|4,a[1]=(C_word)f_8041,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1140 check */
+t5=((C_word*)t0)[2];
+f_7980(t5,t4,t3);}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k8039 in loop in k8024 in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8041(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));
+/* eval.scm: 1141 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_8028(t3,((C_word*)t0)[4],t2);}}
+
+/* check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7980(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_7980,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7984,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1126 string-append */
+t4=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t4))(5,t4,t3,t2,lf[254],((C_word*)t0)[2]);}
+
+/* k7982 in check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7984(C_word c,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_7984,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7990,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[182]);
+if(C_truep(t3)){
+t4=t2;
+f_7990(2,t4,C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_fudge(C_fix(24)))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8019,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1130 ##sys#string-append */
+t5=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t1,C_retrieve(lf[216]));}
+else{
+t4=t2;
+f_7990(2,t4,C_SCHEME_FALSE);}}}
+else{
+t3=t2;
+f_7990(2,t3,C_SCHEME_FALSE);}}
+
+/* k8017 in k7982 in check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8019(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);}
+
+/* k7988 in k7982 in check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7990(C_word c,C_word t0,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_7990,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7993,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_8000,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1131 ##sys#string-append */
+t4=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[4],lf[10]);}}
+
+/* k7998 in k7988 in k7982 in check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_8000(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1131 file-exists? */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7991 in k7988 in k7982 in check in k7976 in ##sys#find-extension in k7968 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *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#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7810(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_7810,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7813,a[2]=t2,a[3]=t3,a[4]=((C_word)li182),tmp=(C_word)a,a+=5,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7832,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_stringp(t2))){
+t6=t5;
+f_7832(2,t6,t2);}
+else{
+if(C_truep((C_word)C_i_symbolp(t2))){
+/* eval.scm: 1084 ##sys#symbol->string */
+t6=*((C_word*)lf[245]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
+else{
+if(C_truep((C_word)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_7915,a[2]=t4,a[3]=t7,a[4]=((C_word*)t0)[2],a[5]=((C_word)li184),tmp=(C_word)a,a+=6,tmp));
+t9=((C_word*)t7)[1];
+f_7915(t9,t5,t2);}
+else{
+t6=t5;
+f_7832(2,t6,C_SCHEME_UNDEFINED);}}}}
+
+/* loop in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7915(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_7915,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[246]);}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7932,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_word)C_i_symbolp(t3))){
+/* eval.scm: 1091 ##sys#symbol->string */
+t5=*((C_word*)lf[245]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+else{
+if(C_truep((C_word)C_i_stringp(t3))){
+t5=t4;
+f_7932(2,t5,t3);}
+else{
+/* eval.scm: 1093 err */
+t5=((C_word*)t0)[2];
+f_7813(t5,t4);}}}}
+
+/* k7930 in loop in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7932(C_word c,C_word t0,C_word 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_7932,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_i_nullp(t2);
+t4=(C_truep(t3)?lf[247]:lf[248]);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7940,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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* eval.scm: 1097 loop */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_7915(t7,t5,t6);}
+
+/* k7938 in k7930 in loop in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 1089 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);}
+
+/* k7830 in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7832(C_word c,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_7832,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_7837,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li183),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_7837(t5,((C_word*)t0)[2],t1);}
+
+/* check in k7830 in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7837(C_word t0,C_word 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_7837,NULL,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(C_word)C_eqp(C_fix(0),t3);
+if(C_truep(t4)){
+/* eval.scm: 1100 err */
+t5=((C_word*)t0)[3];
+f_7813(t5,t1);}
+else{
+t5=(C_word)C_i_string_ref(t2,C_fix(0));
+t6=(C_word)C_eqp(C_make_character(92),t5);
+t7=(C_truep(t6)?t6:(C_word)C_eqp(C_make_character(47),t5));
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7863,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1102 ##sys#substring */
+t9=*((C_word*)lf[205]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,t2,C_fix(1),t3);}
+else{
+t8=(C_word)C_fixnum_difference(t3,C_fix(1));
+t9=(C_word)C_i_string_ref(t2,t8);
+t10=(C_word)C_eqp(C_make_character(92),t9);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(C_make_character(47),t9));
+if(C_truep(t11)){
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7876,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t13=(C_word)C_fixnum_difference(t3,C_fix(1));
+/* eval.scm: 1104 ##sys#substring */
+t14=*((C_word*)lf[205]+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);}}}}
+
+/* k7874 in check in k7830 in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7876(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1104 check */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_7837(t2,((C_word*)t0)[2],t1);}
+
+/* k7861 in check in k7830 in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7863(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1102 check */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_7837(t2,((C_word*)t0)[2],t1);}
+
+/* err in ##sys#canonicalize-extension-path in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7813(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_7813,NULL,2,t0,t1);}
+/* eval.scm: 1081 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],lf[244],((C_word*)t0)[2]);}
+
+/* ##sys#load-library in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7724(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_7724r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_7724r(t0,t1,t2,t3);}}
+
+static void C_ccall f_7724r(C_word t0,C_word 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_word)C_i_check_symbol_2(t2,lf[241]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7731,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_notvemptyp(t3))){
+t6=(C_word)C_i_vector_ref(t3,C_fix(0));
+/* eval.scm: 1058 ##sys#load-library-0 */
+t7=*((C_word*)lf[233]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t2,t6);}
+else{
+/* eval.scm: 1058 ##sys#load-library-0 */
+t6=*((C_word*)lf[233]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,C_SCHEME_FALSE);}}
+
+/* k7729 in ##sys#load-library in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7731(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_7731,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_7741,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[16]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}}
+
+/* k7739 in k7729 in ##sys#load-library in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7741(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1059 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[241],lf[242],((C_word*)t0)[2],t1);}
+
+/* ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7618(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_7618,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7622,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: 1031 ##sys#->feature-id */
+t5=*((C_word*)lf[239]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 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_7622,2,t0,t1);}
+t2=(C_word)C_i_memq(t1,C_retrieve(lf[146]));
+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_7631,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_7631(t4,(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]));}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7714,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_slot(((C_word*)t0)[6],C_fix(1));
+/* eval.scm: 1036 ##sys#string-append */
+t6=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,t5,C_retrieve(lf[227]));}}}
+
+/* k7712 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7714(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_7714,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7718,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1037 dynamic-load-libraries */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k7716 in k7712 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7718(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_7718,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_7631(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+
+/* k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7631(C_word t0,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_7631,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_7634,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_7696,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7700,a[2]=t3,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+/* eval.scm: 1042 ##sys#string->c-identifier */
+t6=*((C_word*)lf[238]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* k7698 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7700(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1040 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[236],t1,lf[237]);}
+
+/* k7694 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7696(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1039 ##sys#make-c-string */
+t2=*((C_word*)lf[209]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7634(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_7634,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7637,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_7683,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 1044 load-verbose */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7681 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7683(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_7683,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7686,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: 1045 display */
+t3=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[235]);}
+else{
+t2=((C_word*)t0)[3];
+f_7637(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k7684 in k7681 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7689,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 1046 display */
+t3=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k7687 in k7684 in k7681 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7689(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1047 display */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],lf[234]);}
+
+/* k7635 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7637(C_word c,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_7637,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_7642,a[2]=((C_word*)t0)[4],a[3]=t3,a[4]=((C_word*)t0)[5],a[5]=((C_word)li179),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_7642(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop in k7635 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7642(C_word 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_7642,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_7655,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_7676,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_slot(t2,C_fix(0));
+/* eval.scm: 1050 ##sys#make-c-string */
+t6=*((C_word*)lf[209]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
+
+/* k7674 in loop in k7635 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7676(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 1050 ##sys#dload */
+t2=*((C_word*)lf[208]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k7653 in loop in k7635 in k7632 in k7629 in k7620 in ##sys#load-library-0 in k7614 in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7655(C_word c,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_7655,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[5],C_retrieve(lf[146])))){
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_TRUE);}
+else{
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],C_retrieve(lf[146]));
+t3=C_mutate((C_word*)lf[146]+1 /* (set! features ...) */,t2);
+t4=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_TRUE);}}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+/* eval.scm: 1053 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_7642(t3,((C_word*)t0)[4],t2);}}
+
+/* complete in k7605 in k7598 in k7593 in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7609(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_7609,NULL,3,t0,t1,t2);}
+t3=*((C_word*)lf[13]+1);
+/* g17211722 */
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,t2,((C_word*)t0)[2]);}
+
+/* load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7569(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_7569r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_7569r(t0,t1,t2,t3);}}
+
+static void C_ccall f_7569r(C_word 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_7573,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_7590,a[2]=((C_word)li176),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#get-keyword */
+t6=*((C_word*)lf[223]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t4,lf[226],t3,t5);}
+
+/* a7589 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7590(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_7590,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* k7571 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7573(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_7573,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7576,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_7587,a[2]=((C_word)li175),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#get-keyword */
+t4=*((C_word*)lf[223]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[225],((C_word*)t0)[2],t3);}
+
+/* a7586 in k7571 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7587(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_7587,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* k7574 in k7571 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7576(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_7576,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7579,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_7584,a[2]=((C_word)li174),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#get-keyword */
+t4=*((C_word*)lf[223]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[224],((C_word*)t0)[2],t3);}
+
+/* a7583 in k7574 in k7571 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7584(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_7584,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* k7577 in k7574 in k7571 in load-noisily in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7579(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 992 ##sys#load */
+t2=*((C_word*)lf[197]+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 k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7526(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_7526r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_7526r(t0,t1,t2,t3);}}
+
+static void C_ccall f_7526r(C_word 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_7534,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_string_ref(t2,C_fix(0));
+if(C_truep((C_truep((C_word)C_eqp(t5,C_make_character(92)))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t5,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t6=t4;
+f_7534(2,t6,t2);}
+else{
+/* eval.scm: 988 ##sys#string-append */
+t6=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,C_retrieve(lf[180]),t2);}}
+
+/* k7532 in load-relative in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7534(C_word c,C_word t0,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_7534,2,t0,t1);}
+t2=((C_word*)t0)[3];
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7538,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+/* eval.scm: 985 ##sys#load */
+t4=*((C_word*)lf[197]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t1,C_SCHEME_FALSE,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=(C_word)C_i_car(t2);
+/* eval.scm: 985 ##sys#load */
+t6=*((C_word*)lf[197]+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[14]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
+
+/* k7536 in k7532 in load-relative in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7538(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[197]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* load in k7026 in k6945 in k6850 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+4)){
+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 t7;
+C_word *a=C_alloc(4);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7505,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+/* eval.scm: 982 ##sys#load */
+t5=*((C_word*)lf[197]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+/* eval.scm: 982 ##sys#load */
+t7=*((C_word*)lf[197]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t1,t2,t6,C_SCHEME_FALSE);}
+else{
+/* ##sys#error */
+t6=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k7503 in load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7505(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 982 ##sys#load */
+t2=*((C_word*)lf[197]+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 k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7076(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_7076r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest(a,C_rest_count(0));
+f_7076r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_7076r(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_7078,a[2]=((C_word*)t0)[2],a[3]=((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)li168),tmp=(C_word)a,a+=17,tmp);
+t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7444,a[2]=t7,a[3]=((C_word)li169),tmp=(C_word)a,a+=4,tmp);
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7449,a[2]=t8,a[3]=((C_word)li170),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t5))){
+/* def-timer15051663 */
+t10=t9;
+f_7449(t10,t1);}
+else{
+t10=(C_word)C_i_car(t5);
+t11=(C_word)C_i_cdr(t5);
+if(C_truep((C_word)C_i_nullp(t11))){
+/* def-printer15061661 */
+t12=t8;
+f_7444(t12,t1,t10);}
+else{
+t12=(C_word)C_i_car(t11);
+t13=(C_word)C_i_cdr(t11);
+if(C_truep((C_word)C_i_nullp(t13))){
+/* body15031511 */
+t14=t7;
+f_7078(t14,t1,t10,t12);}
+else{
+/* ##sys#error */
+t14=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t14+1)))(4,t14,t1,lf[0],t13);}}}}
+
+/* def-timer1505 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7449(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_7449,NULL,2,t0,t1);}
+/* def-printer15061661 */
+t2=((C_word*)t0)[2];
+f_7444(t2,t1,C_SCHEME_FALSE);}
+
+/* def-printer1506 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7444(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_7444,NULL,3,t0,t1,t2);}
+/* body15031511 */
+t3=((C_word*)t0)[2];
+f_7078(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7078(C_word 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_7078,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_7082,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_stringp(((C_word*)((C_word*)t0)[7])[1]))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7443,a[2]=t4,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 914 ##sys#expand-home-path */
+t6=*((C_word*)lf[220]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
+else{
+t5=t4;
+f_7082(t5,C_SCHEME_UNDEFINED);}}
+
+/* k7441 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7443(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_7082(t3,t2);}
+
+/* k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7082(C_word t0,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_7082,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_7085,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_7365,a[2]=t3,a[3]=((C_word*)t0)[7],a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 917 port? */
+t6=*((C_word*)lf[219]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)((C_word*)t0)[7])[1]);}
+
+/* k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 t4;
+C_word ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7365,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_7085(2,t2,C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_i_stringp(((C_word*)((C_word*)t0)[3])[1]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7380,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: 919 ##sys#file-info */
+t3=*((C_word*)lf[215]+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: 910 ##sys#signal-hook */
+t3=*((C_word*)lf[189]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],lf[217],lf[202],lf[218],t2);}}}
+
+/* k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7380(C_word c,C_word t0,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_7380,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7383,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_word)C_slot(t1,C_fix(4));
+if(C_truep(t3)){
+t4=(C_word)C_eqp(C_fix(1),t3);
+t5=C_mutate(((C_word *)((C_word*)t0)[2])+1,t4);
+t6=t2;
+f_7383(t6,(C_word)C_i_not(((C_word*)((C_word*)t0)[2])[1]));}
+else{
+t4=t2;
+f_7383(t4,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_7383(t3,C_SCHEME_FALSE);}}
+
+/* k7381 in k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7383(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_7383,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_7085(2,t2,((C_word*)((C_word*)t0)[3])[1]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7386,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: 925 ##sys#string-append */
+t3=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[3])[1],C_retrieve(lf[216]));}}
+
+/* k7384 in k7381 in k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7386(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_7386,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7392,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[182]);
+if(C_truep(t3)){
+t4=t2;
+f_7392(2,t4,C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_fudge(C_fix(24)))){
+/* eval.scm: 928 ##sys#file-info */
+t4=*((C_word*)lf[215]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t1);}
+else{
+t4=t2;
+f_7392(2,t4,C_SCHEME_FALSE);}}}
+
+/* k7390 in k7384 in k7381 in k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7392(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_7392,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+t3=((C_word*)t0)[4];
+f_7085(2,t3,t2);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7395,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: 930 ##sys#string-append */
+t3=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)((C_word*)t0)[2])[1],lf[10]);}}
+
+/* k7393 in k7390 in k7384 in k7381 in k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7395(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_7395,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7401,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: 931 ##sys#file-info */
+t3=*((C_word*)lf[215]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
+
+/* k7399 in k7393 in k7390 in k7384 in k7381 in k7378 in k7363 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7401(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_7085(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_7085(2,t3,C_SCHEME_FALSE);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=((C_word*)t0)[5];
+f_7085(2,t4,t3);}}}
+
+/* k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7085(C_word c,C_word t0,C_word t1){
+C_word 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_7085,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_7091,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_word)C_i_stringp(((C_word*)((C_word*)t0)[7])[1]);
+t6=(C_truep(t5)?(C_word)C_i_not(t1):C_SCHEME_FALSE);
+if(C_truep(t6)){
+/* eval.scm: 936 ##sys#signal-hook */
+t7=*((C_word*)lf[189]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t4,lf[211],lf[202],lf[212],((C_word*)((C_word*)t0)[7])[1]);}
+else{
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7356,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: 937 load-verbose */
+t8=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t8))(2,t8,t7);}}
+
+/* k7354 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7356(C_word c,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_7356,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_7344,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: 938 display */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[214]);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[3];
+f_7091(2,t4,t3);}}
+
+/* k7342 in k7354 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7344(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_7344,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7347,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: 939 display */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k7345 in k7342 in k7354 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7347,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7350,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 940 display */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[213]);}
+
+/* k7348 in k7345 in k7342 in k7354 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7350(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 941 flush-output */
+t2=((C_word*)t0)[3];
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7091(C_word c,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_7091,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_7094,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_7301,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_7329,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 943 ##sys#make-c-string */
+t5=*((C_word*)lf[209]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[14]);}
+else{
+t3=t2;
+f_7094(2,t3,C_SCHEME_FALSE);}}
+
+/* k7327 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 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 *a;
+/* eval.scm: 943 ##sys#dload */
+t2=*((C_word*)lf[208]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* k7299 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7301,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[5];
+f_7094(2,t3,t2);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7325,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: 944 has-sep? */
+f_7030(t2,((C_word*)t0)[3]);}}
+
+/* k7323 in k7299 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7325(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_7325,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_7094(2,t2,C_SCHEME_FALSE);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7317,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_7321,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 945 ##sys#string-append */
+t4=*((C_word*)lf[13]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[210],((C_word*)t0)[2]);}}
+
+/* k7319 in k7323 in k7299 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7321(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 945 ##sys#make-c-string */
+t2=*((C_word*)lf[209]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k7315 in k7323 in k7299 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7317(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 945 ##sys#dload */
+t2=*((C_word*)lf[208]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7094(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_7094,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7097,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_7102,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)li167),tmp=(C_word)a,a+=15,tmp);
+/* eval.scm: 946 call-with-current-continuation */
+t4=*((C_word*)lf[207]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}}
+
+/* a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7102(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_7102,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_7106,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_7288,a[2]=((C_word*)t0)[13],a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 952 has-sep? */
+f_7030(t8,((C_word*)t0)[13]);}
+else{
+t8=t7;
+f_7106(2,t8,C_SCHEME_FALSE);}}
+
+/* k7286 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *a;
+if(C_truep(t1)){
+t2=(C_word)C_fixnum_plus(t1,C_fix(1));
+/* eval.scm: 953 ##sys#substring */
+t3=*((C_word*)lf[205]+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_7106(2,t2,lf[206]);}}
+
+/* k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7106(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_7106,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_7107,a[2]=((C_word*)t0)[16],a[3]=((C_word)li153),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_7116,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)li154),tmp=(C_word)a,a+=11,tmp);
+t15=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_7127,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)li165),tmp=(C_word)a,a+=14,tmp);
+t16=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7276,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)li166),tmp=(C_word)a,a+=11,tmp);
+/* ##sys#dynamic-wind */
+t17=*((C_word*)lf[47]+1);
+((C_proc5)(void*)(*((C_word*)t17+1)))(5,t17,((C_word*)t0)[2],t14,t15,t16);}
+
+/* a7275 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7276(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_7276,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[198]));
+t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[179]));
+t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[180]));
+t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[178]));
+t6=C_mutate((C_word*)lf[198]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
+t7=C_mutate((C_word*)lf[179]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t8=C_mutate((C_word*)lf[180]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t9=C_mutate((C_word*)lf[178]+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);}
+
+/* a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7127(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_7127,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7131,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: 955 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_7131(2,t3,((C_word*)((C_word*)t0)[2])[1]);}}
+
+/* k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 ab[20],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7131,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7136,a[2]=((C_word)li155),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7139,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)li163),tmp=(C_word)a,a+=12,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7267,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li164),tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 956 ##sys#dynamic-wind */
+t5=*((C_word*)lf[47]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,((C_word*)t0)[2],t2,t3,t4);}
+
+/* a7266 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7267(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_7267,2,t0,t1);}
+/* eval.scm: 978 close-input-port */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
+
+/* a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7139(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_7139,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7143,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: 959 peek-char */
+t3=*((C_word*)lf[204]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[9]);}
+
+/* k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7143(C_word c,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_7143,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7146,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_word)C_eqp(t1,C_make_character(127));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7261,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* ##sys#peek-c-string */
+t5=*((C_word*)lf[16]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,C_mpointer(&a,(void*)C_dlerror),C_fix(0));}
+else{
+t4=t2;
+f_7146(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k7259 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7261(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 961 ##sys#error */
+t2=*((C_word*)lf[14]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[202],lf[203],((C_word*)t0)[2],t1);}
+
+/* k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7146(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_7146,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7149,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 962 read */
+t3=((C_word*)t0)[10];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[9]);}
+
+/* k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7149(C_word c,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_7149,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_7154,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)li162),tmp=(C_word)a,a+=12,tmp));
+t5=((C_word*)t3)[1];
+f_7154(t5,((C_word*)t0)[2],t1);}
+
+/* doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7154(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_7154,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_7164,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: 965 printer */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+else{
+t4=t3;
+f_7164(2,t4,C_SCHEME_UNDEFINED);}}}
+
+/* k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7164(C_word c,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_7164,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7167,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_7176,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li158),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7210,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li161),tmp=(C_word)a,a+=6,tmp);
+/* eval.scm: 966 ##sys#call-with-values */
+C_call_with_values(4,0,t2,t3,t4);}
+
+/* a7209 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7210(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_7210r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7210r(t0,t1,t2);}}
+
+static void C_ccall f_7210r(C_word t0,C_word 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_7219,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],a[5]=((C_word)li160),tmp=(C_word)a,a+=6,tmp));
+t6=((C_word*)t4)[1];
+f_7219(t6,t1,t2);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* loop1633 in a7209 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7219(C_word t0,C_word 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_7219,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_7227,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li159),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7237,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));
+/* g16401641 */
+t6=t3;
+f_7227(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7235 in loop1633 in a7209 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_7219(t3,((C_word*)t0)[2],t2);}
+
+/* g1640 in loop1633 in a7209 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7227(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_7227,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7231,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 975 write */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k7229 in g1640 in loop1633 in a7209 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7231(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 976 newline */
+t2=((C_word*)t0)[3];
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7176(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_7176,2,t0,t1);}
+if(C_truep(((C_word*)t0)[4])){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7183,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[201]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+/* eval.scm: 970 evproc */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}}
+
+/* k7181 in a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7183(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_7183,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7188,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li156),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7194,a[2]=((C_word)li157),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
+
+/* a7193 in k7181 in a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7194(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_7194r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7194r(t0,t1,t2);}}
+
+static void C_ccall f_7194r(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_7198,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7205,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#stop-timer */
+t5=*((C_word*)lf[200]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k7203 in a7193 in k7181 in a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7205(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[199]))(3,*((C_word*)lf[199]+1),((C_word*)t0)[2],t1);}
+
+/* k7196 in a7193 in k7181 in a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7198(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]);}
+
+/* a7187 in k7181 in a7175 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7188(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_7188,2,t0,t1);}
+/* eval.scm: 969 evproc */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
+
+/* k7165 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7167(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_7167,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7174,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 963 read */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k7172 in k7165 in k7162 in doloop1615 in k7147 in k7144 in k7141 in a7138 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7174(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_7154(t2,((C_word*)t0)[2],t1);}
+
+/* a7135 in k7129 in a7126 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7136(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_7136,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* a7115 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 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 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_7116,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[9])+1,C_retrieve(lf[198]));
+t3=C_mutate(((C_word *)((C_word*)t0)[8])+1,C_retrieve(lf[179]));
+t4=C_mutate(((C_word *)((C_word*)t0)[7])+1,C_retrieve(lf[180]));
+t5=C_mutate(((C_word *)((C_word*)t0)[6])+1,C_retrieve(lf[178]));
+t6=C_mutate((C_word*)lf[198]+1 /* (set! read-error-with-line-number ...) */,((C_word*)((C_word*)t0)[5])[1]);
+t7=C_mutate((C_word*)lf[179]+1 /* (set! current-source-filename ...) */,((C_word*)((C_word*)t0)[4])[1]);
+t8=C_mutate((C_word*)lf[180]+1 /* (set! current-load-path ...) */,((C_word*)((C_word*)t0)[3])[1]);
+t9=C_mutate((C_word*)lf[178]+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_7107 in k7104 in a7101 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7107(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_7107,2,t0,t1);}
+/* eval.scm: 954 abrt */
+t2=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,C_SCHEME_FALSE);}
+
+/* k7095 in k7092 in k7089 in k7083 in k7080 in body1503 in ##sys#load in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_7097(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 k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_7030(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_7030,NULL,2,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(C_word)C_fixnum_difference(t3,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7040,a[2]=t2,a[3]=((C_word)li151),tmp=(C_word)a,a+=4,tmp);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,f_7040(t5,t4));}
+
+/* loop in has-sep? in k7026 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static C_word C_fcall f_7040(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_i_zerop(t1))){
+return(C_SCHEME_FALSE);}
+else{
+t2=(C_word)C_subchar(((C_word*)t0)[2],t1);
+if(C_truep((C_truep((C_word)C_eqp(t2,C_make_character(92)))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t2,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+return(t1);}
+else{
+t3=(C_word)C_fixnum_difference(t1,C_fix(1));
+t5=t3;
+t1=t5;
+goto loop;}}}
+
+/* set-dynamic-load-mode! in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6955(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_6955,3,t0,t1,t2);}
+t3=(C_word)C_i_pairp(t2);
+t4=(C_truep(t3)?t2:(C_word)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_6962,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_6967,a[2]=t6,a[3]=t8,a[4]=t11,a[5]=((C_word)li149),tmp=(C_word)a,a+=6,tmp));
+t13=((C_word*)t11)[1];
+f_6967(t13,t9,t4);}
+
+/* loop in set-dynamic-load-mode! in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_6967(C_word t0,C_word 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_6967,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|4,a[1]=(C_word)f_6980,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_eqp(t3,lf[185]);
+if(C_truep(t5)){
+t6=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_TRUE);
+t7=(C_word)C_slot(t2,C_fix(1));
+/* eval.scm: 889 loop */
+t20=t1;
+t21=t7;
+t1=t20;
+t2=t21;
+goto loop;}
+else{
+t6=(C_word)C_eqp(t3,lf[186]);
+if(C_truep(t6)){
+t7=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_FALSE);
+t8=(C_word)C_slot(t2,C_fix(1));
+/* eval.scm: 889 loop */
+t20=t1;
+t21=t8;
+t1=t20;
+t2=t21;
+goto loop;}
+else{
+t7=(C_word)C_eqp(t3,lf[187]);
+if(C_truep(t7)){
+t8=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_FALSE);
+t9=(C_word)C_slot(t2,C_fix(1));
+/* eval.scm: 889 loop */
+t20=t1;
+t21=t9;
+t1=t20;
+t2=t21;
+goto loop;}
+else{
+t8=(C_word)C_eqp(t3,lf[188]);
+if(C_truep(t8)){
+t9=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_TRUE);
+t10=(C_word)C_slot(t2,C_fix(1));
+/* eval.scm: 889 loop */
+t20=t1;
+t21=t10;
+t1=t20;
+t2=t21;
+goto loop;}
+else{
+t9=(C_word)C_slot(t2,C_fix(0));
+/* eval.scm: 888 ##sys#signal-hook */
+t10=*((C_word*)lf[189]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t4,lf[183],lf[190],t9);}}}}}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6978 in loop in set-dynamic-load-mode! in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6980(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));
+/* eval.scm: 889 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_6967(t3,((C_word*)t0)[2],t2);}
+
+/* k6960 in set-dynamic-load-mode! in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6962(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 890 ##sys#set-dlopen-flags! */
+t2=*((C_word*)lf[184]+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_6949 in k6945 in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6949(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_6949,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* ##sys#decompose-lambda-list in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6865(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_6865,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6868,a[2]=t2,a[3]=((C_word)li145),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_6878,a[2]=t4,a[3]=t6,a[4]=((C_word*)t0)[2],a[5]=t3,a[6]=((C_word)li146),tmp=(C_word)a,a+=7,tmp));
+t8=((C_word*)t6)[1];
+f_6878(t8,t1,t2,C_SCHEME_END_OF_LIST,C_fix(0));}
+
+/* loop in ##sys#decompose-lambda-list in k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_6878(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_6878,NULL,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6892,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 857 reverse */
+t7=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t3);}
+else{
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_symbolp(t2))){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6911,a[2]=t2,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_a_i_cons(&a,2,t2,t3);
+/* eval.scm: 859 reverse */
+t8=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t8))(3,t8,t6,t7);}
+else{
+if(C_truep((C_word)C_pairp(t2))){
+t6=(C_word)C_slot(t2,C_fix(1));
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=(C_word)C_a_i_cons(&a,2,t7,t3);
+t9=(C_word)C_fixnum_plus(t4,C_fix(1));
+/* eval.scm: 861 loop */
+t14=t1;
+t15=t6;
+t16=t8;
+t17=t9;
+t1=t14;
+t2=t15;
+t3=t16;
+t4=t17;
+goto loop;}
+else{
+/* eval.scm: 860 err */
+t6=((C_word*)t0)[2];
+f_6868(t6,t1);}}}
+else{
+/* eval.scm: 858 err */
+t6=((C_word*)t0)[2];
+f_6868(t6,t1);}}}
+
+/* k6909 in loop in ##sys#decompose-lambda-list in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6911(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 859 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]);}
+
+/* k6890 in loop in ##sys#decompose-lambda-list in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6892(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 857 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 k6850 in k2988 in k2985 in k2952 */
+static void C_fcall f_6868(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_6868,NULL,2,t0,t1);}
+t2=C_set_block_item(lf[175] /* syntax-error-culprit */,0,C_SCHEME_FALSE);
+/* eval.scm: 854 ##sys#syntax-error-hook */
+t3=*((C_word*)lf[50]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,lf[176],((C_word*)t0)[2]);}
+
+/* eval in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6855(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_6855r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_6855r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6855r(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_6863,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 842 ##sys#eval-handler */
+t5=*((C_word*)lf[172]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k6861 in eval in k6850 in k2988 in k2985 in k2952 */
+static void C_ccall f_6863(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_word)C_i_nullp(t5))){
+t7=t6;
+f_3363(2,t7,C_SCHEME_FALSE);}
+else{
+t7=(C_word)C_i_cdr(t5);
+if(C_truep((C_word)C_i_nullp(t7))){
+t8=t6;
+f_3363(2,t8,(C_word)C_i_car(t5));}
+else{
+/* ##sys#error */
+t8=*((C_word*)lf[14]+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)li18),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)li19),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)li23),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)li26),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)li130),tmp=(C_word)a,a+=10,tmp));
+t19=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6529,a[2]=t11,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
+t20=(C_word)C_fixnum_greaterp(C_retrieve(lf[34]),C_fix(0));
+/* eval.scm: 821 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_6529(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_6529,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6533,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 785 compile */
+t9=((C_word*)((C_word*)t0)[2])[1];
+f_3577(t9,t7,t8,t3,C_SCHEME_FALSE,t4,t5,t6);}
+
+/* k6531 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 t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_6533,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[8],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6503,a[2]=((C_word)li131),tmp=(C_word)a,a+=3,tmp);
+t4=f_6503(t2,C_fix(0));
+t5=((C_word*)t0)[8];
+switch(t4){
+case C_SCHEME_FALSE:
+/* eval.scm: 790 ##sys#syntax-error-hook */
+t6=*((C_word*)lf[50]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,((C_word*)t0)[7],lf[171],((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_6555,a[2]=t1,a[3]=t5,a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=((C_word)li132),tmp=(C_word)a,a+=7,tmp));
+case C_fix(1):
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6574,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 794 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_6602,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 798 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_6637,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 803 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_6679,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_word)C_slot(t2,C_fix(0));
+/* eval.scm: 809 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_6722,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_6780,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)li141),tmp=(C_word)a,a+=11,tmp));
+t14=((C_word*)t12)[1];
+f_6780(t14,t10,t2);}}
+
+/* loop1333 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6780(C_word t0,C_word 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_6780,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6807,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)li140),tmp=(C_word)a,a+=8,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6814,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));
+/* g13491350 */
+t6=t3;
+f_6807(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6812 in loop1333 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6814(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6814,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));
+/* loop13331346 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6780(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));
+/* loop13331346 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6780(t6,((C_word*)t0)[3],t5);}}
+
+/* g1349 in loop1333 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_fcall f_6807(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_6807,NULL,3,t0,t1,t2);}
+/* eval.scm: 816 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]);}
+
+/* k6720 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6722(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_6722,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_6723,a[2]=((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)li139),tmp=(C_word)a,a+=8,tmp));}
+
+/* f_6723 in k6720 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 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_6723,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6727,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_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t7=t3;
+f_6727(t7,t6);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t3;
+f_6727(t7,t6);}}
+
+/* k6725 */
+static void C_fcall f_6727(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_6727,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6734,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]);}
+
+/* k6732 in k6725 */
+static void C_ccall f_6734(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_6734,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_6738,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_6740,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word*)t0)[3],a[6]=((C_word)li138),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_6740(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1358 in k6732 in k6725 */
+static void C_fcall f_6740(C_word t0,C_word 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_6740,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_6767,a[2]=((C_word*)t0)[5],a[3]=((C_word)li137),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6774,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));
+/* g13741375 */
+t6=t3;
+f_6767(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6772 in loop1358 in k6732 in k6725 */
+static void C_ccall f_6774(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6774,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));
+/* loop13581371 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6740(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));
+/* loop13581371 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6740(t6,((C_word*)t0)[3],t5);}}
+
+/* g1374 in loop1358 in k6732 in k6725 */
+static void C_fcall f_6767(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_6767,NULL,3,t0,t1,t2);}
+t3=t2;
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,((C_word*)t0)[2]);}
+
+/* k6736 in k6732 in k6725 */
+static void C_ccall f_6738(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);}
+
+/* k6677 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6679(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_6679,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6682,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 810 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6680 in k6677 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6682(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_6682,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_6685,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 811 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6683 in k6680 in k6677 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 ab[10],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6685,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6688,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: 812 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6686 in k6683 in k6680 in k6677 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6688(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_6688,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_6689,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)li136),tmp=(C_word)a,a+=11,tmp));}
+
+/* f_6689 in k6686 in k6683 in k6680 in k6677 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6689(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_6689,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6693,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_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t7=t3;
+f_6693(t7,t6);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t3;
+f_6693(t7,t6);}}
+
+/* k6691 */
+static void C_fcall f_6693(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_6693,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6696,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]);}
+
+/* k6694 in k6691 */
+static void C_ccall f_6696(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_6696,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6703,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]);}
+
+/* k6701 in k6694 in k6691 */
+static void C_ccall f_6703(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_6703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6707,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]);}
+
+/* k6705 in k6701 in k6694 in k6691 */
+static void C_ccall f_6707(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_6707,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6711,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]);}
+
+/* k6709 in k6705 in k6701 in k6694 in k6691 */
+static void C_ccall f_6711(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_6711,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6715,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]);}
+
+/* k6713 in k6709 in k6705 in k6701 in k6694 in k6691 */
+static void C_ccall f_6715(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g13271328 */
+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);}
+
+/* k6635 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 ab[12],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6637,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_6640,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 804 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6638 in k6635 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 ab[9],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6640,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6643,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: 805 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6641 in k6638 in k6635 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 ab[10],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6643,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6644,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)li135),tmp=(C_word)a,a+=10,tmp);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* f_6644 in k6641 in k6638 in k6635 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 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_6644,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6648,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_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t7=t3;
+f_6648(t7,t6);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t3;
+f_6648(t7,t6);}}
+
+/* k6646 */
+static void C_fcall f_6648(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_6648,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6651,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]);}
+
+/* k6649 in k6646 */
+static void C_ccall f_6651(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_6651,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6658,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]);}
+
+/* k6656 in k6649 in k6646 */
+static void C_ccall f_6658(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_6658,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6662,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]);}
+
+/* k6660 in k6656 in k6649 in k6646 */
+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 ab[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6662,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6666,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]);}
+
+/* k6664 in k6660 in k6656 in k6649 in k6646 */
+static void C_ccall f_6666(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g13181319 */
+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);}
+
+/* k6600 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6602(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_6602,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6605,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: 799 compile */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_3577(t3,t2,(C_word)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]);}
+
+/* k6603 in k6600 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6605(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_6605,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_6606,a[2]=((C_word*)t0)[2],a[3]=((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)li134),tmp=(C_word)a,a+=9,tmp));}
+
+/* f_6606 in k6603 in k6600 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6606(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_6606,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6610,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_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t7=t3;
+f_6610(t7,t6);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t3;
+f_6610(t7,t6);}}
+
+/* k6608 */
+static void C_fcall f_6610(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_6610,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6613,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]);}
+
+/* k6611 in k6608 */
+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[6],*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|5,a[1]=(C_word)f_6620,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]);}
+
+/* k6618 in k6611 in k6608 */
+static void C_ccall f_6620(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_6620,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6624,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]);}
+
+/* k6622 in k6618 in k6611 in k6608 */
+static void C_ccall f_6624(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g13101311 */
+t2=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k6572 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6574(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_6574,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6575,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)li133),tmp=(C_word)a,a+=8,tmp);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* f_6575 in k6572 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static void C_ccall f_6575(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_6575,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6579,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_word)C_emit_eval_trace_info(((C_word*)t0)[2],t5,C_retrieve(lf[167]));
+t7=t3;
+f_6579(t7,t6);}
+else{
+t6=C_SCHEME_UNDEFINED;
+t7=t3;
+f_6579(t7,t6);}}
+
+/* k6577 */
+static void C_fcall f_6579(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_6579,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6582,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]);}
+
+/* k6580 in k6577 */
+static void C_ccall f_6582(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_6582,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6589,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]);}
+
+/* k6587 in k6580 in k6577 */
+static void C_ccall f_6589(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g13031304 */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* f_6555 in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+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 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_6555,3,t0,t1,t2);}
+t3=((C_word*)t0)[5];
+t4=((C_word*)t0)[4];
+if(C_truep(t3)){
+t5=(C_word)C_emit_eval_trace_info(((C_word*)t0)[3],t4,C_retrieve(lf[167]));
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f11962,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 793 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)f11966,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 793 fn */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
+
+/* f11966 */
+static void C_ccall f11966(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g12981299 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* f11962 */
+static void C_ccall f11962(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g12981299 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* loop in k6531 in compile-call in k3361 in ##sys#compile-to-closure in k2988 in k2985 in k2952 */
+static C_word C_fcall f_6503(C_word 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_word)C_i_nullp(t1))){
+t3=t2;
+return(t3);}
+else{
+if(C_truep((C_word)C_i_pairp(t1))){
+t3=(C_word)C_slot(t1,C_fix(1));
+t4=(C_word)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[170]+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)li27),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_word)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)li28),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)li34),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[169]+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)li35),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)li36),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)li37),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)li38),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)li39),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_word)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)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=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3750,a[2]=((C_word)li41),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_word)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_word)C_eofp(((C_word*)t0)[14]);
+t5=t3;
+f_3760(t5,(C_truep(t4)?t4:(C_word)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)li42),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_word)C_i_pairp(((C_word*)t0)[14]))){
+t2=(C_word)C_slot(((C_word*)t0)[14],C_fix(0));
+if(C_truep((C_word)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_word)C_emit_syntax_trace_info(t5,t6,C_retrieve(lf[167]));
+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_word)C_emit_syntax_trace_info(t4,t5,C_retrieve(lf[167]));
+/* eval.scm: 762 compile-call */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_6529(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: 762 compile-call */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_6529(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[50]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[13],lf[168],((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[166]))(5,*((C_word*)lf[166]+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[43]);
+t3=(C_word)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_word)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 t94;
+C_word t95;
+C_word t96;
+C_word t97;
+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_word)C_eqp(t1,lf[55]);
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t4+1)))(7,t4,t3,lf[55],((C_word*)t0)[13],lf[58],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t3=(C_word)C_eqp(t1,lf[59]);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(t1,lf[60]));
+if(C_truep(t4)){
+t5=(C_word)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)li51),tmp=(C_word)a,a+=4,tmp));}
+else{
+t5=(C_word)C_eqp(t1,lf[61]);
+if(C_truep(t5)){
+t6=(C_word)C_i_cadr(((C_word*)t0)[13]);
+if(C_truep(C_retrieve(lf[25]))){
+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[24]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,C_retrieve(lf[25]),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)li53),tmp=(C_word)a,a+=4,tmp));}}
+else{
+t6=(C_word)C_eqp(t1,lf[62]);
+if(C_truep(t6)){
+t7=(C_word)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_word)C_eqp(t1,lf[63]);
+if(C_truep(t7)){
+t8=(C_word)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_word)C_eqp(t1,lf[64]);
+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)li54),tmp=(C_word)a,a+=3,tmp));}
+else{
+t9=(C_word)C_eqp(t1,lf[65]);
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t11+1)))(7,t11,t10,lf[65],((C_word*)t0)[13],lf[67],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t10=(C_word)C_eqp(t1,lf[68]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(t1,lf[69]));
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t13+1)))(7,t13,t12,lf[68],((C_word*)t0)[13],lf[72],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t12=(C_word)C_eqp(t1,lf[73]);
+t13=(C_truep(t12)?t12:(C_word)C_eqp(t1,lf[74]));
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t15+1)))(7,t15,t14,lf[73],((C_word*)t0)[13],lf[77],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t14=(C_word)C_eqp(t1,lf[78]);
+t15=(C_truep(t14)?t14:(C_word)C_eqp(t1,lf[79]));
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t17+1)))(7,t17,t16,lf[78],((C_word*)t0)[13],lf[87],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t16=(C_word)C_eqp(t1,lf[88]);
+t17=(C_truep(t16)?t16:(C_word)C_eqp(t1,lf[89]));
+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[57]+1);
+((C_proc5)(void*)(*((C_word*)t19+1)))(5,t19,t18,lf[88],((C_word*)t0)[13],lf[91]);}
+else{
+t18=(C_word)C_eqp(t1,lf[92]);
+t19=(C_truep(t18)?t18:(C_word)C_eqp(t1,lf[93]));
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t21+1)))(7,t21,t20,lf[92],((C_word*)t0)[13],lf[101],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t20=(C_word)C_eqp(t1,lf[102]);
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t22+1)))(7,t22,t21,lf[102],((C_word*)t0)[13],lf[104],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t21=(C_word)C_eqp(t1,lf[105]);
+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[57]+1);
+((C_proc7)(void*)(*((C_word*)t23+1)))(7,t23,t22,lf[105],((C_word*)t0)[13],lf[106],C_SCHEME_FALSE,((C_word*)t0)[12]);}
+else{
+t22=(C_word)C_eqp(t1,lf[107]);
+t23=(C_truep(t22)?t22:(C_word)C_eqp(t1,lf[108]));
+if(C_truep(t23)){
+t24=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5548,a[2]=((C_word*)t0)[13],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[12],a[6]=((C_word*)t0)[7],a[7]=((C_word*)t0)[8],a[8]=((C_word*)t0)[10],a[9]=((C_word*)t0)[14],a[10]=((C_word*)t0)[11],tmp=(C_word)a,a+=11,tmp);
+t25=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5635,a[2]=((C_word*)t0)[12],a[3]=((C_word*)t0)[13],a[4]=t24,tmp=(C_word)a,a+=5,tmp);
+t26=(C_word)C_i_cdr(((C_word*)t0)[13]);
+if(C_truep((C_word)C_i_pairp(t26))){
+t27=(C_word)C_i_cadr(((C_word*)t0)[13]);
+t28=t25;
+f_5635(t28,(C_word)C_i_pairp(t27));}
+else{
+t27=t25;
+f_5635(t27,C_SCHEME_FALSE);}}
+else{
+t24=(C_word)C_eqp(t1,lf[117]);
+if(C_truep(t24)){
+/* eval.scm: 644 compile */
+t25=((C_word*)((C_word*)t0)[11])[1];
+f_3577(t25,((C_word*)t0)[14],lf[118],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+else{
+t25=(C_word)C_eqp(t1,lf[119]);
+if(C_truep(t25)){
+t26=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5671,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);
+t27=(C_word)C_i_cddr(((C_word*)t0)[13]);
+/* eval.scm: 648 ##sys#canonicalize-body */
+t28=*((C_word*)lf[83]+1);
+((C_proc5)(void*)(*((C_word*)t28+1)))(5,t28,t26,t27,((C_word*)t0)[12],C_SCHEME_FALSE);}
+else{
+t26=(C_word)C_eqp(t1,lf[120]);
+if(C_truep(t26)){
+t27=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5684,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);
+t28=(C_word)C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 652 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[56]))(3,*((C_word*)lf[56]+1),t27,t28);}
+else{
+t27=(C_word)C_eqp(t1,lf[127]);
+if(C_truep(t27)){
+t28=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5941,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: 697 rename */
+t29=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t29,t28,lf[92],((C_word*)t0)[12]);}
+else{
+t28=(C_word)C_eqp(t1,lf[128]);
+if(C_truep(t28)){
+t29=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5970,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: 700 rename */
+t30=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t30,t29,lf[92],((C_word*)t0)[12]);}
+else{
+t29=(C_word)C_eqp(t1,lf[129]);
+if(C_truep(t29)){
+t30=C_SCHEME_END_OF_LIST;
+t31=(*a=C_VECTOR_TYPE|1,a[1]=t30,tmp=(C_word)a,a+=2,tmp);
+t32=C_SCHEME_FALSE;
+t33=(*a=C_VECTOR_TYPE|1,a[1]=t32,tmp=(C_word)a,a+=2,tmp);
+t34=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5987,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);
+t35=(C_word)C_i_cdr(((C_word*)t0)[13]);
+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(t37,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6064,a[2]=t31,a[3]=t37,a[4]=t33,a[5]=((C_word*)t0)[5],a[6]=((C_word)li124),tmp=(C_word)a,a+=7,tmp));
+t39=((C_word*)t37)[1];
+f_6064(t39,t34,t35);}
+else{
+t30=(C_word)C_eqp(t1,lf[133]);
+if(C_truep(t30)){
+t31=(C_word)C_i_caddr(((C_word*)t0)[13]);
+t32=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6118,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_word)C_i_cadr(((C_word*)t0)[13]);
+t34=C_SCHEME_UNDEFINED;
+t35=(*a=C_VECTOR_TYPE|1,a[1]=t34,tmp=(C_word)a,a+=2,tmp);
+t36=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6124,a[2]=t35,a[3]=t31,a[4]=((C_word)li127),tmp=(C_word)a,a+=5,tmp));
+t37=((C_word*)t35)[1];
+f_6124(t37,t32,t33);}
+else{
+t31=(C_word)C_eqp(t1,lf[136]);
+t32=(C_truep(t31)?t31:(C_word)C_eqp(t1,lf[137]));
+if(C_truep(t32)){
+t33=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6178,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_word)C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 726 eval/meta */
+f_3526(t33,t34);}
+else{
+t33=(C_word)C_eqp(t1,lf[139]);
+if(C_truep(t33)){
+t34=(C_word)C_i_cadr(((C_word*)t0)[13]);
+/* eval.scm: 730 compile */
+t35=((C_word*)((C_word*)t0)[11])[1];
+f_3577(t35,((C_word*)t0)[14],t34,((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+else{
+t34=(C_word)C_eqp(t1,lf[140]);
+t35=(C_truep(t34)?t34:(C_word)C_eqp(t1,lf[141]));
+if(C_truep(t35)){
+/* eval.scm: 733 compile */
+t36=((C_word*)((C_word*)t0)[11])[1];
+f_3577(t36,((C_word*)t0)[14],lf[142],((C_word*)t0)[10],C_SCHEME_FALSE,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[12]);}
+else{
+t36=(C_word)C_eqp(t1,lf[143]);
+if(C_truep(t36)){
+t37=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6219,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_word)C_i_memq(lf[145],C_retrieve(lf[146])))){
+t38=(C_word)C_i_cdr(((C_word*)t0)[13]);
+t39=C_SCHEME_UNDEFINED;
+t40=(*a=C_VECTOR_TYPE|1,a[1]=t39,tmp=(C_word)a,a+=2,tmp);
+t41=C_set_block_item(t40,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6234,a[2]=t40,a[3]=((C_word*)t0)[12],a[4]=((C_word)li129),tmp=(C_word)a,a+=5,tmp));
+t42=((C_word*)t40)[1];
+f_6234(t42,t37,t38);}
+else{
+/* eval.scm: 738 ##sys#warn */
+t38=*((C_word*)lf[148]+1);
+((C_proc4)(void*)(*((C_word*)t38+1)))(4,t38,t37,lf[149],((C_word*)t0)[13]);}}
+else{
+t37=(C_word)C_eqp(t1,lf[150]);
+t38=(C_truep(t37)?t37:(C_word)C_eqp(t1,lf[151]));
+if(C_truep(t38)){
+t39=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6283,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: 742 rename */
+t40=((C_word*)((C_word*)t0)[4])[1];
+f_3404(t40,t39,lf[152],((C_word*)t0)[12]);}
+else{
+t39=(C_word)C_eqp(t1,lf[53]);
+t40=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_6300,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(t39)){
+t41=t40;
+f_6300(t41,t39);}
+else{
+t41=(C_word)C_eqp(t1,lf[157]);
+if(C_truep(t41)){
+t42=t40;
+f_6300(t42,t41);}
+else{
+t42=(C_word)C_eqp(t1,lf[158]);
+if(C_truep(t42)){
+t43=t40;
+f_6300(t43,t42);}
+else{
+t43=(C_word)C_eqp(t1,lf[159]);
+if(C_truep(t43)){
+t44=t40;
+f_6300(t44,t43);}
+else{
+t44=(C_word)C_eqp(t1,lf[160]);
+if(C_truep(t44)){
+t45=t40;
+f_6300(t45,t44);}
+else{
+t45=(C_word)C_eqp(t1,lf[161]);
+if(C_truep(t45)){
+t46=t40;
+f_6300(t46,t45);}
+else{
+t46=(C_word)C_eqp(t1,lf[162]);
+if(C_truep(t46)){
+t47=t40;
+f_6300(t47,t46);}
+else{
+t47=(C_word)C_eqp(t1,lf[163]);
+if(C_truep(t47)){
+t48=t40;
+f_6300(t48,t47);}
+else{
+t48=(C_word)C_eqp(t1,lf[164]);
+t49=t40;
+f_6300(t49,(C_truep(t48)?t48:(C_word)C_eqp(t1,lf[165])));}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}}
+
+/* k6298 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_6300(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: 749 ##sys#syntax-error-hook */
+t2=*((C_word*)lf[50]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[9],lf[153],((C_word*)t0)[8]);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[7],lf[154]);
+if(C_truep(t2)){
+t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
+/* eval.scm: 752 compile-call */
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_6529(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_word)C_eqp(((C_word*)t0)[7],lf[155]);
+if(C_truep(t3)){
+/* eval.scm: 756 ##sys#syntax-error-hook */
+t4=*((C_word*)lf[50]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[9],lf[156],((C_word*)t0)[8]);}
+else{
+/* eval.scm: 758 compile-call */
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_6529(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]);}}}}
+
+/* k6281 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_6283(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_6283,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6287,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_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k6285 in k6281 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_6287(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_6287,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+/* eval.scm: 742 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]);}
+
+/* loop1183 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_6234(C_word t0,C_word 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_6234,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_6242,a[2]=((C_word*)t0)[3],a[3]=((C_word)li128),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6249,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));
+/* g11901191 */
+t6=t3;
+f_6242(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6247 in loop1183 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_6249(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_6234(t3,((C_word*)t0)[2],t2);}
+
+/* g1190 in loop1183 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_6242(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_6242,NULL,3,t0,t1,t2);}
+/* eval.scm: 737 ##compiler#process-declaration */
+((C_proc4)C_retrieve_symbol_proc(lf[147]))(4,*((C_word*)lf[147]+1),t1,t2,((C_word*)t0)[2]);}
+
+/* k6217 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_6219(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 739 compile */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_3577(t2,((C_word*)t0)[6],lf[144],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6176 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_6178(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 727 compile */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_3577(t2,((C_word*)t0)[6],lf[138],((C_word*)t0)[5],C_SCHEME_FALSE,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop 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_6124(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_6124,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[134]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6136,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li125),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6146,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word)li126),tmp=(C_word)a,a+=5,tmp);
+/* ##sys#call-with-values */
+C_call_with_values(4,0,t1,t3,t4);}}
+
+/* a6145 in loop 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_6146(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_6146,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6162,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* eval.scm: 722 loop */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_6124(t6,t4,t5);}
+
+/* k6160 in a6145 in loop 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_6162(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_6162,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[69],t3));}
+
+/* a6135 in loop 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_6136(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_6136,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[3]);
+/* eval.scm: 721 ##sys#do-the-right-thing */
+t3=*((C_word*)lf[135]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k6116 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_6118(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 716 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]);}
+
+/* loop1096 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_6064(C_word t0,C_word 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_6064,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_6091,a[2]=((C_word*)t0)[5],a[3]=((C_word)li123),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6098,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));
+/* g11121113 */
+t6=t3;
+f_6091(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k6096 in loop1096 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_6098(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6098,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));
+/* loop10961109 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6064(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));
+/* loop10961109 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6064(t6,((C_word*)t0)[3],t5);}}
+
+/* g1112 in loop1096 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_6091(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_6091,NULL,3,t0,t1,t2);}
+/* eval.scm: 704 eval/meta */
+f_3526(t1,t2);}
+
+/* k5985 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_5987(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_5987,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5990,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[131]),t1);}
+
+/* k5988 in k5985 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_5990(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_5990,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5993,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: 707 ##sys#lookup-runtime-requirements */
+t3=*((C_word*)lf[132]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k5991 in k5988 in k5985 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_5993(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_5993,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(t1))){
+/* eval.scm: 708 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]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6010,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_6014,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_6016,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li122),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_6016(t11,t7,t1);}}
+
+/* loop1125 in k5991 in k5988 in k5985 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_6016(C_word t0,C_word 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_6016,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[55],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));
+/* loop11251138 */
+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));
+/* loop11251138 */
+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);}}
+
+/* k6012 in k5991 in k5988 in k5985 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_6014(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#append */
+t2=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* k6008 in k5991 in k5988 in k5985 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_6010(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_6010,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[131],t1);
+/* eval.scm: 708 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]);}
+
+/* k5968 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_5970(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_5970,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5974,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_i_cddr(((C_word*)t0)[8]);
+/* ##sys#append */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k5972 in k5968 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_5974(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_5974,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=(C_word)C_i_cadr(((C_word*)t0)[8]);
+/* eval.scm: 700 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]);}
+
+/* k5939 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 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_5941,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5945,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_word)C_i_cdr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k5943 in k5939 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_5945(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_5945,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+/* eval.scm: 697 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]);}
+
+/* k5682 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_5684(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_5684,2,t0,t1);}
+t2=(C_word)C_i_caddr(((C_word*)t0)[7]);
+t3=(C_word)C_eqp(C_SCHEME_TRUE,t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5690,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_5690(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_5828,a[2]=t4,a[3]=t6,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t10=(C_word)C_i_caddr(((C_word*)t0)[7]);
+/* eval.scm: 667 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[56]))(3,*((C_word*)lf[56]+1),t9,t10);}}
+
+/* k5826 in k5682 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_5828(C_word c,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_5828,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_5830,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)li121),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_5830(t5,((C_word*)t0)[2],t1);}
+
+/* loop990 in k5826 in k5682 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_5830(C_word t0,C_word 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_5830,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_5857,a[2]=((C_word*)t0)[5],a[3]=((C_word)li120),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5908,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));
+/* g10061007 */
+t6=t3;
+f_5857(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5906 in loop990 in k5826 in k5682 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_5908(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5908,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));
+/* loop9901003 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5830(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));
+/* loop9901003 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5830(t6,((C_word*)t0)[3],t5);}}
+
+/* g1006 in loop990 in k5826 in k5682 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_5857(C_word 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_5857,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_5870,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5881,a[2]=((C_word)li119),tmp=(C_word)a,a+=3,tmp);
+t5=t3;
+f_5870(t5,f_5881(t2));}
+else{
+t4=t3;
+f_5870(t4,C_SCHEME_FALSE);}}}
+
+/* loop in g1006 in loop990 in k5826 in k5682 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_5881(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_word)C_i_nullp(t1);
+if(C_truep(t2)){
+return(t2);}
+else{
+t3=(C_word)C_i_car(t1);
+if(C_truep((C_word)C_i_symbolp(t3))){
+t4=(C_word)C_i_cdr(t1);
+t6=t4;
+t1=t6;
+goto loop;}
+else{
+return(C_SCHEME_FALSE);}}}
+
+/* k5868 in g1006 in loop990 in k5826 in k5682 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_5870(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: 664 ##sys#syntax-error-hook */
+t2=*((C_word*)lf[50]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[124],lf[126],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k5688 in k5682 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_5690(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_5690,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5693,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_5818,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 668 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[44]))(2,*((C_word*)lf[44]+1),t3);}
+
+/* k5816 in k5688 in k5682 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_5818(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* eval.scm: 669 ##sys#syntax-error-hook */
+t2=*((C_word*)lf[50]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[124],lf[125],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_5693(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k5691 in k5688 in k5682 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_5693(C_word c,C_word t0,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_5693,2,t0,t1);}
+t2=C_retrieve(lf[44]);
+t3=C_retrieve(lf[111]);
+t4=C_retrieve(lf[45]);
+t5=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5696,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: 671 ##sys#register-module */
+((C_proc4)C_retrieve_symbol_proc(lf[123]))(4,*((C_word*)lf[123]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k5694 in k5691 in k5688 in k5682 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_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 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_5696,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[121]);
+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_5697,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)li114),tmp=(C_word)a,a+=9,tmp);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5724,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)li118),tmp=(C_word)a,a+=8,tmp);
+/* ##sys#dynamic-wind */
+t10=*((C_word*)lf[47]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,((C_word*)t0)[2],t8,t9,t8);}
+
+/* a5723 in k5694 in k5691 in k5688 in k5682 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_5724(C_word c,C_word t0,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_5724,2,t0,t1);}
+t2=(C_word)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_5734,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)li117),tmp=(C_word)a,a+=8,tmp));
+t6=((C_word*)t4)[1];
+f_5734(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+
+/* loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5734(C_word t0,C_word 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_5734,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5744,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 676 reverse */
+t5=((C_word*)t0)[6];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}
+else{
+t4=(C_word)C_i_cdr(t2);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5807,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_i_car(t2);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5815,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: 693 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t7);}}
+
+/* k5813 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5815(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 690 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);}
+
+/* k5805 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5807(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_5807,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+/* eval.scm: 688 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_5734(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k5742 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5744(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_5744,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5747,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_5792,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 677 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[44]))(2,*((C_word*)lf[44]+1),t3);}
+
+/* k5790 in k5742 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5792(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 677 ##sys#finalize-module */
+((C_proc3)C_retrieve_symbol_proc(lf[122]))(3,*((C_word*)lf[122]+1),((C_word*)t0)[2],t1);}
+
+/* k5745 in k5742 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5747(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_5747,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5748,a[2]=((C_word*)t0)[3],a[3]=((C_word)li116),tmp=(C_word)a,a+=4,tmp);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* f_5748 in k5745 in k5742 in loop in a5723 in k5694 in k5691 in k5688 in k5682 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_5748(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_5748,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_5754,a[2]=t2,a[3]=t4,a[4]=((C_word)li115),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_5754(t6,t1,((C_word*)t0)[2]);}
+
+/* loop2 */
+static void C_fcall f_5754(C_word t0,C_word 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_5754,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_retrieve(lf[43]));}
+else{
+t3=(C_word)C_slot(t2,C_fix(1));
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5779,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* g10761077 */
+t6=t4;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}
+else{
+t4=(C_word)C_slot(t2,C_fix(0));
+/* g10791080 */
+t5=t4;
+((C_proc3)C_retrieve_proc(t5))(3,t5,t1,((C_word*)t0)[2]);}}}
+
+/* k5777 in loop2 */
+static void C_ccall f_5779(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 685 loop2 */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_5754(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* swap1032 in k5694 in k5691 in k5688 in k5682 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_5697(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_5697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5701,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);
+/* g103510361047 */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5701(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_5701,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5704,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);
+/* g103510361047 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
+
+/* k5702 in k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5704(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_5704,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_5708,a[2]=((C_word*)t0)[2],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);
+/* g103710381048 */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k5706 in k5702 in k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5708(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_5708,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5711,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);
+/* g103710381048 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k5709 in k5706 in k5702 in k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5711(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_5711,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_5715,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);
+/* g103910401049 */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k5713 in k5709 in k5706 in k5702 in k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5715(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_5715,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5718,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* g103910401049 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k5716 in k5713 in k5709 in k5706 in k5702 in k5699 in swap1032 in k5694 in k5691 in k5688 in k5682 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_5718(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);}
+
+/* k5669 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 *a;
+/* eval.scm: 647 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]);}
+
+/* k5633 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_5635(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* eval.scm: 623 ##sys#check-syntax */
+t2=*((C_word*)lf[57]+1);
+((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[4],lf[107],((C_word*)t0)[3],lf[115],C_SCHEME_FALSE,((C_word*)t0)[2]);}
+else{
+/* eval.scm: 623 ##sys#check-syntax */
+t2=*((C_word*)lf[57]+1);
+((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[4],lf[107],((C_word*)t0)[3],lf[116],C_SCHEME_FALSE,((C_word*)t0)[2]);}}
+
+/* k5546 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_5548(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_5548,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5551,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_i_cadr(((C_word*)t0)[2]);
+if(C_truep((C_word)C_i_pairp(t3))){
+/* eval.scm: 629 caadr */
+t4=*((C_word*)lf[114]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,((C_word*)t0)[2]);}
+else{
+t4=t2;
+f_5551(2,t4,(C_word)C_i_cadr(((C_word*)t0)[2]));}}
+
+/* k5549 in k5546 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 t5;
+C_word ab[15],*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]=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],tmp=(C_word)a,a+=11,tmp);
+t3=(C_word)C_i_cadr(((C_word*)t0)[2]);
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5592,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 631 rename */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_3404(t5,t4,lf[92],((C_word*)t0)[5]);}
+else{
+t4=t2;
+f_5554(t4,(C_word)C_i_caddr(((C_word*)t0)[2]));}}
+
+/* k5590 in k5549 in k5546 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_5592(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_5592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5600,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 631 cdadr */
+t3=*((C_word*)lf[113]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k5598 in k5590 in k5549 in k5546 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_5600(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_5600,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5604,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t3=(C_word)C_i_cddr(((C_word*)t0)[2]);
+/* ##sys#append */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,C_SCHEME_END_OF_LIST);}
+
+/* k5602 in k5598 in k5590 in k5549 in k5546 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_5604(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_5604,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=((C_word*)t0)[3];
+f_5554(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+
+/* k5552 in k5549 in k5546 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_5554(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*)trf_5554,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_5557,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],tmp=(C_word)a,a+=10,tmp);
+/* eval.scm: 633 rename */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_3404(t3,t2,((C_word*)t0)[2],((C_word*)t0)[5]);}
+
+/* k5555 in k5552 in k5549 in k5546 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 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_5557,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5560,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_5582,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* eval.scm: 635 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[44]))(2,*((C_word*)lf[44]+1),t3);}
+
+/* k5580 in k5555 in k5552 in k5549 in k5546 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_5582(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 634 ##sys#register-syntax-export */
+((C_proc5)C_retrieve_symbol_proc(lf[112]))(5,*((C_word*)lf[112]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k5558 in k5555 in k5552 in k5549 in k5546 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_5560(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_5560,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5563,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_5570,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: 639 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[111]))(2,*((C_word*)lf[111]+1),t3);}
+
+/* k5568 in k5558 in k5555 in k5552 in k5549 in k5546 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_5570(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_5570,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5574,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_5578,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* eval.scm: 640 eval/meta */
+f_3526(t3,((C_word*)t0)[2]);}
+
+/* k5576 in k5568 in k5558 in k5555 in k5552 in k5549 in k5546 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_5578(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 640 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[103]))(3,*((C_word*)lf[103]+1),((C_word*)t0)[2],t1);}
+
+/* k5572 in k5568 in k5558 in k5555 in k5552 in k5549 in k5546 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_5574(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 637 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[110]))(5,*((C_word*)lf[110]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k5561 in k5558 in k5555 in k5552 in k5549 in k5546 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_5563(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* eval.scm: 641 compile */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_3577(t2,((C_word*)t0)[6],lf[109],((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_word)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)li113),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_word)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)li112),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_word)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_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));
+/* 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_word)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_word)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_word)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[103]))(3,*((C_word*)lf[103]+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_word)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[84]+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)li111),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_word)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)li110),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_5454(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);}}
+
+/* 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_word)C_i_cdr(t1);
+return((C_word)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_word)C_i_cddr(((C_word*)t0)[2]);
+/* eval.scm: 619 ##sys#canonicalize-body */
+t4=*((C_word*)lf[83]+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_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|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)li109),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_word)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)li108),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_word)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_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));
+/* 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_word)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_word)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_word)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[103]))(3,*((C_word*)lf[103]+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_word)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[84]+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_word)C_i_cddr(((C_word*)t0)[2]);
+/* eval.scm: 601 ##sys#canonicalize-body */
+t4=*((C_word*)lf[83]+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_word)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_word)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_word)C_a_i_cons(&a,2,t8,((C_word*)t4)[1]):(C_word)C_a_i_cons(&a,2,lf[94],((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[100]+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)li106),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)li107),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[99]))(6,*((C_word*)lf[99]+1),t1,((C_word*)((C_word*)t0)[4])[1],((C_word*)((C_word*)t0)[3])[1],*((C_word*)lf[50]+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)li105),tmp=(C_word)a,a+=9,tmp);
+/* eval.scm: 504 ##sys#decompose-lambda-list */
+t3=*((C_word*)lf[98]+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)li104),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_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[86]);
+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_word)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_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));
+/* 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_word)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)li103),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_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[85]+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_word)C_slot(t2,C_fix(0));
+t9=(C_word)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_word)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_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_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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t4=(C_word)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[84]+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_word)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[83]+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[38]+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[38]+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)li79),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)li81),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)li83),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)li85),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)li87),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)li89),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)li91),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)li93),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_word)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)li95),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)li97),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)li100),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)li102),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)li101),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[27]+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_word)C_i_length(t2);
+t4=(C_word)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[95]+1),t2);}
+else{
+/* eval.scm: 585 ##sys#error */
+t5=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,lf[97],((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_word)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)li99),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[27]+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_word)C_i_nullp(t2))){
+t6=(C_word)C_a_i_list(&a,1,t2);
+C_apply(4,0,t3,*((C_word*)lf[95]+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_6457,a[2]=t7,a[3]=t2,a[4]=((C_word)li98),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_6457(t9,t4,t5,C_fix(0),t2,C_SCHEME_FALSE);}}
+
+/* doloop1261 in a5159 */
+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 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_6457,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_eqp(t2,C_fix(0));
+if(C_truep(t6)){
+t7=(C_word)C_a_i_list(&a,1,t4);
+t8=(C_word)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_word)C_fixnum_difference(t2,C_fix(1));
+t8=(C_word)C_fixnum_plus(t3,C_fix(1));
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6486,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_word)C_eqp(C_SCHEME_END_OF_LIST,t4);
+if(C_truep(t10)){
+/* eval.scm: 771 ##sys#error */
+t11=*((C_word*)lf[14]+1);
+((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t9,lf[96],t2,t3);}
+else{
+t11=(C_word)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;}}}
+
+/* k6484 in doloop1261 in a5159 */
+static void C_ccall f_6486(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_6457(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[95]+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_word)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)li96),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[27]+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[95]+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_word)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)li94),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[27]+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_word)C_a_i_vector(&a,5,t2,t3,t4,t5,t6);
+t8=(C_word)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)li92),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[27]+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_word)C_a_i_vector(&a,3,t2,t3,t4);
+t6=(C_word)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)li90),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[27]+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_word)C_a_i_vector(&a,4,t2,t3,t4,t5);
+t7=(C_word)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)li88),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[27]+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_word)C_a_i_vector(&a,2,t2,t3);
+t5=(C_word)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)li86),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[27]+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_word)C_a_i_vector(&a,3,t2,t3,t4);
+t6=(C_word)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)li84),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[27]+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_word)C_a_i_vector(&a,1,t2);
+t4=(C_word)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)li82),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[27]+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_word)C_a_i_vector(&a,2,t2,t3);
+t5=(C_word)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)li80),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[27]+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_word)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)li78),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[27]+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_word)C_a_i_vector(&a,1,t2);
+t4=(C_word)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_word)C_i_cadr(((C_word*)t0)[9]);
+t3=(C_word)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)li77),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_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_list(&a,2,t4,lf[90]);
+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));
+/* 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_word)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)li76),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_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,t5,C_SCHEME_END_OF_LIST);
+t7=(C_word)C_a_i_cons(&a,2,t4,t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[74],t7);
+t9=(C_word)C_a_i_cons(&a,2,t8,C_SCHEME_END_OF_LIST);
+if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
+t10=(C_word)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_word)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_word)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[71]+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_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[79],t2);
+t4=(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST);
+/* ##sys#append */
+t5=*((C_word*)lf[71]+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_word)C_a_i_cons(&a,2,((C_word*)t0)[9],t1);
+t3=(C_word)C_a_i_cons(&a,2,lf[79],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_word)C_i_cadr(((C_word*)t0)[8]);
+t3=(C_word)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)li75),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_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));
+/* 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_word)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)li74),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_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[86]);
+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_word)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_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));
+/* 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_word)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_word)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)li73),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_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[85]+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_word)C_slot(t2,C_fix(0));
+t9=(C_word)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_word)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_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_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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t4=(C_word)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[84]+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_word)C_i_cddr(((C_word*)t0)[2]);
+/* eval.scm: 436 ##sys#canonicalize-body */
+t5=*((C_word*)lf[83]+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[38]+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[80]+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[80]+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[80]+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[80]+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)li72),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_word)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)li71),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_word)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_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));
+/* 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_word)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_word)C_i_cadr(t2);
+t4=(C_word)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)li70),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[82]+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)li69),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_word)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_word)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_word)C_i_setslot(((C_word*)t0)[6],((C_word*)t0)[5],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t4=(C_word)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_word)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_word)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[81]+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_word)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_word)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[80]+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_word)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[81]+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_word)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)li68),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_word)C_a_i_vector(&a,4,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5],t1);
+t3=(C_word)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_word)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[81]+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_word)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_word)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[80]+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_word)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)li67),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_word)C_a_i_vector(&a,3,((C_word*)t0)[6],((C_word*)t0)[5],t1);
+t3=(C_word)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_word)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[81]+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_word)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)li66),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_word)C_a_i_vector(&a,2,((C_word*)t0)[5],t1);
+t3=(C_word)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_word)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)li65),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_word)C_a_i_vector(&a,1,t1);
+t3=(C_word)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_word)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)li58),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)li64),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_word)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_word)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)li59),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)li60),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[54]))(4,*((C_word*)lf[54]+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[25]))){
+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[24]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve(lf[25]),t1,C_retrieve(lf[26]));}
+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)li63),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_word)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[14]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[76],((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_word)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)li61),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)li62),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[14]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,t1,lf[75],((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_word)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_word)C_i_setslot((C_word)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_word)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_word)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_word)C_slot(((C_word*)t0)[8],C_fix(1));
+t3=(C_word)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[70],((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_word)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_word)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_word)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_word)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_word)C_slot(((C_word*)t0)[2],C_fix(1));
+t5=(C_word)C_slot(t4,C_fix(1));
+/* ##sys#append */
+t6=*((C_word*)lf[71]+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_word)C_a_i_cons(&a,2,lf[69],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)li57),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_word)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)li56),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_word)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_word)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_word)C_i_cdddr(((C_word*)t0)[7]);
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(C_word)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[66],((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)li55),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_word)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)li52),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_word)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_word)C_i_cadr(((C_word*)t0)[2]);
+/* eval.scm: 348 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[56]))(3,*((C_word*)lf[56]+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)li43),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)li44),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)li45),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)li46),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)li47),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)li48),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_word)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)li49),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)li50),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_word)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)li29),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)li30),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_word)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[41]))(4,*((C_word*)lf[41]+1),t6,t3,lf[53]);}
+else{
+/* eval.scm: 298 ##sys#alias-global-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[54]))(4,*((C_word*)lf[54]+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[25]))){
+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[24]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_retrieve(lf[25]),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[33]))){
+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[52]))(3,*((C_word*)lf[52]+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_word)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_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_retrieve(lf[33]));
+t4=C_mutate((C_word*)lf[33]+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)f10827,a[2]=((C_word*)t0)[4],a[3]=((C_word)li32),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)f10832,a[2]=((C_word*)t0)[4],a[3]=((C_word)li33),tmp=(C_word)a,a+=4,tmp));}}
+
+/* f10832 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 f10832(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*)f10832,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_retrieve(((C_word*)t0)[2]));}
+
+/* f10827 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 f10827(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*)f10827,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)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[50]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[51],((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)li31),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_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=(C_word)C_eqp(((C_word*)t0)[3],t2);
+if(C_truep(t3)){
+/* eval.scm: 309 ##sys#error */
+t4=*((C_word*)lf[14]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[49],((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_word)C_slot((C_word)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_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)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[44]);
+t4=C_retrieve(lf[45]);
+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[48]))(2,*((C_word*)lf[48]+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)li24),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)li25),tmp=(C_word)a,a+=4,tmp);
+/* ##sys#dynamic-wind */
+t6=*((C_word*)lf[47]+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[46]))(2,*((C_word*)lf[46]+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[38]+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[43]);
+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)li22),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_word)C_i_nullp(t2))){
+/* eval.scm: 255 values */
+C_values(4,0,t1,C_SCHEME_FALSE,((C_word*)t0)[3]);}
+else{
+t4=(C_word)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)li20),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)li21),tmp=(C_word)a,a+=4,tmp);
+/* g318319 */
+t9=t8;
+f_3448(t9,t1,t7);}
+else{
+t8=(C_word)C_slot(t2,C_fix(1));
+t9=(C_word)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_word)C_i_nullp(t1))){
+return(C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_eqp(((C_word*)t0)[2],t3);
+if(C_truep(t4)){
+return(t2);}
+else{
+t5=(C_word)C_slot(t1,C_fix(1));
+t6=(C_word)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[41]))(4,*((C_word*)lf[41]+1),t2,((C_word*)t0)[2],lf[42]);}}
+
+/* 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_word)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[40]+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_word)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[39]+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_word)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[39]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}
+else{
+t2=(C_word)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)li15),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)li16),tmp=(C_word)a,a+=4,tmp);
+/* eval.scm: 216 ##sys#decorate-lambda */
+t8=*((C_word*)lf[32]+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[31]+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[30]+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[29]+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[28]+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_word)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_word)C_immp(t2))){
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+else{
+t3=(C_word)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_word)C_block_size(t2);
+/* eval.scm: 196 ##sys#hash-symbol */
+t7=*((C_word*)lf[18]+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_word)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)li13),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_word)C_i_nullp(t2))){
+if(C_truep(((C_word*)t0)[8])){
+t3=(C_word)C_a_i_vector(&a,3,((C_word*)t0)[7],((C_word*)t0)[6],C_SCHEME_TRUE);
+t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
+t5=(C_word)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_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)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_word)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_word)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)li11),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_word)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_word)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)li10),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_word)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)li9),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_word)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_word)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_word)C_slot(t2,C_fix(0));
+t4=(C_word)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_word)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[19]+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[20]+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[18]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,(C_word)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_word)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)li6),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_word)C_eqp(C_SCHEME_END_OF_LIST,t2);
+if(C_truep(t3)){
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[7],((C_word*)t0)[6]);
+t5=(C_word)C_a_i_cons(&a,2,t4,((C_word*)t0)[5]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],t5));}
+else{
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(C_word)C_slot(t4,C_fix(0));
+t6=(C_word)C_eqp(((C_word*)t0)[7],t5);
+if(C_truep(t6)){
+t7=(C_word)C_slot(t2,C_fix(0));
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_i_setslot(t7,C_fix(1),((C_word*)t0)[6]));}
+else{
+t7=(C_word)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[18]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,(C_word)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_word)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)li4),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_word)C_eqp(C_SCHEME_END_OF_LIST,t1);
+if(C_truep(t2)){
+return(C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)C_eqp(((C_word*)t0)[2],t4);
+if(C_truep(t5)){
+t6=(C_word)C_slot(t1,C_fix(0));
+return((C_word)C_slot(t6,C_fix(1)));}
+else{
+t6=(C_word)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_word)C_eqp(t2,((C_word*)((C_word*)t0)[3])[1]);
+if(C_truep(t4)){
+t5=(C_word)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_word)C_slot(t2,C_fix(1));
+t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,(C_word)C_hash_string(t6));
+t8=(C_word)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_proc(*((C_word*)lf[12]+1)))(3,*((C_word*)lf[12]+1),t2,lf[17]);}
+
+/* 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[16]+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_word)C_i_nullp(t2))){
+t4=t3;
+f_2995(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_2995(2,t5,(C_word)C_i_car(t2));}
+else{
+/* ##sys#error */
+t5=*((C_word*)lf[14]+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[13]+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);}}
+
+/* d in k2952 */
+static void C_ccall f_2956(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_2956r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2956r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2956r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+if(C_truep((C_word)C_i_nullp(t3))){
+/* eval.scm: 41 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[823] = {
+{"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_10702:eval_scm",(void*)f_10702},
+{"f_10706:eval_scm",(void*)f_10706},
+{"f_10731:eval_scm",(void*)f_10731},
+{"f_10721:eval_scm",(void*)f_10721},
+{"f_10729:eval_scm",(void*)f_10729},
+{"f_10714:eval_scm",(void*)f_10714},
+{"f_10709:eval_scm",(void*)f_10709},
+{"f_6852:eval_scm",(void*)f_6852},
+{"f_6947:eval_scm",(void*)f_6947},
+{"f_7028:eval_scm",(void*)f_7028},
+{"f_10696:eval_scm",(void*)f_10696},
+{"f_10692:eval_scm",(void*)f_10692},
+{"f_10688:eval_scm",(void*)f_10688},
+{"f_10684:eval_scm",(void*)f_10684},
+{"f_7595:eval_scm",(void*)f_7595},
+{"f_7600:eval_scm",(void*)f_7600},
+{"f_10656:eval_scm",(void*)f_10656},
+{"f_10635:eval_scm",(void*)f_10635},
+{"f_10642:eval_scm",(void*)f_10642},
+{"f_7607:eval_scm",(void*)f_7607},
+{"f_10599:eval_scm",(void*)f_10599},
+{"f_10628:eval_scm",(void*)f_10628},
+{"f_10591:eval_scm",(void*)f_10591},
+{"f_10593:eval_scm",(void*)f_10593},
+{"f_7616:eval_scm",(void*)f_7616},
+{"f_10560:eval_scm",(void*)f_10560},
+{"f_10580:eval_scm",(void*)f_10580},
+{"f_10576:eval_scm",(void*)f_10576},
+{"f_10566:eval_scm",(void*)f_10566},
+{"f_10563:eval_scm",(void*)f_10563},
+{"f_7970:eval_scm",(void*)f_7970},
+{"f_10506:eval_scm",(void*)f_10506},
+{"f_10520:eval_scm",(void*)f_10520},
+{"f_10556:eval_scm",(void*)f_10556},
+{"f_10552:eval_scm",(void*)f_10552},
+{"f_10540:eval_scm",(void*)f_10540},
+{"f_10544:eval_scm",(void*)f_10544},
+{"f_10514:eval_scm",(void*)f_10514},
+{"f_8909:eval_scm",(void*)f_8909},
+{"f_10409:eval_scm",(void*)f_10409},
+{"f_10446:eval_scm",(void*)f_10446},
+{"f_10449:eval_scm",(void*)f_10449},
+{"f_10472:eval_scm",(void*)f_10472},
+{"f_10476:eval_scm",(void*)f_10476},
+{"f_10458:eval_scm",(void*)f_10458},
+{"f_10455:eval_scm",(void*)f_10455},
+{"f_10412:eval_scm",(void*)f_10412},
+{"f_8912:eval_scm",(void*)f_8912},
+{"f_8970:eval_scm",(void*)f_8970},
+{"f_10407:eval_scm",(void*)f_10407},
+{"f_9321:eval_scm",(void*)f_9321},
+{"f_9325:eval_scm",(void*)f_9325},
+{"f_10403:eval_scm",(void*)f_10403},
+{"f_9328:eval_scm",(void*)f_9328},
+{"f_9332:eval_scm",(void*)f_9332},
+{"f_9606:eval_scm",(void*)f_9606},
+{"f_10395:eval_scm",(void*)f_10395},
+{"f_9628:eval_scm",(void*)f_9628},
+{"f_10013:eval_scm",(void*)f_10013},
+{"f_10386:eval_scm",(void*)f_10386},
+{"f_10393:eval_scm",(void*)f_10393},
+{"f_10376:eval_scm",(void*)f_10376},
+{"f_10361:eval_scm",(void*)f_10361},
+{"f_10365:eval_scm",(void*)f_10365},
+{"f_10370:eval_scm",(void*)f_10370},
+{"f_10374:eval_scm",(void*)f_10374},
+{"f_10339:eval_scm",(void*)f_10339},
+{"f_10343:eval_scm",(void*)f_10343},
+{"f_10348:eval_scm",(void*)f_10348},
+{"f_10352:eval_scm",(void*)f_10352},
+{"f_10359:eval_scm",(void*)f_10359},
+{"f_10313:eval_scm",(void*)f_10313},
+{"f_10319:eval_scm",(void*)f_10319},
+{"f_10323:eval_scm",(void*)f_10323},
+{"f_10337:eval_scm",(void*)f_10337},
+{"f_10326:eval_scm",(void*)f_10326},
+{"f_10333:eval_scm",(void*)f_10333},
+{"f_10297:eval_scm",(void*)f_10297},
+{"f_10303:eval_scm",(void*)f_10303},
+{"f_10311:eval_scm",(void*)f_10311},
+{"f_10260:eval_scm",(void*)f_10260},
+{"f_10264:eval_scm",(void*)f_10264},
+{"f_10269:eval_scm",(void*)f_10269},
+{"f_10273:eval_scm",(void*)f_10273},
+{"f_10295:eval_scm",(void*)f_10295},
+{"f_10291:eval_scm",(void*)f_10291},
+{"f_10287:eval_scm",(void*)f_10287},
+{"f_10276:eval_scm",(void*)f_10276},
+{"f_10283:eval_scm",(void*)f_10283},
+{"f_10234:eval_scm",(void*)f_10234},
+{"f_10240:eval_scm",(void*)f_10240},
+{"f_10244:eval_scm",(void*)f_10244},
+{"f_10258:eval_scm",(void*)f_10258},
+{"f_10247:eval_scm",(void*)f_10247},
+{"f_10254:eval_scm",(void*)f_10254},
+{"f_10221:eval_scm",(void*)f_10221},
+{"f_10195:eval_scm",(void*)f_10195},
+{"f_10199:eval_scm",(void*)f_10199},
+{"f_10204:eval_scm",(void*)f_10204},
+{"f_10208:eval_scm",(void*)f_10208},
+{"f_10219:eval_scm",(void*)f_10219},
+{"f_10215:eval_scm",(void*)f_10215},
+{"f_10179:eval_scm",(void*)f_10179},
+{"f_10185:eval_scm",(void*)f_10185},
+{"f_10193:eval_scm",(void*)f_10193},
+{"f_10167:eval_scm",(void*)f_10167},
+{"f_10173:eval_scm",(void*)f_10173},
+{"f_10177:eval_scm",(void*)f_10177},
+{"f_10158:eval_scm",(void*)f_10158},
+{"f_10162:eval_scm",(void*)f_10162},
+{"f_10099:eval_scm",(void*)f_10099},
+{"f_10109:eval_scm",(void*)f_10109},
+{"f_10134:eval_scm",(void*)f_10134},
+{"f_10146:eval_scm",(void*)f_10146},
+{"f_10152:eval_scm",(void*)f_10152},
+{"f_10140:eval_scm",(void*)f_10140},
+{"f_10115:eval_scm",(void*)f_10115},
+{"f_10121:eval_scm",(void*)f_10121},
+{"f_10125:eval_scm",(void*)f_10125},
+{"f_10128:eval_scm",(void*)f_10128},
+{"f_10132:eval_scm",(void*)f_10132},
+{"f_10104:eval_scm",(void*)f_10104},
+{"f_10024:eval_scm",(void*)f_10024},
+{"f_10034:eval_scm",(void*)f_10034},
+{"f_10037:eval_scm",(void*)f_10037},
+{"f_10051:eval_scm",(void*)f_10051},
+{"f_10069:eval_scm",(void*)f_10069},
+{"f_10038:eval_scm",(void*)f_10038},
+{"f_10015:eval_scm",(void*)f_10015},
+{"f_9649:eval_scm",(void*)f_9649},
+{"f_9693:eval_scm",(void*)f_9693},
+{"f_9696:eval_scm",(void*)f_9696},
+{"f_9998:eval_scm",(void*)f_9998},
+{"f_10002:eval_scm",(void*)f_10002},
+{"f_10006:eval_scm",(void*)f_10006},
+{"f_9778:eval_scm",(void*)f_9778},
+{"f_9784:eval_scm",(void*)f_9784},
+{"f_9981:eval_scm",(void*)f_9981},
+{"f_9987:eval_scm",(void*)f_9987},
+{"f_9791:eval_scm",(void*)f_9791},
+{"f_9794:eval_scm",(void*)f_9794},
+{"f_9800:eval_scm",(void*)f_9800},
+{"f_9979:eval_scm",(void*)f_9979},
+{"f_9809:eval_scm",(void*)f_9809},
+{"f_9812:eval_scm",(void*)f_9812},
+{"f_9827:eval_scm",(void*)f_9827},
+{"f_9845:eval_scm",(void*)f_9845},
+{"f_9966:eval_scm",(void*)f_9966},
+{"f_9962:eval_scm",(void*)f_9962},
+{"f_9933:eval_scm",(void*)f_9933},
+{"f_9861:eval_scm",(void*)f_9861},
+{"f_9869:eval_scm",(void*)f_9869},
+{"f_9881:eval_scm",(void*)f_9881},
+{"f_9884:eval_scm",(void*)f_9884},
+{"f_9896:eval_scm",(void*)f_9896},
+{"f_9899:eval_scm",(void*)f_9899},
+{"f_9887:eval_scm",(void*)f_9887},
+{"f_9913:eval_scm",(void*)f_9913},
+{"f_9864:eval_scm",(void*)f_9864},
+{"f_9849:eval_scm",(void*)f_9849},
+{"f_9831:eval_scm",(void*)f_9831},
+{"f_9674:eval_scm",(void*)f_9674},
+{"f_9679:eval_scm",(void*)f_9679},
+{"f_9834:eval_scm",(void*)f_9834},
+{"f_9818:eval_scm",(void*)f_9818},
+{"f_9713:eval_scm",(void*)f_9713},
+{"f_9718:eval_scm",(void*)f_9718},
+{"f_9721:eval_scm",(void*)f_9721},
+{"f_9726:eval_scm",(void*)f_9726},
+{"f_9733:eval_scm",(void*)f_9733},
+{"f_9773:eval_scm",(void*)f_9773},
+{"f_9736:eval_scm",(void*)f_9736},
+{"f_9748:eval_scm",(void*)f_9748},
+{"f_9757:eval_scm",(void*)f_9757},
+{"f_9751:eval_scm",(void*)f_9751},
+{"f_9739:eval_scm",(void*)f_9739},
+{"f_9742:eval_scm",(void*)f_9742},
+{"f_9704:eval_scm",(void*)f_9704},
+{"f_9698:eval_scm",(void*)f_9698},
+{"f_9652:eval_scm",(void*)f_9652},
+{"f_9658:eval_scm",(void*)f_9658},
+{"f_9646:eval_scm",(void*)f_9646},
+{"f_9630:eval_scm",(void*)f_9630},
+{"f_9641:eval_scm",(void*)f_9641},
+{"f_9644:eval_scm",(void*)f_9644},
+{"f_9634:eval_scm",(void*)f_9634},
+{"f_9611:eval_scm",(void*)f_9611},
+{"f_9620:eval_scm",(void*)f_9620},
+{"f_9615:eval_scm",(void*)f_9615},
+{"f_9551:eval_scm",(void*)f_9551},
+{"f_9555:eval_scm",(void*)f_9555},
+{"f_9558:eval_scm",(void*)f_9558},
+{"f_9561:eval_scm",(void*)f_9561},
+{"f_9564:eval_scm",(void*)f_9564},
+{"f_9567:eval_scm",(void*)f_9567},
+{"f_9570:eval_scm",(void*)f_9570},
+{"f_9573:eval_scm",(void*)f_9573},
+{"f_9576:eval_scm",(void*)f_9576},
+{"f_9579:eval_scm",(void*)f_9579},
+{"f_9530:eval_scm",(void*)f_9530},
+{"f_9534:eval_scm",(void*)f_9534},
+{"f_9537:eval_scm",(void*)f_9537},
+{"f_9506:eval_scm",(void*)f_9506},
+{"f_9512:eval_scm",(void*)f_9512},
+{"f_9522:eval_scm",(void*)f_9522},
+{"f_9357:eval_scm",(void*)f_9357},
+{"f_9361:eval_scm",(void*)f_9361},
+{"f_9428:eval_scm",(void*)f_9428},
+{"f_9475:eval_scm",(void*)f_9475},
+{"f_9485:eval_scm",(void*)f_9485},
+{"f_9438:eval_scm",(void*)f_9438},
+{"f_9440:eval_scm",(void*)f_9440},
+{"f_9464:eval_scm",(void*)f_9464},
+{"f_9450:eval_scm",(void*)f_9450},
+{"f_9398:eval_scm",(void*)f_9398},
+{"f_9363:eval_scm",(void*)f_9363},
+{"f_9379:eval_scm",(void*)f_9379},
+{"f_9385:eval_scm",(void*)f_9385},
+{"f_9376:eval_scm",(void*)f_9376},
+{"f_9338:eval_scm",(void*)f_9338},
+{"f_9342:eval_scm",(void*)f_9342},
+{"f_9305:eval_scm",(void*)f_9305},
+{"f_9307:eval_scm",(void*)f_9307},
+{"f_9311:eval_scm",(void*)f_9311},
+{"f_9267:eval_scm",(void*)f_9267},
+{"f_9274:eval_scm",(void*)f_9274},
+{"f_9281:eval_scm",(void*)f_9281},
+{"f_9223:eval_scm",(void*)f_9223},
+{"f_9256:eval_scm",(void*)f_9256},
+{"f_9243:eval_scm",(void*)f_9243},
+{"f_9220:eval_scm",(void*)f_9220},
+{"f_9101:eval_scm",(void*)f_9101},
+{"f_9195:eval_scm",(void*)f_9195},
+{"f_9205:eval_scm",(void*)f_9205},
+{"f_9193:eval_scm",(void*)f_9193},
+{"f_9122:eval_scm",(void*)f_9122},
+{"f_9146:eval_scm",(void*)f_9146},
+{"f_9165:eval_scm",(void*)f_9165},
+{"f_9140:eval_scm",(void*)f_9140},
+{"f_8993:eval_scm",(void*)f_8993},
+{"f_9003:eval_scm",(void*)f_9003},
+{"f_9008:eval_scm",(void*)f_9008},
+{"f_9035:eval_scm",(void*)f_9035},
+{"f_9064:eval_scm",(void*)f_9064},
+{"f_9068:eval_scm",(void*)f_9068},
+{"f_9029:eval_scm",(void*)f_9029},
+{"f_8977:eval_scm",(void*)f_8977},
+{"f_8914:eval_scm",(void*)f_8914},
+{"f_8918:eval_scm",(void*)f_8918},
+{"f_8926:eval_scm",(void*)f_8926},
+{"f_8870:eval_scm",(void*)f_8870},
+{"f_8902:eval_scm",(void*)f_8902},
+{"f_8888:eval_scm",(void*)f_8888},
+{"f_8314:eval_scm",(void*)f_8314},
+{"f_8738:eval_scm",(void*)f_8738},
+{"f_8750:eval_scm",(void*)f_8750},
+{"f_8780:eval_scm",(void*)f_8780},
+{"f_8782:eval_scm",(void*)f_8782},
+{"f_8819:eval_scm",(void*)f_8819},
+{"f_8809:eval_scm",(void*)f_8809},
+{"f_8804:eval_scm",(void*)f_8804},
+{"f_8800:eval_scm",(void*)f_8800},
+{"f_8383:eval_scm",(void*)f_8383},
+{"f_8393:eval_scm",(void*)f_8393},
+{"f_8555:eval_scm",(void*)f_8555},
+{"f_8700:eval_scm",(void*)f_8700},
+{"f_8707:eval_scm",(void*)f_8707},
+{"f_8570:eval_scm",(void*)f_8570},
+{"f_8589:eval_scm",(void*)f_8589},
+{"f_8621:eval_scm",(void*)f_8621},
+{"f_8615:eval_scm",(void*)f_8615},
+{"f_8611:eval_scm",(void*)f_8611},
+{"f_8593:eval_scm",(void*)f_8593},
+{"f_8585:eval_scm",(void*)f_8585},
+{"f_8577:eval_scm",(void*)f_8577},
+{"f_8460:eval_scm",(void*)f_8460},
+{"f_8481:eval_scm",(void*)f_8481},
+{"f_8489:eval_scm",(void*)f_8489},
+{"f_8477:eval_scm",(void*)f_8477},
+{"f_8413:eval_scm",(void*)f_8413},
+{"f_8400:eval_scm",(void*)f_8400},
+{"f_8342:eval_scm",(void*)f_8342},
+{"f_8361:eval_scm",(void*)f_8361},
+{"f_8354:eval_scm",(void*)f_8354},
+{"f_8317:eval_scm",(void*)f_8317},
+{"f_8336:eval_scm",(void*)f_8336},
+{"f_8330:eval_scm",(void*)f_8330},
+{"f_8265:eval_scm",(void*)f_8265},
+{"f_8271:eval_scm",(void*)f_8271},
+{"f_8285:eval_scm",(void*)f_8285},
+{"f_8288:eval_scm",(void*)f_8288},
+{"f_8295:eval_scm",(void*)f_8295},
+{"f_8259:eval_scm",(void*)f_8259},
+{"f_8226:eval_scm",(void*)f_8226},
+{"f_8230:eval_scm",(void*)f_8230},
+{"f_8236:eval_scm",(void*)f_8236},
+{"f_8239:eval_scm",(void*)f_8239},
+{"f_8257:eval_scm",(void*)f_8257},
+{"f_8242:eval_scm",(void*)f_8242},
+{"f_8246:eval_scm",(void*)f_8246},
+{"f_8213:eval_scm",(void*)f_8213},
+{"f_8219:eval_scm",(void*)f_8219},
+{"f_8199:eval_scm",(void*)f_8199},
+{"f_8210:eval_scm",(void*)f_8210},
+{"f_8157:eval_scm",(void*)f_8157},
+{"f_8163:eval_scm",(void*)f_8163},
+{"f_8178:eval_scm",(void*)f_8178},
+{"f_8073:eval_scm",(void*)f_8073},
+{"f_8077:eval_scm",(void*)f_8077},
+{"f_8133:eval_scm",(void*)f_8133},
+{"f_8080:eval_scm",(void*)f_8080},
+{"f_8083:eval_scm",(void*)f_8083},
+{"f_8110:eval_scm",(void*)f_8110},
+{"f_8116:eval_scm",(void*)f_8116},
+{"f_8098:eval_scm",(void*)f_8098},
+{"f_7974:eval_scm",(void*)f_7974},
+{"f_7978:eval_scm",(void*)f_7978},
+{"f_8026:eval_scm",(void*)f_8026},
+{"f_8028:eval_scm",(void*)f_8028},
+{"f_8041:eval_scm",(void*)f_8041},
+{"f_7980:eval_scm",(void*)f_7980},
+{"f_7984:eval_scm",(void*)f_7984},
+{"f_8019:eval_scm",(void*)f_8019},
+{"f_7990:eval_scm",(void*)f_7990},
+{"f_8000:eval_scm",(void*)f_8000},
+{"f_7993:eval_scm",(void*)f_7993},
+{"f_7810:eval_scm",(void*)f_7810},
+{"f_7915:eval_scm",(void*)f_7915},
+{"f_7932:eval_scm",(void*)f_7932},
+{"f_7940:eval_scm",(void*)f_7940},
+{"f_7832:eval_scm",(void*)f_7832},
+{"f_7837:eval_scm",(void*)f_7837},
+{"f_7876:eval_scm",(void*)f_7876},
+{"f_7863:eval_scm",(void*)f_7863},
+{"f_7813:eval_scm",(void*)f_7813},
+{"f_7724:eval_scm",(void*)f_7724},
+{"f_7731:eval_scm",(void*)f_7731},
+{"f_7741:eval_scm",(void*)f_7741},
+{"f_7618:eval_scm",(void*)f_7618},
+{"f_7622:eval_scm",(void*)f_7622},
+{"f_7714:eval_scm",(void*)f_7714},
+{"f_7718:eval_scm",(void*)f_7718},
+{"f_7631:eval_scm",(void*)f_7631},
+{"f_7700:eval_scm",(void*)f_7700},
+{"f_7696:eval_scm",(void*)f_7696},
+{"f_7634:eval_scm",(void*)f_7634},
+{"f_7683:eval_scm",(void*)f_7683},
+{"f_7686:eval_scm",(void*)f_7686},
+{"f_7689:eval_scm",(void*)f_7689},
+{"f_7637:eval_scm",(void*)f_7637},
+{"f_7642:eval_scm",(void*)f_7642},
+{"f_7676:eval_scm",(void*)f_7676},
+{"f_7655:eval_scm",(void*)f_7655},
+{"f_7609:eval_scm",(void*)f_7609},
+{"f_7569:eval_scm",(void*)f_7569},
+{"f_7590:eval_scm",(void*)f_7590},
+{"f_7573:eval_scm",(void*)f_7573},
+{"f_7587:eval_scm",(void*)f_7587},
+{"f_7576:eval_scm",(void*)f_7576},
+{"f_7584:eval_scm",(void*)f_7584},
+{"f_7579:eval_scm",(void*)f_7579},
+{"f_7526:eval_scm",(void*)f_7526},
+{"f_7534:eval_scm",(void*)f_7534},
+{"f_7538:eval_scm",(void*)f_7538},
+{"f_7497:eval_scm",(void*)f_7497},
+{"f_7505:eval_scm",(void*)f_7505},
+{"f_7076:eval_scm",(void*)f_7076},
+{"f_7449:eval_scm",(void*)f_7449},
+{"f_7444:eval_scm",(void*)f_7444},
+{"f_7078:eval_scm",(void*)f_7078},
+{"f_7443:eval_scm",(void*)f_7443},
+{"f_7082:eval_scm",(void*)f_7082},
+{"f_7365:eval_scm",(void*)f_7365},
+{"f_7380:eval_scm",(void*)f_7380},
+{"f_7383:eval_scm",(void*)f_7383},
+{"f_7386:eval_scm",(void*)f_7386},
+{"f_7392:eval_scm",(void*)f_7392},
+{"f_7395:eval_scm",(void*)f_7395},
+{"f_7401:eval_scm",(void*)f_7401},
+{"f_7085:eval_scm",(void*)f_7085},
+{"f_7356:eval_scm",(void*)f_7356},
+{"f_7344:eval_scm",(void*)f_7344},
+{"f_7347:eval_scm",(void*)f_7347},
+{"f_7350:eval_scm",(void*)f_7350},
+{"f_7091:eval_scm",(void*)f_7091},
+{"f_7329:eval_scm",(void*)f_7329},
+{"f_7301:eval_scm",(void*)f_7301},
+{"f_7325:eval_scm",(void*)f_7325},
+{"f_7321:eval_scm",(void*)f_7321},
+{"f_7317:eval_scm",(void*)f_7317},
+{"f_7094:eval_scm",(void*)f_7094},
+{"f_7102:eval_scm",(void*)f_7102},
+{"f_7288:eval_scm",(void*)f_7288},
+{"f_7106:eval_scm",(void*)f_7106},
+{"f_7276:eval_scm",(void*)f_7276},
+{"f_7127:eval_scm",(void*)f_7127},
+{"f_7131:eval_scm",(void*)f_7131},
+{"f_7267:eval_scm",(void*)f_7267},
+{"f_7139:eval_scm",(void*)f_7139},
+{"f_7143:eval_scm",(void*)f_7143},
+{"f_7261:eval_scm",(void*)f_7261},
+{"f_7146:eval_scm",(void*)f_7146},
+{"f_7149:eval_scm",(void*)f_7149},
+{"f_7154:eval_scm",(void*)f_7154},
+{"f_7164:eval_scm",(void*)f_7164},
+{"f_7210:eval_scm",(void*)f_7210},
+{"f_7219:eval_scm",(void*)f_7219},
+{"f_7237:eval_scm",(void*)f_7237},
+{"f_7227:eval_scm",(void*)f_7227},
+{"f_7231:eval_scm",(void*)f_7231},
+{"f_7176:eval_scm",(void*)f_7176},
+{"f_7183:eval_scm",(void*)f_7183},
+{"f_7194:eval_scm",(void*)f_7194},
+{"f_7205:eval_scm",(void*)f_7205},
+{"f_7198:eval_scm",(void*)f_7198},
+{"f_7188:eval_scm",(void*)f_7188},
+{"f_7167:eval_scm",(void*)f_7167},
+{"f_7174:eval_scm",(void*)f_7174},
+{"f_7136:eval_scm",(void*)f_7136},
+{"f_7116:eval_scm",(void*)f_7116},
+{"f_7107:eval_scm",(void*)f_7107},
+{"f_7097:eval_scm",(void*)f_7097},
+{"f_7030:eval_scm",(void*)f_7030},
+{"f_7040:eval_scm",(void*)f_7040},
+{"f_6955:eval_scm",(void*)f_6955},
+{"f_6967:eval_scm",(void*)f_6967},
+{"f_6980:eval_scm",(void*)f_6980},
+{"f_6962:eval_scm",(void*)f_6962},
+{"f_6949:eval_scm",(void*)f_6949},
+{"f_6865:eval_scm",(void*)f_6865},
+{"f_6878:eval_scm",(void*)f_6878},
+{"f_6911:eval_scm",(void*)f_6911},
+{"f_6892:eval_scm",(void*)f_6892},
+{"f_6868:eval_scm",(void*)f_6868},
+{"f_6855:eval_scm",(void*)f_6855},
+{"f_6863:eval_scm",(void*)f_6863},
+{"f_3359:eval_scm",(void*)f_3359},
+{"f_3363:eval_scm",(void*)f_3363},
+{"f_6529:eval_scm",(void*)f_6529},
+{"f_6533:eval_scm",(void*)f_6533},
+{"f_6780:eval_scm",(void*)f_6780},
+{"f_6814:eval_scm",(void*)f_6814},
+{"f_6807:eval_scm",(void*)f_6807},
+{"f_6722:eval_scm",(void*)f_6722},
+{"f_6723:eval_scm",(void*)f_6723},
+{"f_6727:eval_scm",(void*)f_6727},
+{"f_6734:eval_scm",(void*)f_6734},
+{"f_6740:eval_scm",(void*)f_6740},
+{"f_6774:eval_scm",(void*)f_6774},
+{"f_6767:eval_scm",(void*)f_6767},
+{"f_6738:eval_scm",(void*)f_6738},
+{"f_6679:eval_scm",(void*)f_6679},
+{"f_6682:eval_scm",(void*)f_6682},
+{"f_6685:eval_scm",(void*)f_6685},
+{"f_6688:eval_scm",(void*)f_6688},
+{"f_6689:eval_scm",(void*)f_6689},
+{"f_6693:eval_scm",(void*)f_6693},
+{"f_6696:eval_scm",(void*)f_6696},
+{"f_6703:eval_scm",(void*)f_6703},
+{"f_6707:eval_scm",(void*)f_6707},
+{"f_6711:eval_scm",(void*)f_6711},
+{"f_6715:eval_scm",(void*)f_6715},
+{"f_6637:eval_scm",(void*)f_6637},
+{"f_6640:eval_scm",(void*)f_6640},
+{"f_6643:eval_scm",(void*)f_6643},
+{"f_6644:eval_scm",(void*)f_6644},
+{"f_6648:eval_scm",(void*)f_6648},
+{"f_6651:eval_scm",(void*)f_6651},
+{"f_6658:eval_scm",(void*)f_6658},
+{"f_6662:eval_scm",(void*)f_6662},
+{"f_6666:eval_scm",(void*)f_6666},
+{"f_6602:eval_scm",(void*)f_6602},
+{"f_6605:eval_scm",(void*)f_6605},
+{"f_6606:eval_scm",(void*)f_6606},
+{"f_6610:eval_scm",(void*)f_6610},
+{"f_6613:eval_scm",(void*)f_6613},
+{"f_6620:eval_scm",(void*)f_6620},
+{"f_6624:eval_scm",(void*)f_6624},
+{"f_6574:eval_scm",(void*)f_6574},
+{"f_6575:eval_scm",(void*)f_6575},
+{"f_6579:eval_scm",(void*)f_6579},
+{"f_6582:eval_scm",(void*)f_6582},
+{"f_6589:eval_scm",(void*)f_6589},
+{"f_6555:eval_scm",(void*)f_6555},
+{"f11966:eval_scm",(void*)f11966},
+{"f11962:eval_scm",(void*)f11962},
+{"f_6503:eval_scm",(void*)f_6503},
+{"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_6300:eval_scm",(void*)f_6300},
+{"f_6283:eval_scm",(void*)f_6283},
+{"f_6287:eval_scm",(void*)f_6287},
+{"f_6234:eval_scm",(void*)f_6234},
+{"f_6249:eval_scm",(void*)f_6249},
+{"f_6242:eval_scm",(void*)f_6242},
+{"f_6219:eval_scm",(void*)f_6219},
+{"f_6178:eval_scm",(void*)f_6178},
+{"f_6124:eval_scm",(void*)f_6124},
+{"f_6146:eval_scm",(void*)f_6146},
+{"f_6162:eval_scm",(void*)f_6162},
+{"f_6136:eval_scm",(void*)f_6136},
+{"f_6118:eval_scm",(void*)f_6118},
+{"f_6064:eval_scm",(void*)f_6064},
+{"f_6098:eval_scm",(void*)f_6098},
+{"f_6091:eval_scm",(void*)f_6091},
+{"f_5987:eval_scm",(void*)f_5987},
+{"f_5990:eval_scm",(void*)f_5990},
+{"f_5993:eval_scm",(void*)f_5993},
+{"f_6016:eval_scm",(void*)f_6016},
+{"f_6014:eval_scm",(void*)f_6014},
+{"f_6010:eval_scm",(void*)f_6010},
+{"f_5970:eval_scm",(void*)f_5970},
+{"f_5974:eval_scm",(void*)f_5974},
+{"f_5941:eval_scm",(void*)f_5941},
+{"f_5945:eval_scm",(void*)f_5945},
+{"f_5684:eval_scm",(void*)f_5684},
+{"f_5828:eval_scm",(void*)f_5828},
+{"f_5830:eval_scm",(void*)f_5830},
+{"f_5908:eval_scm",(void*)f_5908},
+{"f_5857:eval_scm",(void*)f_5857},
+{"f_5881:eval_scm",(void*)f_5881},
+{"f_5870:eval_scm",(void*)f_5870},
+{"f_5690:eval_scm",(void*)f_5690},
+{"f_5818:eval_scm",(void*)f_5818},
+{"f_5693:eval_scm",(void*)f_5693},
+{"f_5696:eval_scm",(void*)f_5696},
+{"f_5724:eval_scm",(void*)f_5724},
+{"f_5734:eval_scm",(void*)f_5734},
+{"f_5815:eval_scm",(void*)f_5815},
+{"f_5807:eval_scm",(void*)f_5807},
+{"f_5744:eval_scm",(void*)f_5744},
+{"f_5792:eval_scm",(void*)f_5792},
+{"f_5747:eval_scm",(void*)f_5747},
+{"f_5748:eval_scm",(void*)f_5748},
+{"f_5754:eval_scm",(void*)f_5754},
+{"f_5779:eval_scm",(void*)f_5779},
+{"f_5697:eval_scm",(void*)f_5697},
+{"f_5701:eval_scm",(void*)f_5701},
+{"f_5704:eval_scm",(void*)f_5704},
+{"f_5708:eval_scm",(void*)f_5708},
+{"f_5711:eval_scm",(void*)f_5711},
+{"f_5715:eval_scm",(void*)f_5715},
+{"f_5718:eval_scm",(void*)f_5718},
+{"f_5671:eval_scm",(void*)f_5671},
+{"f_5635:eval_scm",(void*)f_5635},
+{"f_5548:eval_scm",(void*)f_5548},
+{"f_5551:eval_scm",(void*)f_5551},
+{"f_5592:eval_scm",(void*)f_5592},
+{"f_5600:eval_scm",(void*)f_5600},
+{"f_5604:eval_scm",(void*)f_5604},
+{"f_5554:eval_scm",(void*)f_5554},
+{"f_5557:eval_scm",(void*)f_5557},
+{"f_5582:eval_scm",(void*)f_5582},
+{"f_5560:eval_scm",(void*)f_5560},
+{"f_5570:eval_scm",(void*)f_5570},
+{"f_5578:eval_scm",(void*)f_5578},
+{"f_5574:eval_scm",(void*)f_5574},
+{"f_5563:eval_scm",(void*)f_5563},
+{"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_6457:eval_scm",(void*)f_6457},
+{"f_6486:eval_scm",(void*)f_6486},
+{"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},
+{"f10832:eval_scm",(void*)f10832},
+{"f10827:eval_scm",(void*)f10827},
+{"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},
+{"f_2956:eval_scm",(void*)f_2956},
+{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
new file mode 100644
index 00000000..69f5eabf
--- /dev/null
+++ b/bootstrap/expand.c
@@ -0,0 +1,23143 @@
+/* Generated from expand.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:26
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: expand.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -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[356];
+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,50,55,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,57,55,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,56,52,32,115,101,49,57,51,32,97,108,105,97,115,49,57,52,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,56,55,32,37,115,101,49,56,50,50,51,55,41};
+static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,49,56,54,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,55,55,32,46,32,116,109,112,49,55,54,49,55,56,41,0};
+static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,6),40,103,50,53,55,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,52,53,32,115,101,50,52,54,32,104,97,110,100,108,101,114,50,52,55,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,54,50,32,110,101,119,50,54,51,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,55,50,32,46,32,116,109,112,50,55,49,50,55,51,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,57,50,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,57,48,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,51,48,50,41,0};
+static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,12),40,99,111,112,121,32,112,115,51,50,54,41,0,0,0,0};
+static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,52,52,48,50,41,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,13),40,97,52,51,57,54,32,101,120,51,50,50,41,0,0,0};
+static C_char C_TLS li18[] C_aligned={C_lihdr(0,0,17),40,102,95,52,53,52,49,32,105,110,112,117,116,51,52,51,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,52,54,41,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,7),40,97,52,53,53,49,41,0};
+static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,7),40,97,52,53,53,55,41,0};
+static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,7),40,97,52,53,48,57,41,0};
+static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,7),40,97,52,53,55,49,41,0};
+static C_char C_TLS li24[] C_aligned={C_lihdr(0,0,20),40,97,52,53,54,53,32,46,32,97,114,103,115,51,49,55,51,53,53,41,0,0,0,0};
+static C_char C_TLS li25[] C_aligned={C_lihdr(0,0,7),40,97,52,53,48,51,41,0};
+static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,15),40,97,52,51,57,48,32,107,51,49,54,51,50,49,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,51,48,57,32,104,97,110,100,108,101,114,51,49,48,32,101,120,112,51,49,49,32,115,101,51,49,50,32,99,115,51,49,51,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,53,56,32,101,120,112,51,53,57,32,109,100,101,102,51,54,48,41,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,17),40,108,111,111,112,52,51,49,32,103,52,52,49,52,52,53,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,52,48,55,32,103,52,49,55,52,50,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,12),40,103,52,54,53,32,99,115,52,54,55,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,55,48,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,51,48,52,32,100,115,101,51,48,53,32,99,115,63,51,48,54,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,56,51,32,112,114,101,102,105,120,52,56,52,41,0,0};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,13),40,103,53,48,53,32,109,111,100,53,48,55,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,57,54,41};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,11),40,103,53,50,50,32,97,53,50,52,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,56,54,32,97,115,115,105,103,110,52,56,55,41,0,0,0,0,0,0};
+static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,7),40,97,53,48,56,48,41,0};
+static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,32),40,97,53,48,56,54,32,101,120,112,50,53,54,51,53,54,52,53,54,55,32,109,53,54,53,53,54,54,53,54,56,41};
+static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,101,120,112,53,54,48,41,0,0,0};
+static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,22),40,98,111,100,121,53,52,56,32,115,101,53,53,55,32,99,115,63,53,53,56,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,53,49,32,37,115,101,53,52,54,53,55,51,41,0,0};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,53,53,48,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,52,49,32,46,32,116,109,112,53,52,48,53,52,50,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,56,48,41,0,0};
+static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,12),40,101,114,114,32,109,115,103,54,48,57,41,0,0,0,0};
+static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,11),40,103,54,53,52,32,107,54,53,54,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,51,56,32,103,54,52,56,54,53,50,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,54,50,48,32,114,101,113,54,50,49,32,111,112,116,54,50,50,32,107,101,121,54,50,51,32,108,108,105,115,116,54,50,52,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,54,48,51,32,98,111,100,121,54,48,52,32,101,114,114,104,54,48,53,32,115,101,54,48,54,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,56,54,32,101,120,112,115,55,56,55,41,0};
+static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,17),40,97,54,48,48,52,32,118,56,55,55,32,116,56,55,56,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,53,50,32,103,56,54,50,56,54,54,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,54,55,32,118,115,56,52,55,32,120,56,52,56,41,0,0,0,0,0,0};
+static C_char C_TLS li57[] C_aligned={C_lihdr(0,0,17),40,97,54,48,54,57,32,118,56,52,49,32,120,56,52,50,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,56,49,57,32,103,56,50,57,56,51,51,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,55,56,32,118,97,108,115,55,55,57,32,109,118,97,114,115,55,56,48,32,109,118,97,108,115,55,56,49,32,98,111,100,121,55,56,50,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,57,49,32,100,101,102,115,56,57,50,32,100,111,110,101,56,57,51,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,56,53,32,118,97,108,115,56,56,54,32,109,118,97,114,115,56,56,55,32,109,118,97,108,115,56,56,56,32,98,111,100,121,56,56,57,41,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,50,32,120,57,53,49,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,57,50,51,32,118,97,114,115,57,50,52,32,118,97,108,115,57,50,53,32,109,118,97,114,115,57,50,54,32,109,118,97,108,115,57,50,55,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,57,50,49,41};
+static C_char C_TLS li65[] C_aligned={C_lihdr(0,0,22),40,98,111,100,121,55,54,52,32,115,101,55,55,51,32,99,115,63,55,55,52,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,54,55,32,37,115,101,55,54,50,57,56,50,41,0,0};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,11),40,100,101,102,45,115,101,55,54,54,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,53,55,32,46,32,116,109,112,55,53,54,55,53,56,41,0,0,0};
+static C_char C_TLS li69[] C_aligned={C_lihdr(0,0,7),40,103,49,48,49,49,41,0};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,17),40,109,119,97,108,107,32,120,57,57,53,32,112,57,57,54,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,56,56,32,112,97,116,57,56,57,32,118,97,114,115,57,57,48,41};
+static C_char C_TLS li72[] C_aligned={C_lihdr(0,0,24),40,108,111,111,112,32,104,101,97,100,49,48,50,52,32,98,111,100,121,49,48,50,53,41};
+static C_char C_TLS li73[] C_aligned={C_lihdr(0,0,54),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,49,48,49,57,32,98,111,100,121,49,48,50,48,32,115,101,49,48,50,49,41,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,51,56,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,52,48,41,0};
+static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,7),40,103,49,48,53,56,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,52,50,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,49,48,48,32,112,114,101,100,49,49,48,49,32,109,115,103,49,49,48,50,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,49,48,53,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,49,49,54,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,49,48,57,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,51,52,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,54,57,32,120,49,49,55,51,32,110,49,49,55,52,41};
+static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,13),40,97,55,50,50,51,32,121,49,49,56,56,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,53,48,32,112,49,49,53,49,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,56,51,32,99,117,108,112,114,105,116,49,48,57,50,32,115,101,49,48,57,51,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,56,54,32,37,99,117,108,112,114,105,116,49,48,56,49,49,50,48,48,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,56,53,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,55,52,32,101,120,112,49,48,55,53,32,112,97,116,49,48,55,54,32,46,32,116,109,112,49,48,55,51,49,48,55,55,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,50,48,55,41,0,0,0,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,13),40,103,49,50,51,49,32,97,49,50,51,51,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,50,49,54,41};
+static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,7),40,103,49,51,48,49,41,0};
+static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,7),40,103,49,51,49,50,41,0};
+static C_char C_TLS li96[] C_aligned={C_lihdr(0,0,23),40,99,111,109,112,97,114,101,32,115,49,49,50,53,48,32,115,50,49,50,53,49,41,0};
+static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,32),40,102,95,55,51,53,54,32,102,111,114,109,49,50,48,57,32,115,101,49,50,49,48,32,100,115,101,49,50,49,49,41};
+static C_char C_TLS li98[] 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,50,48,56,41,0,0,0,0,0,0};
+static C_char C_TLS li99[] C_aligned={C_lihdr(0,0,17),40,114,101,115,111,108,118,101,32,115,121,109,49,51,52,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,13),40,116,111,115,116,114,32,120,49,51,52,57,41,0,0,0};
+static C_char C_TLS li101[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,49,51,54,57,41,0,0,0,0,0,0};
+static C_char C_TLS li102[] C_aligned={C_lihdr(0,0,7),40,97,55,55,48,50,41,0};
+static C_char C_TLS li103[] 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,54,41,0,0};
+static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,13),40,103,49,52,55,49,32,97,49,52,55,51,41,0,0,0};
+static C_char C_TLS li105[] C_aligned={C_lihdr(0,0,13),40,103,49,52,55,53,32,97,49,52,55,55,41,0,0,0};
+static C_char C_TLS li106[] C_aligned={C_lihdr(0,0,26),40,108,111,111,112,32,105,100,115,49,52,54,48,32,118,49,52,54,49,32,115,49,52,54,50,41,0,0,0,0,0,0};
+static C_char C_TLS li107[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,51,56,32,103,49,52,52,56,49,52,53,50,41,0,0,0,0};
+static C_char C_TLS li108[] C_aligned={C_lihdr(0,0,21),40,108,111,111,112,32,105,109,112,115,49,53,49,52,32,115,49,53,49,53,41,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,118,49,53,48,53,32,118,49,53,48,54,41,0,0,0};
+static C_char C_TLS li110[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,52,56,51,32,103,49,52,57,51,49,52,57,55,41,0,0,0,0};
+static C_char C_TLS li111[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,52,55,32,103,49,53,53,49,49,53,53,51,41,0,0,0,0};
+static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,13),40,103,49,53,54,49,32,97,49,53,54,51,41,0,0,0};
+static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,13),40,103,49,53,54,53,32,97,49,53,54,55,41,0,0,0};
+static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,44),40,108,111,111,112,32,105,109,112,118,49,53,50,54,32,105,109,112,115,49,53,50,55,32,118,49,53,50,56,32,115,49,53,50,57,32,105,100,115,49,53,51,48,41,0,0,0,0};
+static C_char C_TLS li115[] C_aligned={C_lihdr(0,0,13),40,114,101,110,32,105,109,112,49,53,55,50,41,0,0,0};
+static C_char C_TLS li116[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,57,56,32,103,49,54,48,56,49,54,49,50,41,0,0,0,0};
+static C_char C_TLS li117[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,53,55,53,32,103,49,53,56,53,49,53,56,57,41,0,0,0,0};
+static C_char C_TLS li118[] 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,50,41,0,0};
+static C_char C_TLS li119[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,49,54,32,103,49,55,50,54,49,55,51,48,41,0,0,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,57,51,32,103,49,55,48,51,49,55,48,55,41,0,0,0,0};
+static C_char C_TLS li121[] C_aligned={C_lihdr(0,0,15),40,103,49,54,55,56,32,105,109,112,49,54,56,48,41,0};
+static C_char C_TLS li122[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,55,49,32,103,49,54,55,53,49,54,55,55,41,0,0,0,0};
+static C_char C_TLS li123[] C_aligned={C_lihdr(0,0,15),40,103,49,54,53,51,32,105,109,112,49,54,53,53,41,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,52,54,32,103,49,54,53,48,49,54,53,50,41,0,0,0,0};
+static C_char C_TLS li125[] C_aligned={C_lihdr(0,0,16),40,103,49,54,51,51,32,115,112,101,99,49,54,51,53,41};
+static C_char C_TLS li126[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,54,50,54,32,103,49,54,51,48,49,54,51,50,41,0,0,0,0};
+static C_char C_TLS li127[] 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,55,32,114,49,51,50,56,32,99,49,51,50,57,32,105,109,112,111,114,116,45,101,110,118,49,51,51,48,32,109,97,99,114,111,45,101,110,118,49,51,51,49,32,109,101,116,97,63,49,51,51,50,32,114,101,101,120,112,63,49,51,51,51,32,108,111,99,49,51,51,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li128[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,55,54,56,32,103,49,55,55,50,49,55,55,52,41,0,0,0,0};
+static C_char C_TLS li129[] 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,53,41};
+static C_char C_TLS li130[] C_aligned={C_lihdr(0,0,14),40,102,95,56,57,53,49,32,120,50,52,53,48,41,0,0};
+static C_char C_TLS li131[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,52,53,56,32,103,50,52,54,56,50,52,55,50,41,0,0,0,0};
+static C_char C_TLS li132[] C_aligned={C_lihdr(0,0,18),40,102,95,56,57,53,55,32,114,117,108,101,115,50,52,53,49,41,0,0,0,0,0,0};
+static C_char C_TLS li133[] C_aligned={C_lihdr(0,0,13),40,97,57,49,51,49,32,120,50,52,57,48,41,0,0,0};
+static C_char C_TLS li134[] C_aligned={C_lihdr(0,0,17),40,102,95,57,48,56,50,32,114,117,108,101,50,52,55,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li135[] C_aligned={C_lihdr(0,0,30),40,102,95,57,49,54,54,32,105,110,112,117,116,50,52,57,49,32,112,97,116,116,101,114,110,50,52,57,50,41,0,0};
+static C_char C_TLS li136[] C_aligned={C_lihdr(0,0,30),40,102,95,57,51,56,55,32,105,110,112,117,116,50,53,51,55,32,112,97,116,116,101,114,110,50,53,51,56,41,0,0};
+static C_char C_TLS li137[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,50,53,55,50,41,0,0,0,0,0,0};
+static C_char C_TLS li138[] C_aligned={C_lihdr(0,0,30),40,102,95,57,53,48,57,32,105,110,112,117,116,50,53,53,50,32,112,97,116,116,101,114,110,50,53,53,51,41,0,0};
+static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,13),40,97,57,56,51,53,32,120,50,54,48,51,41,0,0,0};
+static C_char C_TLS li140[] C_aligned={C_lihdr(0,0,10),40,108,112,32,105,50,54,50,54,41,0,0,0,0,0,0};
+static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,39),40,102,95,57,55,57,55,32,112,97,116,116,101,114,110,50,53,57,52,32,112,97,116,104,50,53,57,53,32,109,97,112,105,116,50,53,57,54,41,0};
+static C_char C_TLS li142[] C_aligned={C_lihdr(0,0,26),40,100,111,108,111,111,112,50,54,55,48,32,100,50,54,55,52,32,103,101,110,50,54,55,53,41,0,0,0,0,0,0};
+static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,38),40,102,95,49,48,48,48,52,32,116,101,109,112,108,97,116,101,50,54,51,56,32,100,105,109,50,54,51,57,32,101,110,118,50,54,52,48,41,0,0};
+static C_char C_TLS li144[] C_aligned={C_lihdr(0,0,38),40,102,95,49,48,50,53,56,32,112,97,116,116,101,114,110,50,54,57,55,32,100,105,109,50,54,57,56,32,118,97,114,115,50,54,57,57,41,0,0};
+static C_char C_TLS li145[] C_aligned={C_lihdr(0,0,47),40,102,95,49,48,51,51,49,32,116,101,109,112,108,97,116,101,50,55,48,54,32,100,105,109,50,55,48,55,32,101,110,118,50,55,48,56,32,102,114,101,101,50,55,48,57,41,0};
+static C_char C_TLS li146[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,52,50,52,32,112,97,116,116,101,114,110,50,55,50,49,41,0,0,0};
+static C_char C_TLS li147[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,52,52,54,32,112,97,116,116,101,114,110,50,55,50,57,41,0,0,0};
+static C_char C_TLS li148[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,52,55,50,32,112,97,116,116,101,114,110,50,55,51,52,41,0,0,0};
+static C_char C_TLS li149[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,112,97,116,116,101,114,110,50,55,51,55,41,0,0,0,0,0,0};
+static C_char C_TLS li150[] C_aligned={C_lihdr(0,0,21),40,102,95,49,48,52,57,50,32,112,97,116,116,101,114,110,50,55,51,53,41,0,0,0};
+static C_char C_TLS li151[] 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,51,57,50,32,114,117,108,101,115,50,51,57,51,32,115,117,98,107,101,121,119,111,114,100,115,50,51,57,52,32,114,50,51,57,53,32,99,50,51,57,54,41,0};
+static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,109,101,50,56,49,49,41,0,0,0};
+static C_char C_TLS li153[] 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,48,50,32,46,32,116,109,112,50,56,48,49,50,56,48,51,41,0,0,0,0,0,0};
+static C_char C_TLS li154[] C_aligned={C_lihdr(0,0,16),40,103,50,56,52,50,32,115,100,101,102,50,56,52,52,41};
+static C_char C_TLS li155[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,56,51,53,32,103,50,56,51,57,50,56,52,49,41,0,0,0,0};
+static C_char C_TLS li156[] 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,50,53,32,46,32,116,109,112,50,56,50,52,50,56,50,54,41,0,0,0,0};
+static C_char C_TLS li157[] C_aligned={C_lihdr(0,0,23),40,109,111,100,117,108,101,45,110,97,109,101,32,120,50,56,53,53,50,56,55,49,41,0};
+static C_char C_TLS li158[] 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,53,53,50,56,57,56,32,121,50,56,53,54,50,56,57,57,41};
+static C_char C_TLS li159[] 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,53,53,50,57,48,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li160[] 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,53,54,41,0,0,0,0};
+static C_char C_TLS li161[] 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,54,57,32,46,32,116,109,112,50,57,54,56,50,57,55,48,41,0,0,0,0,0,0};
+static C_char C_TLS li162[] 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,50,57,56,53,32,109,111,100,50,57,56,54,32,101,120,112,50,57,56,55,32,118,97,108,50,57,56,56,41};
+static C_char C_TLS li163[] 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,50,57,57,48,41};
+static C_char C_TLS li164[] 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,50,57,57,54,32,101,110,118,50,57,57,55,32,115,101,110,118,50,57,57,56,41,0,0,0,0,0,0};
+static C_char C_TLS li165[] 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,48,57,32,109,111,100,51,48,49,48,41,0};
+static C_char C_TLS li166[] 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,51,49,32,109,111,100,51,48,51,50,32,118,97,108,51,48,51,51,41,0,0};
+static C_char C_TLS li167[] 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,53,52,32,109,111,100,51,48,53,53,41,0,0,0,0,0,0};
+static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,23),40,98,111,100,121,51,48,55,54,32,115,101,120,112,111,114,116,115,51,48,56,54,41,0};
+static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,18),40,100,101,102,45,115,101,120,112,111,114,116,115,51,48,55,57,41,0,0,0,0,0,0};
+static C_char C_TLS li170[] 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,54,56,32,101,120,112,108,105,115,116,51,48,54,57,32,46,32,116,109,112,51,48,54,55,51,48,55,48,41,0,0,0,0,0,0};
+static C_char C_TLS li171[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,49,48,48,32,103,51,49,48,52,51,49,48,54,41,0,0,0,0};
+static C_char C_TLS li172[] 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,48,57,55,41,0,0,0,0};
+static C_char C_TLS li173[] C_aligned={C_lihdr(0,0,21),40,119,97,114,110,32,109,115,103,51,49,51,56,32,105,100,51,49,51,57,41,0,0,0};
+static C_char C_TLS li174[] C_aligned={C_lihdr(0,0,13),40,103,51,49,53,57,32,97,51,49,54,49,41,0,0,0};
+static C_char C_TLS li175[] C_aligned={C_lihdr(0,0,13),40,103,51,49,54,56,32,97,51,49,55,48,41,0,0,0};
+static C_char C_TLS li176[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,32,105,101,120,112,111,114,116,115,51,49,52,57,41,0,0,0,0};
+static C_char C_TLS li177[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,101,120,112,111,114,116,115,51,49,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li178[] 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,49,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,115,101,51,49,56,57,41,0,0,0};
+static C_char C_TLS li180[] C_aligned={C_lihdr(0,0,18),40,109,101,114,103,101,45,115,101,32,115,101,115,51,49,56,52,41,0,0,0,0,0,0};
+static C_char C_TLS li181[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,115,100,51,51,49,56,41,0,0,0};
+static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,19),40,103,51,50,57,50,32,115,101,120,112,111,114,116,51,50,57,52,41,0,0,0,0,0};
+static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,50,55,54,32,103,51,50,56,54,51,50,57,48,41,0,0,0,0};
+static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,50,52,52,32,103,51,50,53,52,51,50,53,56,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,50,49,32,103,51,50,51,49,51,50,51,53,41,0,0,0,0};
+static C_char C_TLS li186[] 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,48,49,41,0,0,0,0};
+static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,7),40,103,51,52,55,48,41,0};
+static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,54,51,32,103,51,52,54,55,51,52,54,57,41,0,0,0,0};
+static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,7),40,103,51,52,53,52,41,0};
+static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,52,55,32,103,51,52,53,49,51,52,53,51,41,0,0,0,0};
+static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,7),40,103,51,52,52,48,41,0};
+static C_char C_TLS li192[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,52,51,51,32,103,51,52,51,55,51,52,51,57,41,0,0,0,0};
+static C_char C_TLS li193[] 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 li194[] 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 li195[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,51,53,55,32,103,51,51,54,55,51,51,55,49,41,0,0,0,0};
+static C_char C_TLS li196[] 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,51,56,32,105,101,120,112,111,114,116,115,51,51,51,57,32,118,101,120,112,111,114,116,115,51,51,52,48,32,115,101,120,112,111,114,116,115,51,51,52,49,32,46,32,116,109,112,51,51,51,55,51,51,52,50,41,0,0};
+static C_char C_TLS li197[] 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,52,56,50,41,0};
+static C_char C_TLS li198[] C_aligned={C_lihdr(0,0,14),40,103,51,53,52,53,32,115,101,51,53,52,55,41,0,0};
+static C_char C_TLS li199[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,53,50,57,32,103,51,53,51,57,51,53,52,51,41,0,0,0,0};
+static C_char C_TLS li200[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,53,48,53,32,103,51,53,49,53,51,53,49,57,41,0,0,0,0};
+static C_char C_TLS li201[] 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,52,57,50,32,118,101,120,112,111,114,116,115,51,52,57,51,32,46,32,116,109,112,51,52,57,49,51,52,57,52,41,0,0,0};
+static C_char C_TLS li202[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,120,108,51,53,54,51,41,0,0,0};
+static C_char C_TLS li203[] 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,53,56,32,109,111,100,51,53,53,57,32,105,110,100,105,114,101,99,116,51,53,54,48,41};
+static C_char C_TLS li204[] C_aligned={C_lihdr(0,0,13),40,103,51,55,50,56,32,109,51,55,51,48,41,0,0,0};
+static C_char C_TLS li205[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,55,50,49,32,103,51,55,50,53,51,55,50,55,41,0,0,0,0};
+static C_char C_TLS li206[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,54,56,53,32,103,51,54,57,53,51,54,57,57,41,0,0,0,0};
+static C_char C_TLS li207[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,51,54,55,51,41,0,0};
+static C_char C_TLS li208[] C_aligned={C_lihdr(0,0,13),40,103,51,54,54,51,32,117,51,54,54,53,41,0,0,0};
+static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,54,53,54,32,103,51,54,54,48,51,54,54,50,41,0,0,0,0};
+static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,120,108,51,54,51,51,41,0,0,0};
+static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,13),40,108,111,111,112,32,109,101,51,54,50,51,41,0,0,0};
+static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,53,57,57,32,103,51,54,48,57,51,54,49,51,41,0,0,0,0};
+static C_char C_TLS li213[] 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,53,56,57,41,0};
+static C_char C_TLS li214[] C_aligned={C_lihdr(0,0,28),40,97,49,51,51,52,53,32,101,120,112,50,51,55,56,32,114,50,51,55,57,32,99,50,51,56,48,41,0,0,0,0};
+static C_char C_TLS li215[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,51,53,51,32,103,50,51,54,51,50,51,54,55,41,0,0,0,0};
+static C_char C_TLS li216[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li217[] C_aligned={C_lihdr(0,0,15),40,103,50,51,51,51,32,101,120,112,50,51,51,53,41,0};
+static C_char C_TLS li218[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,51,50,54,32,103,50,51,51,48,50,51,51,50,41,0,0,0,0};
+static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,26),40,97,49,51,51,56,50,32,120,50,51,49,55,32,114,50,51,49,56,32,99,50,51,49,57,41,0,0,0,0,0,0};
+static C_char C_TLS li220[] C_aligned={C_lihdr(0,0,26),40,97,49,51,53,52,50,32,120,50,51,48,52,32,114,50,51,48,53,32,99,50,51,48,54,41,0,0,0,0,0,0};
+static C_char C_TLS li221[] C_aligned={C_lihdr(0,0,26),40,97,49,51,53,56,54,32,120,50,50,57,54,32,114,50,50,57,55,32,99,50,50,57,56,41,0,0,0,0,0,0};
+static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,26),40,97,49,51,54,51,55,32,120,50,50,56,56,32,114,50,50,56,57,32,99,50,50,57,48,41,0,0,0,0,0,0};
+static C_char C_TLS li223[] C_aligned={C_lihdr(0,0,26),40,97,49,51,54,53,56,32,120,50,50,56,48,32,114,50,50,56,49,32,99,50,50,56,50,41,0,0,0,0,0,0};
+static C_char C_TLS li224[] C_aligned={C_lihdr(0,0,11),40,101,114,114,32,120,50,49,56,57,41,0,0,0,0,0};
+static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,13),40,116,101,115,116,32,102,120,50,49,57,48,41,0,0,0};
+static C_char C_TLS li226[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,50,51,55,32,103,50,50,52,55,50,50,53,49,41,0,0,0,0};
+static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,16),40,101,120,112,97,110,100,32,99,108,115,50,50,50,56,41};
+static C_char C_TLS li228[] C_aligned={C_lihdr(0,0,29),40,97,49,51,54,55,57,32,102,111,114,109,50,49,55,57,32,114,50,49,56,48,32,99,50,49,56,49,41,0,0,0};
+static C_char C_TLS li229[] C_aligned={C_lihdr(0,0,29),40,97,49,51,57,57,56,32,102,111,114,109,50,49,55,49,32,114,50,49,55,50,32,99,50,49,55,51,41,0,0,0};
+static C_char C_TLS li230[] C_aligned={C_lihdr(0,0,18),40,119,97,108,107,32,120,50,48,55,56,32,110,50,48,55,57,41,0,0,0,0,0,0};
+static C_char C_TLS li231[] C_aligned={C_lihdr(0,0,19),40,119,97,108,107,49,32,120,50,48,56,48,32,110,50,48,56,49,41,0,0,0,0,0};
+static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,15),40,103,50,49,52,55,32,101,110,118,50,49,52,57,41,0};
+static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,15),40,103,50,49,53,53,32,101,110,118,50,49,53,55,41,0};
+static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,16),40,115,105,109,112,108,105,102,121,32,120,50,49,51,56,41};
+static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,29),40,97,49,52,48,51,49,32,102,111,114,109,50,48,54,56,32,114,50,48,54,57,32,99,50,48,55,48,41,0,0,0};
+static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,48,52,53,32,103,50,48,53,53,50,48,53,57,41,0,0,0,0};
+static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,50,48,49,50,32,103,50,48,50,50,50,48,50,54,41,0,0,0,0};
+static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,29),40,97,49,52,52,52,49,32,102,111,114,109,49,57,57,55,32,114,49,57,57,56,32,99,49,57,57,57,41,0,0,0};
+static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,15),40,101,120,112,97,110,100,32,98,115,49,57,56,54,41,0};
+static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,29),40,97,49,52,54,56,56,32,102,111,114,109,49,57,55,57,32,114,49,57,56,48,32,99,49,57,56,49,41,0,0,0};
+static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,7),40,103,49,57,54,54,41,0};
+static C_char C_TLS li242[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,57,53,48,32,103,49,57,54,48,49,57,54,52,41,0,0,0,0};
+static C_char C_TLS li243[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,57,51,55,41,0,0,0,0};
+static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,29),40,97,49,52,55,53,55,32,102,111,114,109,49,57,50,51,32,114,49,57,50,52,32,99,49,57,50,53,41,0,0,0};
+static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,20),40,101,120,112,97,110,100,32,99,108,97,117,115,101,115,49,56,56,54,41,0,0,0,0};
+static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,29),40,97,49,52,57,53,56,32,102,111,114,109,49,56,55,53,32,114,49,56,55,54,32,99,49,56,55,55,41,0,0,0};
+static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,29),40,97,49,53,50,56,56,32,102,111,114,109,49,56,54,52,32,114,49,56,54,53,32,99,49,56,54,54,41,0,0,0};
+static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,29),40,97,49,53,51,55,56,32,102,111,114,109,49,56,53,52,32,114,49,56,53,53,32,99,49,56,53,54,41,0,0,0};
+static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,102,111,114,109,49,56,50,57,41,0};
+static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,29),40,97,49,53,52,51,55,32,102,111,114,109,49,56,50,53,32,114,49,56,50,54,32,99,49,56,50,55,41,0,0,0};
+static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,50),40,97,49,53,53,54,52,32,103,49,56,49,52,49,56,49,53,49,56,50,48,32,103,49,56,49,54,49,56,49,55,49,56,50,49,32,103,49,56,49,56,49,56,49,57,49,56,50,50,41,0,0,0,0,0,0};
+static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,50),40,97,49,53,53,55,52,32,103,49,55,57,57,49,56,48,48,49,56,48,53,32,103,49,56,48,49,49,56,48,50,49,56,48,54,32,103,49,56,48,51,49,56,48,52,49,56,48,55,41,0,0,0,0,0,0};
+static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,50),40,97,49,53,53,56,52,32,103,49,55,56,52,49,55,56,53,49,55,57,48,32,103,49,55,56,54,49,55,56,55,49,55,57,49,32,103,49,55,56,56,49,55,56,57,49,55,57,50,41,0,0,0,0,0,0};
+static C_char C_TLS li254[] 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_3841)
+static void C_ccall f_3841(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_3873)
+static void C_ccall f_3873(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_noret;
+C_noret_decl(f_15585)
+static void C_ccall f_15585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15583)
+static void C_ccall f_15583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8795)
+static void C_ccall f_8795(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15575)
+static void C_ccall f_15575(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15573)
+static void C_ccall f_15573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8798)
+static void C_ccall f_8798(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_15563)
+static void C_ccall f_15563(C_word c,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_8805)
+static void C_ccall f_8805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15438)
+static void C_ccall f_15438(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15448)
+static void C_fcall f_15448(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15464)
+static void C_ccall f_15464(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_15495)
+static void C_ccall f_15495(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15470)
+static void C_ccall f_15470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15517)
+static void C_ccall f_15517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15520)
+static void C_ccall f_15520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15539)
+static void C_ccall f_15539(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15551)
+static void C_ccall f_15551(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_15507)
+static void C_ccall f_15507(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15514)
+static void C_ccall f_15514(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15436)
+static void C_ccall f_15436(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_15379)
+static void C_ccall f_15379(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15408)
+static void C_ccall f_15408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15428)
+static void C_ccall f_15428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15432)
+static void C_ccall f_15432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15377)
+static void C_ccall f_15377(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_15289)
+static void C_ccall f_15289(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_15314)
+static void C_ccall f_15314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15321)
+static void C_ccall f_15321(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15341)
+static void C_ccall f_15341(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15361)
+static void C_ccall f_15361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15365)
+static void C_ccall f_15365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15287)
+static void C_ccall f_15287(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_noret;
+C_noret_decl(f_14959)
+static void C_ccall f_14959(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14966)
+static void C_ccall f_14966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14969)
+static void C_ccall f_14969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14972)
+static void C_ccall f_14972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14975)
+static void C_ccall f_14975(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_14981)
+static void C_ccall f_14981(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14986)
+static void C_fcall f_14986(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15002)
+static void C_ccall f_15002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15008)
+static void C_ccall f_15008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15050)
+static void C_ccall f_15050(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15118)
+static void C_ccall f_15118(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15243)
+static void C_ccall f_15243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15239)
+static void C_ccall f_15239(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15121)
+static void C_ccall f_15121(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15176)
+static void C_ccall f_15176(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15053)
+static void C_ccall f_15053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15092)
+static void C_ccall f_15092(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_15015)
+static void C_ccall f_15015(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_8817)
+static void C_ccall f_8817(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14762)
+static void C_ccall f_14762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14771)
+static void C_ccall f_14771(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14774)
+static void C_ccall f_14774(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14777)
+static void C_ccall f_14777(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14780)
+static void C_ccall f_14780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14801)
+static void C_fcall f_14801(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14817)
+static void C_ccall f_14817(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14823)
+static void C_ccall f_14823(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14883)
+static void C_fcall f_14883(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14910)
+static C_word C_fcall f_14910(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_14877)
+static void C_ccall f_14877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14873)
+static void C_ccall f_14873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14865)
+static void C_ccall f_14865(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14861)
+static void C_ccall f_14861(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14830)
+static void C_ccall f_14830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14799)
+static void C_ccall f_14799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14756)
+static void C_ccall f_14756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8820)
+static void C_ccall f_8820(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14693)
+static void C_ccall f_14693(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14702)
+static void C_ccall f_14702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14707)
+static void C_fcall f_14707(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14744)
+static void C_ccall f_14744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14725)
+static void C_ccall f_14725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14687)
+static void C_ccall f_14687(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8823)
+static void C_ccall f_8823(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14442)
+static void C_ccall f_14442(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14446)
+static void C_ccall f_14446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14458)
+static void C_ccall f_14458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14461)
+static void C_ccall f_14461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14464)
+static void C_ccall f_14464(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_word t2) C_noret;
+C_noret_decl(f_14479)
+static void C_ccall f_14479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14631)
+static void C_ccall f_14631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14506)
+static void C_fcall f_14506(C_word t0,C_word t1) 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_14522)
+static void C_fcall f_14522(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14544)
+static void C_fcall f_14544(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14603)
+static void C_fcall f_14603(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14542)
+static void C_ccall f_14542(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_14440)
+static void C_ccall f_14440(C_word c,C_word t0,C_word t1) 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_14032)
+static void C_ccall f_14032(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14036)
+static void C_ccall f_14036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14039)
+static void C_ccall f_14039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14042)
+static void C_ccall f_14042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14045)
+static void C_ccall f_14045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14429)
+static void C_ccall f_14429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14326)
+static void C_fcall f_14326(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14330)
+static void C_ccall f_14330(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_14411)
+static void C_ccall f_14411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14364)
+static void C_fcall f_14364(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14393)
+static void C_ccall f_14393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14334)
+static void C_fcall f_14334(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14057)
+static void C_fcall f_14057(C_word t0,C_word t1,C_word t2,C_word t3) 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_14151)
+static void C_ccall f_14151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14312)
+static void C_ccall f_14312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14320)
+static void C_ccall f_14320(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14298)
+static void C_ccall f_14298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14287)
+static void C_ccall f_14287(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_14272)
+static void C_ccall f_14272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14260)
+static void C_ccall f_14260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14241)
+static void C_ccall f_14241(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14199)
+static void C_ccall f_14199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14176)
+static void C_ccall f_14176(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_14079)
+static void C_ccall f_14079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14075)
+static void C_ccall f_14075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14047)
+static void C_fcall f_14047(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14055)
+static void C_ccall f_14055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14030)
+static void C_ccall f_14030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8829)
+static void C_ccall f_8829(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13999)
+static void C_ccall f_13999(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14003)
+static void C_ccall f_14003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13997)
+static void C_ccall f_13997(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8832)
+static void C_ccall f_8832(C_word c,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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13687)
+static void C_ccall f_13687(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13690)
+static void C_ccall f_13690(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13693)
+static void C_ccall f_13693(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_13862)
+static void C_fcall f_13862(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13949)
+static void C_ccall f_13949(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_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_13965)
+static void C_ccall f_13965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13878)
+static void C_fcall f_13878(C_word t0,C_word t1,C_word t2) 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_13708)
+static void C_fcall f_13708(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13743)
+static void C_ccall f_13743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13789)
+static void C_ccall f_13789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13839)
+static void C_ccall f_13839(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13846)
+static void C_ccall f_13846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13804)
+static void C_ccall f_13804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13818)
+static void C_ccall f_13818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13761)
+static void C_ccall f_13761(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_13722)
+static void C_ccall f_13722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13698)
+static void C_fcall f_13698(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13678)
+static void C_ccall f_13678(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8835)
+static void C_ccall f_8835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13659)
+static void C_ccall f_13659(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13657)
+static void C_ccall f_13657(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8838)
+static void C_ccall f_8838(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13638)
+static void C_ccall f_13638(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13636)
+static void C_ccall f_13636(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8841)
+static void C_ccall f_8841(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13587)
+static void C_ccall f_13587(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13591)
+static void C_ccall f_13591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13628)
+static void C_ccall f_13628(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13614)
+static void C_ccall f_13614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13585)
+static void C_ccall f_13585(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8844)
+static void C_ccall f_8844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13543)
+static void C_ccall f_13543(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_13577)
+static void C_ccall f_13577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13550)
+static void C_ccall f_13550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13565)
+static void C_ccall f_13565(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13541)
+static void C_ccall f_13541(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8847)
+static void C_ccall f_8847(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13390)
+static void C_ccall f_13390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13393)
+static void C_ccall f_13393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13448)
+static void C_fcall f_13448(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13523)
+static void C_ccall f_13523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13456)
+static void C_fcall f_13456(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13478)
+static C_word C_fcall f_13478(C_word t0);
+C_noret_decl(f_13463)
+static void C_fcall f_13463(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13396)
+static void C_ccall f_13396(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13413)
+static void C_fcall f_13413(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13442)
+static void C_ccall f_13442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13411)
+static void C_ccall f_13411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13403)
+static void C_ccall f_13403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13399)
+static void C_ccall f_13399(C_word c,C_word t0,C_word t1) 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_8850)
+static void C_ccall f_8850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13346)
+static void C_ccall f_13346(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13350)
+static void C_ccall f_13350(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13368)
+static void C_ccall f_13368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13344)
+static void C_ccall f_13344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8853)
+static void C_ccall f_8853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13340)
+static void C_ccall f_13340(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_13336)
+static void C_ccall f_13336(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_10700)
+static void C_ccall f_10700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12822)
+static void C_ccall f_12822(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13285)
+static void C_fcall f_13285(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13324)
+static void C_ccall f_13324(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_13238)
+static void C_ccall f_13238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13240)
+static void C_fcall f_13240(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13279)
+static void C_ccall f_13279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13253)
+static void C_ccall f_13253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13264)
+static void C_ccall f_13264(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_13111)
+static void C_fcall f_13111(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13162)
+static void C_fcall f_13162(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13212)
+static void C_ccall f_13212(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13174)
+static void C_fcall f_13174(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_13194)
+static void C_ccall f_13194(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13190)
+static void C_ccall f_13190(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_13144)
+static void C_fcall f_13144(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13148)
+static void C_ccall f_13148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12844)
+static void C_ccall f_12844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13000)
+static void C_ccall f_13000(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13002)
+static void C_fcall f_13002(C_word t0,C_word t1,C_word t2) 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_13010)
+static void C_fcall f_13010(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_13024)
+static void C_ccall f_13024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13061)
+static void C_fcall f_13061(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13087)
+static void C_ccall f_13087(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13075)
+static void C_ccall f_13075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13079)
+static void C_ccall f_13079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13059)
+static void C_ccall f_13059(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13055)
+static void C_ccall f_13055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13048)
+static void C_ccall f_13048(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_13040)
+static void C_ccall f_13040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12847)
+static void C_ccall f_12847(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12850)
+static void C_ccall f_12850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12925)
+static void C_ccall f_12925(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12927)
+static void C_fcall f_12927(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12982)
+static void C_ccall f_12982(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12989)
+static void C_ccall f_12989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12937)
+static void C_fcall f_12937(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12853)
+static void C_ccall f_12853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12917)
+static void C_ccall f_12917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12921)
+static void C_ccall f_12921(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_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_12873)
+static void C_fcall f_12873(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12902)
+static void C_ccall f_12902(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12881)
+static void C_fcall f_12881(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12885)
+static void C_ccall f_12885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12862)
+static void C_ccall f_12862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12868)
+static void C_ccall f_12868(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12737)
+static void C_ccall f_12737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_12750)
+static void C_fcall f_12750(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12799)
+static void C_ccall f_12799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12795)
+static void C_ccall f_12795(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12778)
+static void C_fcall f_12778(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12588)
+static void C_ccall f_12588(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_12588)
+static void C_ccall f_12588r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_12592)
+static void C_ccall f_12592(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12595)
+static void C_ccall f_12595(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12668)
+static void C_fcall f_12668(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12709)
+static void C_ccall f_12709(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12678)
+static void C_fcall f_12678(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12610)
+static void C_ccall f_12610(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12616)
+static void C_fcall f_12616(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12662)
+static void C_ccall f_12662(C_word c,C_word t0,C_word t1) 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_12614)
+static void C_ccall f_12614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12571)
+static void C_ccall f_12571(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12582)
+static void C_ccall f_12582(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_12578)
+static void C_ccall f_12578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12192)
+static void C_ccall f_12192(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_12192)
+static void C_ccall f_12192r(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_12196)
+static void C_ccall f_12196(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12491)
+static void C_fcall f_12491(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12539)
+static void C_ccall f_12539(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_12208)
+static void C_fcall f_12208(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12546)
+static void C_ccall f_12546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12501)
+static void C_fcall f_12501(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_12425)
+static void C_fcall f_12425(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12474)
+static void C_ccall f_12474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12435)
+static void C_fcall f_12435(C_word t0,C_word t1) C_noret;
+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_12373)
+static void C_fcall f_12373(C_word t0,C_word t1,C_word t2) 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_12231)
+static void C_ccall f_12231(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12367)
+static void C_ccall f_12367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12371)
+static void C_ccall f_12371(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12237)
+static void C_ccall f_12237(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12240)
+static void C_ccall f_12240(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12333)
+static void C_fcall f_12333(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12341)
+static C_word C_fcall f_12341(C_word t0,C_word t1);
+C_noret_decl(f_12243)
+static void C_ccall f_12243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12291)
+static void C_fcall f_12291(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12299)
+static C_word C_fcall f_12299(C_word t0,C_word t1);
+C_noret_decl(f_12246)
+static void C_ccall f_12246(C_word c,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_noret;
+C_noret_decl(f_12267)
+static C_word C_fcall f_12267(C_word t0,C_word t1);
+C_noret_decl(f_12249)
+static void C_ccall f_12249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11687)
+static void C_ccall f_11687(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12190)
+static void C_ccall f_12190(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_11710)
+static void C_fcall f_11710(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12156)
+static void C_ccall f_12156(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12152)
+static void C_ccall f_12152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11718)
+static void C_fcall f_11718(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12105)
+static void C_fcall f_12105(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12134)
+static void C_ccall f_12134(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_noret;
+C_noret_decl(f_11726)
+static void C_ccall f_11726(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11982)
+static void C_ccall f_11982(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11984)
+static void C_fcall f_11984(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12083)
+static void C_fcall f_12083(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11978)
+static void C_ccall f_11978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11974)
+static void C_ccall f_11974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11874)
+static void C_fcall f_11874(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11958)
+static void C_ccall f_11958(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_11933)
+static void C_ccall f_11933(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11872)
+static void C_ccall f_11872(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_noret;
+C_noret_decl(f_11794)
+static void C_fcall f_11794(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11864)
+static void C_ccall f_11864(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_11860)
+static void C_ccall f_11860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11852)
+static void C_ccall f_11852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11848)
+static void C_ccall f_11848(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11828)
+static void C_ccall f_11828(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11782)
+static void C_ccall f_11782(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11778)
+static void C_ccall f_11778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11722)
+static void C_ccall f_11722(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11714)
+static void C_ccall f_11714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11627)
+static void C_fcall f_11627(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11631)
+static void C_ccall f_11631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11642)
+static void C_fcall f_11642(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11681)
+static void C_ccall f_11681(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_11637)
+static void C_ccall f_11637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11341)
+static void C_fcall f_11341(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11422)
+static void C_fcall f_11422(C_word t0,C_word t1,C_word t2) 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_11451)
+static void C_fcall f_11451(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_noret;
+C_noret_decl(f_11609)
+static void C_ccall f_11609(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11590)
+static void C_ccall f_11590(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11536)
+static void C_fcall f_11536(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11569)
+static void C_ccall f_11569(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11554)
+static void C_ccall f_11554(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11492)
+static void C_fcall f_11492(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11519)
+static void C_ccall f_11519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11500)
+static void C_fcall f_11500(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11504)
+static void C_ccall f_11504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11474)
+static void C_ccall f_11474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11399)
+static void C_fcall f_11399(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11411)
+static void C_ccall f_11411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11407)
+static void C_ccall f_11407(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11272)
+static void C_ccall f_11272(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11278)
+static void C_fcall f_11278(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11293)
+static void C_fcall f_11293(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11328)
+static void C_ccall f_11328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11204)
+static void C_ccall f_11204(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11204)
+static void C_ccall f_11204r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11224)
+static C_word C_fcall f_11224(C_word *a,C_word t0);
+C_noret_decl(f_11219)
+static C_word C_fcall f_11219(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_11206)
+static C_word C_fcall f_11206(C_word *a,C_word t0,C_word t1,C_word t2);
+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_11189)
+static void C_ccall f_11189(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11101)
+static void C_ccall f_11101(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_11111)
+static void C_ccall f_11111(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_noret;
+C_noret_decl(f_11120)
+static void C_ccall f_11120(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11163)
+static void C_ccall f_11163(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_11123)
+static void C_ccall f_11123(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_11012)
+static void C_ccall f_11012(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11022)
+static void C_ccall f_11022(C_word c,C_word t0,C_word t1) 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_11088)
+static void C_ccall f_11088(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11028)
+static void C_ccall f_11028(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11084)
+static void C_ccall f_11084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11031)
+static void C_ccall f_11031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11070)
+static void C_ccall f_11070(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11074)
+static void C_ccall f_11074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11034)
+static void C_ccall f_11034(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11037)
+static void C_ccall f_11037(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10991)
+static void C_fcall f_10991(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10998)
+static void C_ccall f_10998(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_word t2) C_noret;
+C_noret_decl(f_10975)
+static void C_ccall f_10975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10968)
+static void C_ccall f_10968(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_10928)
+static void C_ccall f_10928(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10928)
+static void C_ccall f_10928r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10932)
+static void C_ccall f_10932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10904)
+static void C_ccall f_10904(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10804)
+static void C_ccall f_10804(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10795)
+static void C_ccall f_10795(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10714)
+static void C_ccall f_10714(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10596)
+static void C_ccall f_10596(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10596)
+static void C_ccall f_10596r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10600)
+static void C_ccall f_10600(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10603)
+static void C_ccall f_10603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10608)
+static void C_fcall f_10608(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10655)
+static void C_ccall f_10655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10616)
+static void C_fcall f_10616(C_word t0,C_word t1,C_word t2) 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_10606)
+static void C_ccall f_10606(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_word t2,...) C_noret;
+C_noret_decl(f_10531)
+static void C_ccall f_10531r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10535)
+static void C_ccall f_10535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10545)
+static void C_ccall f_10545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10547)
+static void C_fcall f_10547(C_word t0,C_word t1,C_word t2) 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_10538)
+static void C_ccall f_10538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8855)
+static void C_ccall f_8855(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_8862)
+static void C_ccall f_8862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8876)
+static void C_ccall f_8876(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8880)
+static void C_ccall f_8880(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8884)
+static void C_ccall f_8884(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8889)
+static void C_ccall f_8889(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_8899)
+static void C_ccall f_8899(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_8907)
+static void C_ccall f_8907(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_8916)
+static void C_ccall f_8916(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8920)
+static void C_ccall f_8920(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_8932)
+static void C_ccall f_8932(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_8940)
+static void C_ccall f_8940(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8944)
+static void C_ccall f_8944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8949)
+static void C_ccall f_8949(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10492)
+static void C_ccall f_10492(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10502)
+static void C_fcall f_10502(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_10472)
+static void C_ccall f_10472(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10479)
+static void C_ccall f_10479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10486)
+static void C_ccall f_10486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10446)
+static void C_ccall f_10446(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10424)
+static void C_ccall f_10424(C_word c,C_word t0,C_word t1,C_word t2) 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_10331)
+static void C_ccall f_10331(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_10373)
+static void C_ccall f_10373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10422)
+static void C_ccall f_10422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10405)
+static void C_ccall f_10405(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10384)
+static void C_ccall f_10384(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10284)
+static void C_ccall f_10284(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_10312)
+static void C_ccall f_10312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10004)
+static void C_ccall f_10004(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10051)
+static void C_ccall f_10051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10249)
+static void C_ccall f_10249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10245)
+static void C_ccall f_10245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10212)
+static void C_ccall f_10212(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10220)
+static void C_ccall f_10220(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10054)
+static void C_ccall f_10054(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10060)
+static void C_ccall f_10060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10072)
+static void C_ccall f_10072(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10138)
+static void C_fcall f_10138(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10153)
+static void C_ccall f_10153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10075)
+static void C_fcall f_10075(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10109)
+static void C_fcall f_10109(C_word t0,C_word t1,C_word t2,C_word t3) 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_10107)
+static void C_ccall f_10107(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_10099)
+static void C_ccall f_10099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9797)
+static void C_ccall f_9797(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9827)
+static void C_ccall f_9827(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_9950)
+static void C_fcall f_9950(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9964)
+static void C_ccall f_9964(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_9937)
+static void C_ccall f_9937(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_9891)
+static void C_ccall f_9891(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9836)
+static void C_ccall f_9836(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_noret;
+C_noret_decl(f_9509)
+static void C_ccall f_9509(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9516)
+static void C_ccall f_9516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9555)
+static void C_fcall f_9555(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9565)
+static void C_fcall f_9565(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9696)
+static void C_ccall f_9696(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_9629)
+static void C_ccall f_9629(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9625)
+static void C_ccall f_9625(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_9559)
+static void C_ccall f_9559(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_word t2,C_word t3) 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_9463)
+static void C_ccall f_9463(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_9216)
+static void C_ccall f_9216(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9330)
+static void C_fcall f_9330(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9268)
+static void C_ccall f_9268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9276)
+static void C_ccall f_9276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9272)
+static void C_ccall f_9272(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9264)
+static void C_ccall f_9264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9082)
+static void C_ccall f_9082(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9089)
+static void C_fcall f_9089(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9092)
+static void C_ccall f_9092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9141)
+static void C_ccall f_9141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9137)
+static void C_ccall f_9137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9132)
+static void C_ccall f_9132(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9118)
+static void C_ccall f_9118(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_9126)
+static void C_ccall f_9126(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_noret;
+C_noret_decl(f_9023)
+static void C_fcall f_9023(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9052)
+static void C_ccall f_9052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9001)
+static void C_ccall f_9001(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8997)
+static void C_ccall f_8997(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_word t2) C_noret;
+C_noret_decl(f_8752)
+static void C_ccall f_8752(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8758)
+static void C_fcall f_8758(C_word t0,C_word t1,C_word t2) 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_7566)
+static void C_ccall f_7566(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_7570)
+static void C_ccall f_7570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7573)
+static void C_ccall f_7573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7576)
+static void C_ccall f_7576(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_8360)
+static void C_ccall f_8360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8363)
+static void C_ccall f_8363(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8742)
+static void C_ccall f_8742(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8727)
+static void C_ccall f_8727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8366)
+static void C_ccall f_8366(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8375)
+static void C_fcall f_8375(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8706)
+static void C_ccall f_8706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8383)
+static void C_fcall f_8383(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8387)
+static void C_ccall f_8387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8405)
+static void C_ccall f_8405(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8637)
+static void C_fcall f_8637(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8692)
+static void C_ccall f_8692(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8645)
+static void C_fcall f_8645(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8655)
+static void C_ccall f_8655(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_8685)
+static void C_ccall f_8685(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8408)
+static void C_ccall f_8408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8573)
+static void C_fcall f_8573(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8624)
+static void C_ccall f_8624(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8581)
+static void C_fcall f_8581(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8621)
+static void C_ccall f_8621(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8411)
+static void C_ccall f_8411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8439)
+static void C_ccall f_8439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8535)
+static void C_fcall f_8535(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8564)
+static void C_ccall f_8564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8494)
+static void C_ccall f_8494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8500)
+static void C_fcall f_8500(C_word t0,C_word t1,C_word t2) 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_8498)
+static void C_ccall f_8498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8486)
+static void C_ccall f_8486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8442)
+static void C_ccall f_8442(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8458)
+static void C_ccall f_8458(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_8414)
+static void C_fcall f_8414(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8436)
+static void C_ccall f_8436(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_8417)
+static void C_ccall f_8417(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8428)
+static void C_ccall f_8428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8424)
+static void C_ccall f_8424(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_7720)
+static void C_fcall f_7720(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7739)
+static void C_fcall f_7739(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_7760)
+static void C_ccall f_7760(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_8027)
+static void C_ccall f_8027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8206)
+static void C_ccall f_8206(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_noret;
+C_noret_decl(f_8212)
+static void C_ccall f_8212(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8286)
+static void C_fcall f_8286(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8315)
+static void C_ccall f_8315(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8245)
+static void C_ccall f_8245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8251)
+static void C_fcall f_8251(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8280)
+static void C_ccall f_8280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8249)
+static void C_ccall f_8249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8214)
+static void C_fcall f_8214(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8234)
+static void C_ccall f_8234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8230)
+static void C_ccall f_8230(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8222)
+static void C_ccall f_8222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8030)
+static void C_ccall f_8030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8039)
+static void C_fcall f_8039(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_8200)
+static void C_ccall f_8200(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8150)
+static void C_fcall f_8150(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8178)
+static void C_ccall f_8178(C_word c,C_word t0,C_word t1) 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_8143)
+static void C_ccall f_8143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8093)
+static void C_fcall f_8093(C_word t0,C_word t1,C_word t2) 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_8109)
+static void C_ccall f_8109(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8060)
+static void C_fcall f_8060(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8075)
+static void C_ccall f_8075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8055)
+static void C_ccall f_8055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7888)
+static void C_ccall f_7888(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7988)
+static void C_fcall f_7988(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8017)
+static void C_ccall f_8017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7891)
+static void C_ccall f_7891(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7896)
+static void C_fcall f_7896(C_word t0,C_word t1,C_word t2,C_word t3) 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_7908)
+static void C_fcall f_7908(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7950)
+static void C_ccall f_7950(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_7846)
+static void C_fcall f_7846(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7875)
+static void C_ccall f_7875(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7766)
+static void C_ccall f_7766(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7771)
+static void C_fcall f_7771(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7810)
+static void C_fcall f_7810(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7788)
+static void C_fcall f_7788(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7633)
+static void C_fcall f_7633(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7637)
+static void C_ccall f_7637(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7640)
+static void C_ccall f_7640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7718)
+static void C_ccall f_7718(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7714)
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7655)
+static void C_ccall f_7655(C_word c,C_word t0,C_word t1) C_noret;
+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_7664)
+static void C_ccall f_7664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7703)
+static void C_ccall f_7703(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_7701)
+static void C_ccall f_7701(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_7669)
+static void C_ccall f_7669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7672)
+static void C_ccall f_7672(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_7679)
+static void C_ccall f_7679(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_7686)
+static void C_ccall f_7686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7690)
+static void C_ccall f_7690(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_7643)
+static void C_ccall f_7643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7590)
+static void C_fcall f_7590(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7603)
+static void C_ccall f_7603(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_7581)
+static void C_fcall f_7581(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_noret;
+C_noret_decl(f_7354)
+static void C_ccall f_7354(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7356)
+static void C_ccall f_7356(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7427)
+static void C_ccall f_7427(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7440)
+static void C_ccall f_7440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f17986)
+static void C_ccall f17986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7443)
+static void C_fcall f_7443(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7446)
+static void C_ccall f_7446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f17979)
+static void C_ccall f17979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7449)
+static void C_fcall f_7449(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_7513)
+static C_word C_fcall f_7513(C_word t0,C_word t1);
+C_noret_decl(f_7500)
+static void C_ccall f_7500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7485)
+static C_word C_fcall f_7485(C_word t0,C_word t1);
+C_noret_decl(f_7468)
+static void C_ccall f_7468(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7475)
+static void C_ccall f_7475(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_word t2) C_noret;
+C_noret_decl(f_7380)
+static void C_ccall f_7380(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_noret;
+C_noret_decl(f_7384)
+static void C_fcall f_7384(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7397)
+static void C_ccall f_7397(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_word t2) C_noret;
+C_noret_decl(f_6879)
+static void C_ccall f_6879(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_6879)
+static void C_ccall f_6879r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_7303)
+static void C_fcall f_7303(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7294)
+static void C_fcall f_7294(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7302)
+static void C_ccall f_7302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6881)
+static void C_fcall f_6881(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7022)
+static void C_fcall f_7022(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_word t3) C_noret;
+C_noret_decl(f_7265)
+static void C_ccall f_7265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7224)
+static void C_ccall f_7224(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7228)
+static void C_ccall f_7228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7046)
+static void C_fcall f_7046(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_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_noret;
+C_noret_decl(f_6993)
+static void C_ccall f_6993(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6999)
+static C_word C_fcall f_6999(C_word t0);
+C_noret_decl(f_6927)
+static void C_ccall f_6927(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6931)
+static void C_ccall f_6931(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6939)
+static void C_fcall f_6939(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6991)
+static void C_ccall f_6991(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6959)
+static void C_ccall f_6959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6896)
+static void C_fcall f_6896(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6900)
+static void C_ccall f_6900(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6925)
+static void C_ccall f_6925(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6914)
+static void C_ccall f_6914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6918)
+static void C_ccall f_6918(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_noret;
+C_noret_decl(f_6884)
+static void C_fcall f_6884(C_word t0,C_word t1,C_word t2,C_word t3,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_6838)
+static void C_ccall f_6838(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6860)
+static void C_ccall f_6860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6864)
+static C_word C_fcall f_6864(C_word t0,C_word t1);
+C_noret_decl(f_6832)
+static void C_ccall f_6832(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6821)
+static void C_ccall f_6821(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_6821)
+static void C_ccall f_6821r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6829)
+static void C_ccall f_6829(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6814)
+static void C_ccall f_6814(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6754)
+static void C_fcall f_6754(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_6780)
+static void C_ccall f_6780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6663)
+static void C_fcall f_6663(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6749)
+static void C_ccall f_6749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6666)
+static void C_fcall f_6666(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6680)
+static C_word C_fcall f_6680(C_word t0,C_word t1);
+C_noret_decl(f_6720)
+static void C_ccall f_6720(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5824)
+static void C_ccall f_5824(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_5824)
+static void C_ccall f_5824r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6611)
+static void C_fcall f_6611(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6619)
+static void C_ccall f_6619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6606)
+static void C_fcall f_6606(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5826)
+static void C_fcall f_5826(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6319)
+static void C_fcall f_6319(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6325)
+static void C_fcall f_6325(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_6589)
+static void C_ccall f_6589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6347)
+static void C_fcall f_6347(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6557)
+static void C_ccall f_6557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6531)
+static void C_ccall f_6531(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6538)
+static void C_ccall f_6538(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_6491)
+static void C_ccall f_6491(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6365)
+static void C_ccall f_6365(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6370)
+static void C_fcall f_6370(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_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_6466)
+static void C_ccall f_6466(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_noret;
+C_noret_decl(f_6428)
+static void C_ccall f_6428(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6432)
+static void C_ccall f_6432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6142)
+static void C_fcall f_6142(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_6152)
+static void C_fcall f_6152(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6301)
+static void C_ccall f_6301(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6297)
+static void C_ccall f_6297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6287)
+static void C_ccall f_6287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6290)
+static void C_ccall f_6290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6198)
+static void C_fcall f_6198(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6230)
+static void C_ccall f_6230(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6242)
+static void C_ccall f_6242(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_6254)
+static void C_ccall f_6254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6167)
+static void C_ccall f_6167(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_6175)
+static void C_ccall f_6175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6179)
+static void C_ccall f_6179(C_word c,C_word t0,C_word t1) 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_5829)
+static void C_fcall f_5829(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_5932)
+static void C_ccall f_5932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6090)
+static void C_ccall f_6090(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6092)
+static void C_fcall f_6092(C_word t0,C_word t1,C_word t2) 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_6086)
+static void C_ccall f_6086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6070)
+static void C_ccall f_6070(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_6064)
+static void C_ccall f_6064(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_5968)
+static void C_ccall f_5968(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6027)
+static void C_fcall f_6027(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6056)
+static void C_ccall f_6056(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5972)
+static void C_ccall f_5972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6005)
+static void C_ccall f_6005(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_5999)
+static void C_ccall f_5999(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_5958)
+static void C_ccall f_5958(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_5841)
+static void C_fcall f_5841(C_word t0,C_word t1,C_word t2,C_word t3) 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_5905)
+static void C_fcall f_5905(C_word t0,C_word t1) 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_5860)
+static void C_fcall f_5860(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5871)
+static void C_ccall f_5871(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5879)
+static void C_ccall f_5879(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_5196)
+static void C_ccall f_5196(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_5216)
+static void C_ccall f_5216(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5219)
+static void C_ccall f_5219(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5222)
+static void C_ccall f_5222(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_5228)
+static void C_ccall f_5228(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5233)
+static void C_fcall f_5233(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_5575)
+static void C_ccall f_5575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5751)
+static void C_fcall f_5751(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5689)
+static void C_ccall f_5689(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5670)
+static void C_fcall f_5670(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5624)
+static void C_fcall f_5624(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5627)
+static void C_fcall f_5627(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_5590)
+static void C_fcall f_5590(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5534)
+static void C_ccall f_5534(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5247)
+static void C_ccall f_5247(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5422)
+static void C_ccall f_5422(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_noret;
+C_noret_decl(f_5523)
+static void C_ccall f_5523(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5451)
+static void C_fcall f_5451(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5520)
+static void C_ccall f_5520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5504)
+static void C_ccall f_5504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5482)
+static void C_ccall f_5482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5414)
+static void C_ccall f_5414(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_5251)
+static void C_fcall f_5251(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5263)
+static void C_fcall f_5263(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5366)
+static void C_ccall f_5366(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_5362)
+static void C_ccall f_5362(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5335)
+static void C_ccall f_5335(C_word c,C_word t0,C_word t1) 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_5290)
+static void C_ccall f_5290(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_5282)
+static void C_ccall f_5282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5199)
+static void C_fcall f_5199(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5153)
+static void C_ccall f_5153(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5159)
+static C_word C_fcall f_5159(C_word t0);
+C_noret_decl(f_5067)
+static void C_ccall f_5067(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_5067)
+static void C_ccall f_5067r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_5100)
+static void C_fcall f_5100(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5108)
+static void C_ccall f_5108(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5095)
+static void C_fcall f_5095(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5069)
+static void C_fcall f_5069(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5075)
+static void C_fcall f_5075(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5087)
+static void C_ccall f_5087(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5081)
+static void C_ccall f_5081(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4966)
+static void C_ccall f_4966(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5003)
+static void C_ccall f_5003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5006)
+static void C_ccall f_5006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5023)
+static void C_ccall f_5023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5065)
+static void C_ccall f_5065(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5033)
+static void C_fcall f_5033(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5052)
+static void C_ccall f_5052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4969)
+static void C_fcall f_4969(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4973)
+static void C_ccall f_4973(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_word t2) 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_4948)
+static void C_ccall f_4948(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_4373)
+static void C_ccall f_4373(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4624)
+static void C_fcall f_4624(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4646)
+static void C_ccall f_4646(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4938)
+static void C_ccall f_4938(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4931)
+static void C_ccall f_4931(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4652)
+static void C_fcall f_4652(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4823)
+static void C_fcall f_4823(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_noret;
+C_noret_decl(f_4863)
+static void C_fcall f_4863(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4867)
+static void C_ccall f_4867(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4879)
+static void C_ccall f_4879(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_4836)
+static void C_ccall f_4836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4661)
+static void C_ccall f_4661(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4673)
+static void C_ccall f_4673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4776)
+static void C_fcall f_4776(C_word t0,C_word t1,C_word t2) 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_4701)
+static void C_fcall f_4701(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4730)
+static void C_ccall f_4730(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4699)
+static void C_ccall f_4699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4695)
+static void C_ccall f_4695(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4578)
+static void C_fcall f_4578(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4604)
+static void C_ccall f_4604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4376)
+static void C_fcall f_4376(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_4391)
+static void C_ccall f_4391(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4504)
+static void C_ccall f_4504(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_4566)
+static void C_ccall f_4566r(C_word t0,C_word t1,C_word t3) 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_4510)
+static void C_ccall f_4510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4558)
+static void C_ccall f_4558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4552)
+static void C_ccall f_4552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4547)
+static void C_ccall f_4547(C_word c,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_word t2) C_noret;
+C_noret_decl(f_4514)
+static void C_ccall f_4514(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_4530)
+static void C_ccall f_4530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4517)
+static void C_ccall f_4517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4397)
+static void C_ccall f_4397(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4403)
+static void C_ccall f_4403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4414)
+static void C_fcall f_4414(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_word t2) C_noret;
+C_noret_decl(f_4450)
+static void C_fcall f_4450(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_4425)
+static void C_ccall f_4425(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_4367)
+static void C_ccall f_4367(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4316)
+static void C_ccall f_4316(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4328)
+static void C_ccall f_4328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4330)
+static void C_fcall f_4330(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4365)
+static void C_ccall f_4365(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_4324)
+static void C_ccall f_4324(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_4266)
+static void C_ccall f_4266r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_4270)
+static void C_ccall f_4270(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4273)
+static void C_ccall f_4273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4292)
+static void C_ccall f_4292(C_word c,C_word t0,C_word t1) 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_4253)
+static void C_ccall f_4253(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4264)
+static void C_ccall f_4264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4257)
+static void C_ccall f_4257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4215)
+static void C_ccall f_4215(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_4222)
+static void C_ccall f_4222(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4226)
+static C_word C_fcall f_4226(C_word t0,C_word t1);
+C_noret_decl(f_4002)
+static void C_ccall f_4002(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_4002)
+static void C_ccall f_4002r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_4160)
+static void C_fcall f_4160(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4155)
+static void C_fcall f_4155(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4004)
+static void C_fcall f_4004(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4010)
+static void C_fcall f_4010(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4120)
+static void C_ccall f_4120(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4129)
+static C_word C_fcall f_4129(C_word t0,C_word t1);
+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_4092)
+static void C_ccall f_4092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4029)
+static void C_ccall f_4029(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4032)
+static void C_ccall f_4032(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4041)
+static void C_fcall f_4041(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3893)
+static void C_fcall f_3893(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3900)
+static void C_ccall f_3900(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3903)
+static void C_fcall f_3903(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_3909)
+static void C_ccall f_3909(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3915)
+static void C_ccall f_3915(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3918)
+static void C_ccall f_3918(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_noret;
+C_noret_decl(f_3888)
+static void C_ccall f_3888(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_15448)
+static void C_fcall trf_15448(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15448(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15448(t0,t1,t2);}
+
+C_noret_decl(trf_14986)
+static void C_fcall trf_14986(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14986(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14986(t0,t1,t2);}
+
+C_noret_decl(trf_14801)
+static void C_fcall trf_14801(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14801(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14801(t0,t1,t2);}
+
+C_noret_decl(trf_14883)
+static void C_fcall trf_14883(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14883(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14883(t0,t1,t2);}
+
+C_noret_decl(trf_14707)
+static void C_fcall trf_14707(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14707(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14707(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14633(t0,t1,t2);}
+
+C_noret_decl(trf_14506)
+static void C_fcall trf_14506(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14506(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14506(t0,t1);}
+
+C_noret_decl(trf_14522)
+static void C_fcall trf_14522(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14522(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14522(t0,t1);}
+
+C_noret_decl(trf_14544)
+static void C_fcall trf_14544(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14544(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14544(t0,t1,t2);}
+
+C_noret_decl(trf_14603)
+static void C_fcall trf_14603(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14603(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14603(t0,t1);}
+
+C_noret_decl(trf_14326)
+static void C_fcall trf_14326(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14326(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14326(t0,t1,t2);}
+
+C_noret_decl(trf_14364)
+static void C_fcall trf_14364(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14364(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14364(t0,t1,t2);}
+
+C_noret_decl(trf_14334)
+static void C_fcall trf_14334(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14334(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14334(t0,t1,t2);}
+
+C_noret_decl(trf_14057)
+static void C_fcall trf_14057(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14057(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_14057(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14047)
+static void C_fcall trf_14047(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14047(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_14047(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13862)
+static void C_fcall trf_13862(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13862(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13862(t0,t1,t2);}
+
+C_noret_decl(trf_13878)
+static void C_fcall trf_13878(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13878(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13878(t0,t1,t2);}
+
+C_noret_decl(trf_13708)
+static void C_fcall trf_13708(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13708(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13708(t0,t1,t2);}
+
+C_noret_decl(trf_13698)
+static void C_fcall trf_13698(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13698(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13698(t0,t1,t2);}
+
+C_noret_decl(trf_13448)
+static void C_fcall trf_13448(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13448(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13448(t0,t1,t2);}
+
+C_noret_decl(trf_13456)
+static void C_fcall trf_13456(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13456(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13456(t0,t1,t2);}
+
+C_noret_decl(trf_13463)
+static void C_fcall trf_13463(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13463(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13463(t0,t1);}
+
+C_noret_decl(trf_13413)
+static void C_fcall trf_13413(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13413(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13413(t0,t1,t2);}
+
+C_noret_decl(trf_13285)
+static void C_fcall trf_13285(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13285(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13285(t0,t1,t2);}
+
+C_noret_decl(trf_13240)
+static void C_fcall trf_13240(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13240(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13240(t0,t1,t2);}
+
+C_noret_decl(trf_13111)
+static void C_fcall trf_13111(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13111(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13111(t0,t1,t2);}
+
+C_noret_decl(trf_13162)
+static void C_fcall trf_13162(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13162(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13162(t0,t1);}
+
+C_noret_decl(trf_13174)
+static void C_fcall trf_13174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13174(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13174(t0,t1);}
+
+C_noret_decl(trf_13144)
+static void C_fcall trf_13144(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13144(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13144(t0,t1);}
+
+C_noret_decl(trf_13002)
+static void C_fcall trf_13002(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13002(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13002(t0,t1,t2);}
+
+C_noret_decl(trf_13010)
+static void C_fcall trf_13010(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13010(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13010(t0,t1,t2);}
+
+C_noret_decl(trf_13061)
+static void C_fcall trf_13061(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13061(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13061(t0,t1,t2);}
+
+C_noret_decl(trf_12927)
+static void C_fcall trf_12927(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12927(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12927(t0,t1,t2);}
+
+C_noret_decl(trf_12937)
+static void C_fcall trf_12937(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12937(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12937(t0,t1);}
+
+C_noret_decl(trf_12873)
+static void C_fcall trf_12873(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12873(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12873(t0,t1,t2);}
+
+C_noret_decl(trf_12881)
+static void C_fcall trf_12881(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12881(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12881(t0,t1,t2);}
+
+C_noret_decl(trf_12750)
+static void C_fcall trf_12750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12750(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12750(t0,t1,t2);}
+
+C_noret_decl(trf_12778)
+static void C_fcall trf_12778(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12778(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12778(t0,t1);}
+
+C_noret_decl(trf_12668)
+static void C_fcall trf_12668(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12668(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12668(t0,t1,t2);}
+
+C_noret_decl(trf_12678)
+static void C_fcall trf_12678(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12678(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12678(t0,t1);}
+
+C_noret_decl(trf_12616)
+static void C_fcall trf_12616(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12616(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12616(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_12491)
+static void C_fcall trf_12491(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12491(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12491(t0,t1,t2);}
+
+C_noret_decl(trf_12208)
+static void C_fcall trf_12208(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12208(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12208(t0,t1);}
+
+C_noret_decl(trf_12501)
+static void C_fcall trf_12501(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12501(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12501(t0,t1);}
+
+C_noret_decl(trf_12425)
+static void C_fcall trf_12425(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12425(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12425(t0,t1,t2);}
+
+C_noret_decl(trf_12435)
+static void C_fcall trf_12435(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12435(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12435(t0,t1);}
+
+C_noret_decl(trf_12373)
+static void C_fcall trf_12373(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12373(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12373(t0,t1,t2);}
+
+C_noret_decl(trf_12333)
+static void C_fcall trf_12333(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12333(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12333(t0,t1,t2);}
+
+C_noret_decl(trf_12291)
+static void C_fcall trf_12291(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12291(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12291(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12259(t0,t1,t2);}
+
+C_noret_decl(trf_11710)
+static void C_fcall trf_11710(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11710(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11710(t0,t1);}
+
+C_noret_decl(trf_11718)
+static void C_fcall trf_11718(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11718(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11718(t0,t1);}
+
+C_noret_decl(trf_12105)
+static void C_fcall trf_12105(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12105(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12105(t0,t1,t2);}
+
+C_noret_decl(trf_11984)
+static void C_fcall trf_11984(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11984(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11984(t0,t1,t2);}
+
+C_noret_decl(trf_12083)
+static void C_fcall trf_12083(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12083(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12083(t0,t1);}
+
+C_noret_decl(trf_11874)
+static void C_fcall trf_11874(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11874(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11874(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_11794)
+static void C_fcall trf_11794(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11794(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11794(t0,t1,t2);}
+
+C_noret_decl(trf_11627)
+static void C_fcall trf_11627(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11627(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11627(t0,t1);}
+
+C_noret_decl(trf_11642)
+static void C_fcall trf_11642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11642(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11642(t0,t1,t2);}
+
+C_noret_decl(trf_11341)
+static void C_fcall trf_11341(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11341(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11341(t0,t1);}
+
+C_noret_decl(trf_11422)
+static void C_fcall trf_11422(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11422(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11422(t0,t1,t2);}
+
+C_noret_decl(trf_11451)
+static void C_fcall trf_11451(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11451(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11451(t0,t1,t2);}
+
+C_noret_decl(trf_11536)
+static void C_fcall trf_11536(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11536(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11536(t0,t1,t2);}
+
+C_noret_decl(trf_11492)
+static void C_fcall trf_11492(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11492(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11492(t0,t1,t2);}
+
+C_noret_decl(trf_11500)
+static void C_fcall trf_11500(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11500(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11500(t0,t1);}
+
+C_noret_decl(trf_11399)
+static void C_fcall trf_11399(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11399(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_11399(t0,t1,t2,t3);}
+
+C_noret_decl(trf_11278)
+static void C_fcall trf_11278(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11278(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11278(t0,t1,t2);}
+
+C_noret_decl(trf_11293)
+static void C_fcall trf_11293(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11293(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11293(t0,t1);}
+
+C_noret_decl(trf_10991)
+static void C_fcall trf_10991(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10991(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_10991(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10608)
+static void C_fcall trf_10608(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10608(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10608(t0,t1,t2);}
+
+C_noret_decl(trf_10616)
+static void C_fcall trf_10616(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10616(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10616(t0,t1,t2);}
+
+C_noret_decl(trf_10547)
+static void C_fcall trf_10547(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10547(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10547(t0,t1,t2);}
+
+C_noret_decl(trf_10502)
+static void C_fcall trf_10502(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10502(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10502(t0,t1,t2);}
+
+C_noret_decl(trf_10138)
+static void C_fcall trf_10138(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10138(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10138(t0,t1);}
+
+C_noret_decl(trf_10075)
+static void C_fcall trf_10075(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10075(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10075(t0,t1);}
+
+C_noret_decl(trf_10109)
+static void C_fcall trf_10109(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10109(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_10109(t0,t1,t2,t3);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9950(t0,t1,t2);}
+
+C_noret_decl(trf_9555)
+static void C_fcall trf_9555(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9555(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9555(t0,t1);}
+
+C_noret_decl(trf_9565)
+static void C_fcall trf_9565(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9565(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9565(t0,t1,t2);}
+
+C_noret_decl(trf_9330)
+static void C_fcall trf_9330(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9330(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9330(t0,t1);}
+
+C_noret_decl(trf_9089)
+static void C_fcall trf_9089(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9089(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9089(t0,t1);}
+
+C_noret_decl(trf_9023)
+static void C_fcall trf_9023(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9023(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9023(t0,t1,t2);}
+
+C_noret_decl(trf_8758)
+static void C_fcall trf_8758(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8758(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8758(t0,t1,t2);}
+
+C_noret_decl(trf_8375)
+static void C_fcall trf_8375(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8375(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8375(t0,t1,t2);}
+
+C_noret_decl(trf_8383)
+static void C_fcall trf_8383(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8383(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8383(t0,t1,t2);}
+
+C_noret_decl(trf_8637)
+static void C_fcall trf_8637(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8637(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8637(t0,t1,t2);}
+
+C_noret_decl(trf_8645)
+static void C_fcall trf_8645(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8645(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8645(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_8573)
+static void C_fcall trf_8573(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8573(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8573(t0,t1,t2);}
+
+C_noret_decl(trf_8581)
+static void C_fcall trf_8581(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8581(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8581(t0,t1,t2);}
+
+C_noret_decl(trf_8535)
+static void C_fcall trf_8535(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8535(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8535(t0,t1,t2);}
+
+C_noret_decl(trf_8500)
+static void C_fcall trf_8500(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8500(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8500(t0,t1,t2);}
+
+C_noret_decl(trf_8414)
+static void C_fcall trf_8414(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8414(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8414(t0,t1);}
+
+C_noret_decl(trf_7720)
+static void C_fcall trf_7720(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7720(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7720(t0,t1,t2);}
+
+C_noret_decl(trf_7739)
+static void C_fcall trf_7739(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7739(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7739(t0,t1);}
+
+C_noret_decl(trf_8286)
+static void C_fcall trf_8286(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8286(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8286(t0,t1,t2);}
+
+C_noret_decl(trf_8251)
+static void C_fcall trf_8251(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8251(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8251(t0,t1,t2);}
+
+C_noret_decl(trf_8214)
+static void C_fcall trf_8214(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8214(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8214(t0,t1,t2);}
+
+C_noret_decl(trf_8039)
+static void C_fcall trf_8039(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8039(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_8039(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_8150)
+static void C_fcall trf_8150(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8150(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8150(t0,t1,t2);}
+
+C_noret_decl(trf_8093)
+static void C_fcall trf_8093(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8093(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8093(t0,t1,t2);}
+
+C_noret_decl(trf_8060)
+static void C_fcall trf_8060(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8060(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_8060(t0,t1,t2);}
+
+C_noret_decl(trf_7988)
+static void C_fcall trf_7988(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7988(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7988(t0,t1,t2);}
+
+C_noret_decl(trf_7896)
+static void C_fcall trf_7896(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7896(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_7896(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7908)
+static void C_fcall trf_7908(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7908(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_7908(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7846)
+static void C_fcall trf_7846(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7846(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7846(t0,t1,t2);}
+
+C_noret_decl(trf_7771)
+static void C_fcall trf_7771(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7771(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_7771(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_7810)
+static void C_fcall trf_7810(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7810(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7810(t0,t1,t2);}
+
+C_noret_decl(trf_7788)
+static void C_fcall trf_7788(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7788(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7788(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7633(t0,t1,t2);}
+
+C_noret_decl(trf_7590)
+static void C_fcall trf_7590(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7590(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7590(t0,t1,t2);}
+
+C_noret_decl(trf_7581)
+static void C_fcall trf_7581(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7581(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7581(t0,t1);}
+
+C_noret_decl(trf_7443)
+static void C_fcall trf_7443(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7443(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7443(t0,t1);}
+
+C_noret_decl(trf_7449)
+static void C_fcall trf_7449(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7449(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7449(t0,t1);}
+
+C_noret_decl(trf_7384)
+static void C_fcall trf_7384(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7384(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7384(t0,t1,t2);}
+
+C_noret_decl(trf_7303)
+static void C_fcall trf_7303(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7303(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7303(t0,t1);}
+
+C_noret_decl(trf_7294)
+static void C_fcall trf_7294(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7294(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7294(t0,t1,t2);}
+
+C_noret_decl(trf_6881)
+static void C_fcall trf_6881(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6881(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_6881(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7022)
+static void C_fcall trf_7022(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7022(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7022(t0,t1);}
+
+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 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_7027(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7046)
+static void C_fcall trf_7046(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7046(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7046(t0,t1);}
+
+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 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_7051(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6939)
+static void C_fcall trf_6939(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6939(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6939(t0,t1,t2);}
+
+C_noret_decl(trf_6896)
+static void C_fcall trf_6896(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6896(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6896(t0,t1,t2);}
+
+C_noret_decl(trf_6884)
+static void C_fcall trf_6884(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6884(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_6884(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_6754)
+static void C_fcall trf_6754(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6754(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_6754(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6663)
+static void C_fcall trf_6663(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6663(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_6663(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6666)
+static void C_fcall trf_6666(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6666(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_6666(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6611)
+static void C_fcall trf_6611(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6611(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6611(t0,t1);}
+
+C_noret_decl(trf_6606)
+static void C_fcall trf_6606(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6606(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6606(t0,t1,t2);}
+
+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 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_5826(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6319)
+static void C_fcall trf_6319(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6319(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6319(t0,t1,t2);}
+
+C_noret_decl(trf_6325)
+static void C_fcall trf_6325(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6325(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_6325(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_6347)
+static void C_fcall trf_6347(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6347(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6347(t0,t1);}
+
+C_noret_decl(trf_6370)
+static void C_fcall trf_6370(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6370(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6370(t0,t1,t2);}
+
+C_noret_decl(trf_6142)
+static void C_fcall trf_6142(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6142(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_6142(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_6152)
+static void C_fcall trf_6152(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6152(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_6152(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_6198)
+static void C_fcall trf_6198(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6198(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6198(t0,t1);}
+
+C_noret_decl(trf_5829)
+static void C_fcall trf_5829(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5829(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_5829(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_6092)
+static void C_fcall trf_6092(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6092(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6092(t0,t1,t2);}
+
+C_noret_decl(trf_6027)
+static void C_fcall trf_6027(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6027(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6027(t0,t1,t2);}
+
+C_noret_decl(trf_5841)
+static void C_fcall trf_5841(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5841(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_5841(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5905)
+static void C_fcall trf_5905(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5905(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5905(t0,t1);}
+
+C_noret_decl(trf_5860)
+static void C_fcall trf_5860(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5860(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5860(t0,t1);}
+
+C_noret_decl(trf_5233)
+static void C_fcall trf_5233(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5233(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_5233(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_5751)
+static void C_fcall trf_5751(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5751(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5751(t0,t1);}
+
+C_noret_decl(trf_5670)
+static void C_fcall trf_5670(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5670(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5670(t0,t1);}
+
+C_noret_decl(trf_5624)
+static void C_fcall trf_5624(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5624(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5624(t0,t1);}
+
+C_noret_decl(trf_5627)
+static void C_fcall trf_5627(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5627(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5627(t0,t1);}
+
+C_noret_decl(trf_5590)
+static void C_fcall trf_5590(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5590(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5590(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5424(t0,t1,t2);}
+
+C_noret_decl(trf_5451)
+static void C_fcall trf_5451(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5451(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5451(t0,t1,t2);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5251(t0,t1);}
+
+C_noret_decl(trf_5263)
+static void C_fcall trf_5263(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5263(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5263(t0,t1);}
+
+C_noret_decl(trf_5199)
+static void C_fcall trf_5199(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5199(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5199(t0,t1,t2);}
+
+C_noret_decl(trf_5100)
+static void C_fcall trf_5100(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5100(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5100(t0,t1);}
+
+C_noret_decl(trf_5095)
+static void C_fcall trf_5095(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5095(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5095(t0,t1,t2);}
+
+C_noret_decl(trf_5069)
+static void C_fcall trf_5069(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5069(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_5069(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5075)
+static void C_fcall trf_5075(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5075(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5075(t0,t1,t2);}
+
+C_noret_decl(trf_5033)
+static void C_fcall trf_5033(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5033(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5033(t0,t1,t2);}
+
+C_noret_decl(trf_4969)
+static void C_fcall trf_4969(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4969(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4969(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4977(t0,t1,t2);}
+
+C_noret_decl(trf_4624)
+static void C_fcall trf_4624(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4624(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4624(t0,t1,t2);}
+
+C_noret_decl(trf_4652)
+static void C_fcall trf_4652(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4652(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4652(t0,t1);}
+
+C_noret_decl(trf_4823)
+static void C_fcall trf_4823(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4823(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4823(t0,t1);}
+
+C_noret_decl(trf_4863)
+static void C_fcall trf_4863(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4863(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4863(t0,t1,t2);}
+
+C_noret_decl(trf_4776)
+static void C_fcall trf_4776(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4776(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4776(t0,t1,t2);}
+
+C_noret_decl(trf_4701)
+static void C_fcall trf_4701(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4701(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4701(t0,t1,t2);}
+
+C_noret_decl(trf_4578)
+static void C_fcall trf_4578(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4578(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_4578(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_4376)
+static void C_fcall trf_4376(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4376(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_4376(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_4414)
+static void C_fcall trf_4414(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4414(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4414(t0,t1);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4431(t0,t1,t2);}
+
+C_noret_decl(trf_4450)
+static void C_fcall trf_4450(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4450(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4450(t0,t1);}
+
+C_noret_decl(trf_4330)
+static void C_fcall trf_4330(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4330(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4330(t0,t1,t2);}
+
+C_noret_decl(trf_4160)
+static void C_fcall trf_4160(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4160(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4160(t0,t1);}
+
+C_noret_decl(trf_4155)
+static void C_fcall trf_4155(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4155(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4155(t0,t1,t2);}
+
+C_noret_decl(trf_4004)
+static void C_fcall trf_4004(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4004(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_4004(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4010)
+static void C_fcall trf_4010(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4010(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4010(t0,t1,t2);}
+
+C_noret_decl(trf_4041)
+static void C_fcall trf_4041(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4041(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4041(t0,t1);}
+
+C_noret_decl(trf_3893)
+static void C_fcall trf_3893(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3893(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3893(t0,t1,t2);}
+
+C_noret_decl(trf_3903)
+static void C_fcall trf_3903(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3903(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3903(t0,t1);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3875(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(3654)){
+C_save(t1);
+C_rereclaim2(3654*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,356);
+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],13,"define-syntax");
+lf[111]=C_h_intern(&lf[111],5,"cdadr");
+lf[112]=C_h_intern(&lf[112],6,"lambda");
+lf[113]=C_h_intern(&lf[113],5,"caadr");
+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],17,"\003sysexpand-import");
+lf[168]=C_h_intern(&lf[168],17,"\003sysstring-append");
+lf[169]=C_decode_literal(C_heaptop,"\376B\000\000\001:");
+lf[170]=C_h_intern(&lf[170],18,"\003syssymbol->string");
+lf[171]=C_decode_literal(C_heaptop,"\376B\000\000\016invalid prefix");
+lf[172]=C_h_intern(&lf[172],15,"\003sysfind-module");
+lf[173]=C_h_intern(&lf[173],8,"\003sysload");
+lf[174]=C_h_intern(&lf[174],26,"\003sysmeta-macro-environment");
+lf[175]=C_decode_literal(C_heaptop,"\376B\000\000#cannot import from undefined module");
+lf[176]=C_h_intern(&lf[176],18,"\003sysfind-extension");
+lf[177]=C_decode_literal(C_heaptop,"\376B\000\000\007.import");
+lf[178]=C_decode_literal(C_heaptop,"\376B\000\000\034invalid import specification");
+lf[179]=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[180]=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[181]=C_h_intern(&lf[181],8,"\003syswarn");
+lf[182]=C_decode_literal(C_heaptop,"\376B\000\000\037renamed identifier not imported");
+lf[183]=C_h_intern(&lf[183],8,"\003sysdelq");
+lf[184]=C_h_intern(&lf[184],4,"cdar");
+lf[185]=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[186]=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[187]=C_decode_literal(C_heaptop,"\376B\000\000\034invalid import specification");
+lf[188]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[189]=C_h_intern(&lf[189],14,"\003sysblock-set!");
+lf[190]=C_h_intern(&lf[190],18,"\003sysmark-primitive");
+lf[191]=C_h_intern(&lf[191],3,"car");
+lf[192]=C_decode_literal(C_heaptop,"\376B\000\000%`reexport\047 only valid inside a module");
+lf[193]=C_decode_literal(C_heaptop,"\376B\000\000$re-importing already imported syntax");
+lf[194]=C_decode_literal(C_heaptop,"\376B\000\000(re-importing already imported identifier");
+lf[195]=C_h_intern(&lf[195],25,"\003sysmark-imported-symbols");
+lf[196]=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[197]=C_h_intern(&lf[197],6,"prefix");
+lf[198]=C_h_intern(&lf[198],6,"except");
+lf[199]=C_h_intern(&lf[199],6,"rename");
+lf[200]=C_h_intern(&lf[200],4,"only");
+lf[201]=C_h_intern(&lf[201],29,"\003sysinitial-macro-environment");
+lf[202]=C_h_intern(&lf[202],24,"\003sysprocess-syntax-rules");
+lf[203]=C_h_intern(&lf[203],7,"\003syscar");
+lf[204]=C_h_intern(&lf[204],7,"\003syscdr");
+lf[205]=C_h_intern(&lf[205],11,"\003sysvector\077");
+lf[206]=C_h_intern(&lf[206],17,"\003sysvector-length");
+lf[207]=C_h_intern(&lf[207],14,"\003sysvector-ref");
+lf[208]=C_h_intern(&lf[208],16,"\003sysvector->list");
+lf[209]=C_h_intern(&lf[209],16,"\003syslist->vector");
+lf[210]=C_h_intern(&lf[210],6,"\003sys>=");
+lf[211]=C_h_intern(&lf[211],5,"\003sys=");
+lf[212]=C_h_intern(&lf[212],5,"\003sys+");
+lf[213]=C_h_intern(&lf[213],8,"\003syscons");
+lf[214]=C_h_intern(&lf[214],7,"\003syseq\077");
+lf[215]=C_h_intern(&lf[215],10,"\003sysequal\077");
+lf[216]=C_h_intern(&lf[216],9,"\003syslist\077");
+lf[217]=C_h_intern(&lf[217],7,"\003sysmap");
+lf[218]=C_h_intern(&lf[218],9,"\003sysmap-n");
+lf[219]=C_h_intern(&lf[219],9,"\003sysnull\077");
+lf[220]=C_h_intern(&lf[220],9,"\003syspair\077");
+lf[221]=C_decode_literal(C_heaptop,"\376B\000\000\026ill-formed syntax rule");
+lf[222]=C_h_intern(&lf[222],11,"\004coresyntax");
+lf[223]=C_h_intern(&lf[223],12,"vector->list");
+lf[224]=C_decode_literal(C_heaptop,"\376B\000\000,template dimension error (too few ellipses\077)");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\021too many ellipses");
+lf[226]=C_h_intern(&lf[226],9,"\003sysapply");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000 segment matching not implemented");
+lf[228]=C_h_intern(&lf[228],4,"temp");
+lf[229]=C_h_intern(&lf[229],4,"tail");
+lf[230]=C_h_intern(&lf[230],2,"or");
+lf[231]=C_h_intern(&lf[231],4,"loop");
+lf[232]=C_h_intern(&lf[232],1,"l");
+lf[233]=C_h_intern(&lf[233],5,"input");
+lf[234]=C_h_intern(&lf[234],4,"else");
+lf[235]=C_h_intern(&lf[235],4,"cond");
+lf[236]=C_h_intern(&lf[236],7,"compare");
+lf[237]=C_h_intern(&lf[237],1,"i");
+lf[238]=C_h_intern(&lf[238],3,"and");
+lf[239]=C_h_intern(&lf[239],16,"\003sysmacro-subset");
+lf[240]=C_h_intern(&lf[240],27,"\003sysfixup-macro-environment");
+lf[241]=C_h_intern(&lf[241],29,"\003sysdefault-macro-environment");
+lf[243]=C_h_intern(&lf[243],26,"set-module-undefined-list!");
+lf[244]=C_h_intern(&lf[244],21,"module-undefined-list");
+lf[245]=C_h_intern(&lf[245],15,"\003sysmodule-name");
+lf[246]=C_h_intern(&lf[246],18,"\003sysmodule-exports");
+lf[247]=C_h_intern(&lf[247],16,"\003sysmodule-table");
+lf[248]=C_h_intern(&lf[248],5,"error");
+lf[249]=C_h_intern(&lf[249],6,"import");
+lf[250]=C_decode_literal(C_heaptop,"\376B\000\000\020module not found");
+lf[251]=C_h_intern(&lf[251],28,"\003systoplevel-definition-hook");
+lf[252]=C_h_intern(&lf[252],28,"\003sysregister-meta-expression");
+lf[254]=C_decode_literal(C_heaptop,"\376B\000\000\047redefinition of imported syntax binding");
+lf[255]=C_decode_literal(C_heaptop,"\376B\000\000&redefinition of imported value binding");
+lf[256]=C_h_intern(&lf[256],19,"\003sysregister-export");
+lf[257]=C_h_intern(&lf[257],15,"\003sysfind-export");
+lf[258]=C_h_intern(&lf[258],26,"\003sysregister-syntax-export");
+lf[259]=C_decode_literal(C_heaptop,"\376B\000\000!use of syntax precedes definition");
+lf[260]=C_h_intern(&lf[260],19,"\003sysregister-module");
+lf[262]=C_decode_literal(C_heaptop,"\376B\000\000\014 in module `");
+lf[263]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
+lf[264]=C_decode_literal(C_heaptop,"\376B\000\000!indirect export of syntax binding");
+lf[265]=C_decode_literal(C_heaptop,"\376B\000\000\033indirect reexport of syntax");
+lf[266]=C_decode_literal(C_heaptop,"\376B\000\000\042indirect export of unknown binding");
+lf[268]=C_h_intern(&lf[268],32,"\003syscompiled-module-registration");
+lf[269]=C_h_intern(&lf[269],28,"\003sysregister-compiled-module");
+lf[270]=C_h_intern(&lf[270],4,"cons");
+lf[271]=C_h_intern(&lf[271],4,"eval");
+lf[272]=C_decode_literal(C_heaptop,"\376B\000\0000cannot find implementation of re-exported syntax");
+lf[273]=C_h_intern(&lf[273],19,"\003sysprimitive-alias");
+lf[274]=C_decode_literal(C_heaptop,"\376B\000\000\002#%");
+lf[275]=C_h_intern(&lf[275],29,"\003sysregister-primitive-module");
+lf[276]=C_decode_literal(C_heaptop,"\376B\000\0001unknown macro referenced while registering module");
+lf[277]=C_h_intern(&lf[277],18,"module-exists-list");
+lf[278]=C_h_intern(&lf[278],19,"\003sysfinalize-module");
+lf[279]=C_decode_literal(C_heaptop,"\376B\000\000$(internal) indirect export not found");
+lf[280]=C_decode_literal(C_heaptop,"\376B\000\000\021module unresolved");
+lf[281]=C_decode_literal(C_heaptop,"\376B\000\000\027 suggesting: `(import ");
+lf[282]=C_decode_literal(C_heaptop,"\376B\000\000\002)\047");
+lf[283]=C_decode_literal(C_heaptop,"\376B\000\000\025 suggesting one of:\012");
+lf[284]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[285]=C_decode_literal(C_heaptop,"\376B\000\000\026Warning: `(import ");
+lf[286]=C_decode_literal(C_heaptop,"\376B\000\000\003)\047\012");
+lf[287]=C_h_intern(&lf[287],7,"\004coredb");
+lf[288]=C_decode_literal(C_heaptop,"\376B\000\000(reference to possibly unbound identifier");
+lf[289]=C_decode_literal(C_heaptop,"\376B\000\000 exported identifier for module `");
+lf[290]=C_decode_literal(C_heaptop,"\376B\000\000\026\047 has not been defined");
+lf[291]=C_h_intern(&lf[291],14,"make-parameter");
+lf[292]=C_h_intern(&lf[292],12,"syntax-rules");
+lf[293]=C_h_intern(&lf[293],3,"...");
+lf[294]=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[295]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\002");
+lf[296]=C_h_intern(&lf[296],6,"export");
+lf[297]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[298]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid export syntax");
+lf[299]=C_decode_literal(C_heaptop,"\376B\000\000!`export\047 used outside module body");
+lf[300]=C_h_intern(&lf[300],16,"begin-for-syntax");
+lf[301]=C_h_intern(&lf[301],24,"\004coreelaborationtimeonly");
+lf[302]=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[303]=C_h_intern(&lf[303],1,"*");
+lf[304]=C_h_intern(&lf[304],11,"\004coremodule");
+lf[305]=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[306]=C_h_intern(&lf[306],17,"require-extension");
+lf[307]=C_h_intern(&lf[307],22,"\004corerequire-extension");
+lf[308]=C_h_intern(&lf[308],15,"require-library");
+lf[309]=C_h_intern(&lf[309],11,"cond-expand");
+lf[310]=C_decode_literal(C_heaptop,"\376B\000\000\042syntax error in `cond-expand\047 form");
+lf[311]=C_h_intern(&lf[311],12,"\003sysfeature\077");
+lf[312]=C_decode_literal(C_heaptop,"\376B\000\000(no matching clause in `cond-expand\047 form");
+lf[313]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[314]=C_h_intern(&lf[314],3,"not");
+lf[315]=C_h_intern(&lf[315],5,"delay");
+lf[316]=C_h_intern(&lf[316],16,"\003sysmake-promise");
+lf[317]=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[318]=C_h_intern(&lf[318],10,"quasiquote");
+lf[319]=C_h_intern(&lf[319],8,"\003syslist");
+lf[320]=C_h_intern(&lf[320],17,"%unquote-splicing");
+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_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[348]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\001_\376\001\000\000\013lambda-list");
+lf[349]=C_decode_literal(C_heaptop,"\376\000\000\000\002\376\001\000\000\001_\376\377\001\000\000\000\001");
+lf[350]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\006symbol\376\001\000\000\013lambda-list");
+lf[351]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016\004coreundefined\376\377\016");
+lf[352]=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[353]=C_h_intern(&lf[353],8,"reexport");
+lf[354]=C_h_intern(&lf[354],17,"import-for-syntax");
+lf[355]=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,356,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c243 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3841,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 41 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),t3,lf[355],*((C_word*)lf[2]+1));}
+
+/* k3839 */
+static void C_ccall f_3841(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_3841,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_3869,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 68 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[291]))(3,*((C_word*)lf[291]+1),t3,C_SCHEME_END_OF_LIST);}
+
+/* k3867 in k3839 */
+static void C_ccall f_3869(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_3869,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_3873,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 69 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[291]))(3,*((C_word*)lf[291]+1),t3,C_SCHEME_END_OF_LIST);}
+
+/* k3871 in k3867 in k3839 */
+static void C_ccall f_3873(C_word c,C_word t0,C_word t1){
+C_word 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_3873,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_3875,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_3893,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_4002,a[2]=((C_word)li7),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[19]+1 /* (set! strip-syntax ...) */,C_retrieve(lf[14]));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4211,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 134 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[291]))(3,*((C_word*)lf[291]+1),t7,C_SCHEME_END_OF_LIST);}
+
+/* k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4211(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4211,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_4215,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_4253,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_4266,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_4316,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_4367,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_4373,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_4948,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_4966,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_5067,a[2]=((C_word)li45),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[74]+1 /* (set! expand ...) */,C_retrieve(lf[73]));
+t17=C_mutate((C_word*)lf[75]+1 /* (set! extended-lambda-list? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5153,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp));
+t18=*((C_word*)lf[79]+1);
+t19=C_retrieve(lf[12]);
+t20=C_mutate((C_word*)lf[80]+1 /* (set! expand-extended-lambda-list ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5196,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_5824,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_6663,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_6751,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_6821,a[2]=((C_word)li74),tmp=(C_word)a,a+=3,tmp));
+t29=C_mutate((C_word*)lf[129]+1 /* (set! syntax-error ...) */,C_retrieve(lf[38]));
+t30=C_mutate((C_word*)lf[42]+1 /* (set! syntax-rules-mismatch ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6832,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_6838,a[2]=((C_word)li77),tmp=(C_word)a,a+=3,tmp));
+t32=*((C_word*)lf[33]+1);
+t33=C_retrieve(lf[133]);
+t34=C_retrieve(lf[131]);
+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_6879,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_7351,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_7354,a[2]=((C_word)li98),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[167]+1 /* (set! expand-import ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7566,a[2]=((C_word)li127),tmp=(C_word)a,a+=3,tmp));
+t40=C_mutate((C_word*)lf[190]+1 /* (set! mark-primitive ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8752,a[2]=((C_word)li129),tmp=(C_word)a,a+=3,tmp));
+t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8795,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15583,a[2]=t41,tmp=(C_word)a,a+=3,tmp);
+t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15585,a[2]=((C_word)li253),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 933 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t42,t43);}
+
+/* a15584 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15585(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_15585,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[167]);
+/* g17931794 */
+t6=t5;
+((C_proc10)C_retrieve_proc(t6))(10,t6,t1,t2,t3,t4,C_retrieve(lf[3]),C_retrieve(lf[20]),C_SCHEME_FALSE,C_SCHEME_FALSE,lf[249]);}
+
+/* k15581 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15583(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 931 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[249],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8795(C_word c,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_8795,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8798,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15573,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15575,a[2]=((C_word)li252),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 939 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a15574 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15575(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_15575,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[167]);
+/* g18081809 */
+t6=t5;
+((C_proc10)C_retrieve_proc(t6))(10,t6,t1,t2,t3,t4,C_retrieve(lf[4]),C_retrieve(lf[174]),C_SCHEME_TRUE,C_SCHEME_FALSE,lf[354]);}
+
+/* k15571 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15573(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 937 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[354],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8798(C_word c,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_8798,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8801,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)li251),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 945 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a15564 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+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_retrieve(lf[167]);
+/* g18231824 */
+t6=t5;
+((C_proc10)C_retrieve_proc(t6))(10,t6,t1,t2,t3,t4,C_retrieve(lf[3]),C_retrieve(lf[20]),C_SCHEME_TRUE,C_SCHEME_TRUE,lf[353]);}
+
+/* k15561 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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: 943 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[353],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8801,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8805,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 949 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}
+
+/* k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8805(C_word c,C_word t0,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_8805,2,t0,t1);}
+t2=C_mutate((C_word*)lf[201]+1 /* (set! initial-macro-environment ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8808,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15436,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15438,a[2]=((C_word)li250),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 954 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t4,t5);}
+
+/* a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15438(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_15438,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_15448,a[2]=t3,a[3]=t7,a[4]=((C_word)li249),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_15448(t9,t1,t5);}
+
+/* loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_15448(C_word t0,C_word 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_15448,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_15504,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 967 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t6,lf[105],t3,lf[348]);}
+else{
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15517,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: 971 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t6,lf[105],t3,lf[350]);}}
+else{
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15464,a[2]=t1,a[3]=t3,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 960 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[105],t3,lf[150]);}}
+
+/* k15462 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15464(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_15464,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15467,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: 961 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,lf[105],((C_word*)t0)[4],lf[352]);}
+
+/* k15465 in k15462 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15467(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_15467,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15470,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_15495,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 962 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[70]))(2,*((C_word*)lf[70]+1),t3);}
+
+/* k15493 in k15465 in k15462 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15495(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 962 ##sys#register-export */
+((C_proc4)C_retrieve_symbol_proc(lf[256]))(4,*((C_word*)lf[256]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15468 in k15465 in k15462 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15470(C_word c,C_word t0,C_word 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_15470,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[351],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));}}
+
+/* k15515 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15517(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_15517,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15520,a[2]=((C_word*)t0)[2],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: 972 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,lf[105],((C_word*)t0)[3],lf[349]);}
+
+/* k15518 in k15515 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15520(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_15520,2,t0,t1);}
+t2=(C_word)C_i_car(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15539,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: 973 r */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[112]);}
+
+/* k15537 in k15518 in k15515 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15539(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_15539,2,t0,t1);}
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15551,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);}
+
+/* k15549 in k15537 in k15518 in k15515 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15551(C_word c,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_15551,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: 973 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_15448(t5,((C_word*)t0)[2],t4);}
+
+/* k15502 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15504(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_15504,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15507,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: 968 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,lf[105],((C_word*)t0)[2],lf[347]);}
+
+/* k15505 in k15502 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15507(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_15507,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15514,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 969 ##sys#expand-curried-define */
+((C_proc5)C_retrieve_symbol_proc(lf[114]))(5,*((C_word*)lf[114]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k15512 in k15505 in k15502 in loop in a15437 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15514(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 969 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_15448(t2,((C_word*)t0)[2],t1);}
+
+/* k15434 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15436(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 951 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[105],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t4;
+C_word t5;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8808,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8811,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15377,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15379,a[2]=((C_word)li248),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 978 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a15378 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15379(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_15379,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_15408,a[2]=t3,a[3]=t6,a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 987 r */
+t9=t3;
+((C_proc3)C_retrieve_proc(t9))(3,t9,t8,lf[335]);}}}
+
+/* k15406 in a15378 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15408(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_15408,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15428,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: 987 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[238]);}
+
+/* k15426 in k15406 in a15378 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15428(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_15428,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15432,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);}
+
+/* k15430 in k15426 in k15406 in a15378 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15432(C_word c,C_word t0,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_15432,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));}
+
+/* k15375 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15377(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 975 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[238],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8811(C_word c,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_8811,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8814,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15287,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15289,a[2]=((C_word)li247),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 992 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15289(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_15289,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_15314,a[2]=t3,a[3]=t6,a[4]=t1,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1001 r */
+t9=t3;
+((C_proc3)C_retrieve_proc(t9))(3,t9,t8,lf[88]);}}}
+
+/* k15312 in a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15314(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_15314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15321,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: 1002 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[47]);}
+
+/* k15319 in k15312 in a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15321(C_word c,C_word t0,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_15321,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_15341,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: 1003 r */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[335]);}
+
+/* k15339 in k15319 in k15312 in a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15341(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_15341,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15361,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: 1003 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[230]);}
+
+/* k15359 in k15339 in k15319 in k15312 in a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15361(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_15361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15365,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);}
+
+/* k15363 in k15359 in k15339 in k15319 in k15312 in a15288 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15365(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_15365,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));}
+
+/* k15285 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15287(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 989 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[230],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8814(C_word c,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_8814,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8817,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14957,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14959,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1008 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14959(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_14959,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14966,a[2]=t5,a[3]=t1,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1011 r */
+t7=t3;
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[47]);}
+
+/* k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14966(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_14966,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14969,a[2]=((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: 1012 r */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[335]);}
+
+/* k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14969(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_14969,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14972,a[2]=((C_word*)t0)[2],a[3]=((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: 1013 r */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[346]);}
+
+/* k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14972(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_14972,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14975,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: 1014 r */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[230]);}
+
+/* k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14975(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_14975,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14978,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1015 r */
+t3=((C_word*)t0)[6];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[234]);}
+
+/* k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14981,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: 1016 r */
+t3=((C_word*)t0)[6];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[112]);}
+
+/* k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14981(C_word c,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_14981,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_14986,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)li245),tmp=(C_word)a,a+=12,tmp));
+t5=((C_word*)t3)[1];
+f_14986(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14986(C_word 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_14986,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_15002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 1022 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[235],t3,lf[344]);}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[345]);}}
+
+/* k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15002(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_15002,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_15008,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: 1023 c */
+t4=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,((C_word*)t0)[2],t3);}
+
+/* k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15008(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_15008,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15015,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_15044,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[12],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1024 expand */
+t5=((C_word*)((C_word*)t0)[9])[1];
+f_14986(t5,t4,((C_word*)t0)[8]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_15050,a[2]=((C_word*)t0)[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: 1025 c */
+t5=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t3,((C_word*)t0)[2],t4);}}}
+
+/* k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15050(C_word c,C_word t0,C_word 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_15050,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15053,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: 1026 r */
+t3=((C_word*)t0)[5];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[88]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15118,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: 1032 c */
+t6=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t2,((C_word*)t0)[2],t5);}
+else{
+t5=t2;
+f_15118(2,t5,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_15118(2,t3,C_SCHEME_FALSE);}}}
+
+/* k15116 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15118(C_word c,C_word t0,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_15118,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15121,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: 1033 r */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(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_15243,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);}}
+
+/* k15241 in k15116 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15243(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_15243,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_15239,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: 1042 expand */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_14986(t4,t3,((C_word*)t0)[2]);}
+
+/* k15237 in k15241 in k15116 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15239(C_word c,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_15239,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));}
+
+/* k15119 in k15116 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15121(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_15121,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[226],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[226],t12);
+t14=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15176,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: 1039 expand */
+t15=((C_word*)((C_word*)t0)[3])[1];
+f_14986(t15,t14,((C_word*)t0)[2]);}
+
+/* k15174 in k15119 in k15116 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15176(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_15176,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));}
+
+/* k15051 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15053(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_15053,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_15092,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: 1030 expand */
+t10=((C_word*)((C_word*)t0)[3])[1];
+f_14986(t10,t9,((C_word*)t0)[2]);}
+
+/* k15090 in k15051 in k15048 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15092(C_word c,C_word t0,C_word t1){
+C_word 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_15092,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));}
+
+/* k15042 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15044(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_15044,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));}
+
+/* k15013 in k15006 in k15000 in expand in k14979 in k14976 in k14973 in k14970 in k14967 in k14964 in a14958 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_15015(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_15015,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));}
+
+/* k14955 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14957(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1005 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[235],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8817(C_word c,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_8817,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8820,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14756,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14758,a[2]=((C_word)li244),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1047 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14758(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_14758,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14762,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1049 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[339],t2,lf[343]);}
+
+/* k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14762(C_word c,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_14762,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_14771,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: 1052 r */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[88]);}
+
+/* k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14771(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_14771,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14774,a[2]=((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: 1053 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[335]);}
+
+/* k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14774(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_14774,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14777,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: 1054 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[230]);}
+
+/* k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14777(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_14777,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14780,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: 1055 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[234]);}
+
+/* k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14780(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_14780,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_14799,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_14801,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)li243),tmp=(C_word)a,a+=9,tmp));
+t9=((C_word*)t7)[1];
+f_14801(t9,t5,((C_word*)t0)[2]);}
+
+/* expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14801(C_word 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_14801,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_14817,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: 1062 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[339],t3,lf[341]);}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[342]);}}
+
+/* k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14817(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_14817,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14823,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: 1063 c */
+t4=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,((C_word*)t0)[2],t3);}
+
+/* k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14823(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_14823,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14830,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_14873,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_14877,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_14883,a[2]=t4,a[3]=t10,a[4]=t6,a[5]=((C_word*)t0)[2],a[6]=((C_word)li242),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_14883(t12,t7,t8);}}
+
+/* loop1950 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14883(C_word t0,C_word 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_14883,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_14910,a[2]=((C_word*)t0)[5],a[3]=((C_word)li241),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_14910(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));
+/* loop19501963 */
+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));
+/* loop19501963 */
+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);}}
+
+/* g1966 in loop1950 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_14910(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));}
+
+/* k14875 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14877(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);}
+
+/* k14871 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14873(C_word c,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_14873,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_14865,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);}
+
+/* k14863 in k14871 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14865(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_14865,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_14861,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: 1068 expand */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_14801(t4,t3,((C_word*)t0)[2]);}
+
+/* k14859 in k14863 in k14871 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14861(C_word c,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_14861,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));}
+
+/* k14828 in k14821 in k14815 in expand in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14830(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_14830,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));}
+
+/* k14797 in k14778 in k14775 in k14772 in k14769 in k14760 in a14757 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14799(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_14799,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));}
+
+/* k14754 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14756(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1044 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[339],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8820(C_word c,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_8820,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8823,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14687,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14689,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1073 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14689(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_14689,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14693,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1075 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[100],t2,lf[338]);}
+
+/* k14691 in a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14693(C_word c,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_14693,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_14702,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1078 r */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[47]);}
+
+/* k14700 in k14691 in a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14702(C_word c,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_14702,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_14707,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li239),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_14707(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* expand in k14700 in k14691 in a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14707(C_word t0,C_word 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_14707,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_14725,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_14744,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: 1082 expand */
+t10=t6;
+t11=t7;
+t1=t10;
+t2=t11;
+goto loop;}}
+
+/* k14742 in expand in k14700 in k14691 in a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14744(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_14744,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));}
+
+/* k14723 in expand in k14700 in k14691 in a14688 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14725(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_14725,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));}
+
+/* k14685 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14687(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1070 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[100],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8823(C_word c,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_8823,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8826,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14440,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14442,a[2]=((C_word)li238),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1087 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14442(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_14442,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14446,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1089 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[332],t2,lf[337]);}
+
+/* k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14446(C_word c,C_word t0,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_14446,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_14458,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: 1093 r */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[336]);}
+
+/* k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14458(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_14458,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14461,a[2]=((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: 1094 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[47]);}
+
+/* k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14461(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_14461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14464,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: 1095 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[335]);}
+
+/* k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14464(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_14464,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_14479,a[2]=((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_14633,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li237),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_14633(t10,t6,((C_word*)t0)[3]);}
+
+/* loop2012 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14633(C_word t0,C_word 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_14633,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));
+/* loop20122025 */
+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));
+/* loop20122025 */
+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);}}
+
+/* k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14479(C_word c,C_word t0,C_word 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_14479,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_14506,a[2]=((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_14506(t6,lf[334]);}
+else{
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14631,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);}}
+
+/* k14629 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14631(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_14631,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_14506(t2,(C_word)C_a_i_cons(&a,2,lf[103],t1));}
+
+/* k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14506(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_14506,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14522,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_14522(t4,lf[333]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14621,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);}}
+
+/* k14619 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14621,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_SCHEME_END_OF_LIST,t1);
+t3=((C_word*)t0)[3];
+f_14522(t3,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t2));}
+
+/* k14520 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14522(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_14522,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14538,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_14542,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_14544,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li236),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_14544(t11,t7,((C_word*)t0)[2]);}
+
+/* loop2045 in k14520 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14544(C_word t0,C_word 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_14544,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_14603,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_14603(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_14603(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);}}
+
+/* k14601 in loop2045 in k14520 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14603(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_14603,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));
+/* loop20452058 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_14544(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));
+/* loop20452058 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_14544(t6,((C_word*)t0)[3],t5);}}
+
+/* k14540 in k14520 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14542(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);}
+
+/* k14536 in k14520 in k14504 in k14477 in k14462 in k14459 in k14456 in k14444 in a14441 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_14538,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));}
+
+/* k14438 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14440(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1084 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[332],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8826(C_word c,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_8826,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8829,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14030,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14032,a[2]=((C_word)li235),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1116 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14032(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_14032,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14036,a[2]=t3,a[3]=t1,a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1118 r */
+t6=t3;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[82]);}
+
+/* k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14036(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_14036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14039,a[2]=((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: 1119 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[318]);}
+
+/* k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14039(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_14039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14042,a[2]=((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: 1120 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[331]);}
+
+/* k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14042(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_14042,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14045,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: 1121 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[330]);}
+
+/* k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14045(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_14045,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_14047,a[2]=t5,a[3]=t7,a[4]=((C_word)li230),tmp=(C_word)a,a+=5,tmp));
+t9=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14057,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]=t3,a[8]=((C_word)li231),tmp=(C_word)a,a+=9,tmp));
+t10=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14326,a[2]=t7,a[3]=((C_word)li234),tmp=(C_word)a,a+=4,tmp));
+t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14429,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1171 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t11,lf[318],((C_word*)t0)[3],lf[329]);}
+
+/* k14427 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14429(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: 1172 walk */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14047(t3,((C_word*)t0)[2],t2,C_fix(0));}
+
+/* simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14326(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_14326,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14330,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1159 match-expression */
+f_6663(t3,t2,lf[327],lf[328]);}
+
+/* k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14330(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_14330,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14334,a[2]=((C_word*)t0)[4],a[3]=((C_word)li232),tmp=(C_word)a,a+=4,tmp);
+/* g21472148 */
+t3=t2;
+f_14334(t3,((C_word*)t0)[3],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14360,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: 1161 match-expression */
+f_6663(t2,((C_word*)t0)[2],lf[325],lf[326]);}}
+
+/* k14358 in k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14360,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14364,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li233),tmp=(C_word)a,a+=5,tmp);
+/* g21552156 */
+t3=t2;
+f_14364(t3,((C_word*)t0)[2],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14411,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1168 match-expression */
+f_6663(t2,((C_word*)t0)[3],lf[323],lf[324]);}}
+
+/* k14409 in k14358 in k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14411(C_word c,C_word 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);}}
+
+/* g2155 in k14358 in k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14364(C_word t0,C_word 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_14364,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_14393,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);}}
+
+/* k14391 in g2155 in k14358 in k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14393(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_14393,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[319],t2);
+/* expand.scm: 1165 simplify */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_14326(t4,((C_word*)t0)[2],t3);}
+
+/* g2147 in k14328 in simplify in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14334(C_word t0,C_word 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_14334,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[319],t5);
+/* expand.scm: 1160 simplify */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_14326(t7,t1,t6);}
+
+/* walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14057(C_word t0,C_word 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_14057,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_14075,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14079,a[2]=t3,a[3]=t4,a[4]=((C_word*)t0)[7],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1125 vector->list */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[223]+1)))(3,*((C_word*)lf[223]+1),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_14104,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: 1130 c */
+t7=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t7))(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));}}}
+
+/* k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_14104,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_14130,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: 1136 walk */
+t8=((C_word*)((C_word*)t0)[6])[1];
+f_14047(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_14151,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: 1138 c */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[5],((C_word*)t0)[4]);}}
+
+/* k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14151(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_14151,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_14176,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: 1141 walk */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_14047(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_14199,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1143 walk */
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_14047(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|7,a[1]=(C_word)f_14298,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[10],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[7],a[6]=((C_word*)t0)[6],a[7]=t3,tmp=(C_word)a,a+=8,tmp);
+/* expand.scm: 1147 c */
+t5=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,((C_word*)t0)[2]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14312,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: 1157 walk */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_14047(t3,t2,((C_word*)t0)[4],((C_word*)t0)[6]);}}}
+
+/* k14310 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14312(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_14312,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14320,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1157 walk */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14318 in k14310 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14320(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_14320,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[213],t3));}
+
+/* k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14298(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_14298,2,t0,t1);}
+t2=(C_truep(t1)?(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_eqp(((C_word*)t0)[6],C_fix(0));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14241,a[2]=((C_word*)t0)[5],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1151 walk */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t6,t5,((C_word*)t0)[3],((C_word*)t0)[6]);}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14272,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);
+t6=(C_word)C_fixnum_difference(((C_word*)t0)[6],C_fix(1));
+/* expand.scm: 1153 walk */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t7,t5,t3,t6);}}
+else{
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14287,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);
+/* expand.scm: 1155 walk */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t4,t3,((C_word*)t0)[2],((C_word*)t0)[6]);}}
+
+/* k14285 in k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14287(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_14287,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14295,a[2]=((C_word*)t0)[5],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1155 walk */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14293 in k14285 in k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[213],t3));}
+
+/* k14270 in k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14272(C_word c,C_word t0,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_14272,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[320],t2);
+t4=(C_word)C_a_i_cons(&a,2,lf[319],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14260,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1154 walk */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t6,t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14258 in k14270 in k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14260(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_14260,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[213],t3));}
+
+/* k14239 in k14296 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14241(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_14241,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));}
+
+/* k14197 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14199(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_14199,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[213],((C_word*)t0)[2],t1));}
+
+/* k14174 in k14149 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14176(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_14176,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[319],t3));}
+
+/* k14128 in k14102 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14130(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_14130,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[319],((C_word*)t0)[2],t1));}
+
+/* k14077 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14079(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1125 walk */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14047(t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k14073 in walk1 in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14075(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_14075,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[209],t2));}
+
+/* walk in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_14047(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_14047,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14055,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1122 walk1 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_14057(t5,t4,t2,t3);}
+
+/* k14053 in walk in k14043 in k14040 in k14037 in k14034 in a14031 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14055(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1122 simplify */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_14326(t2,((C_word*)t0)[2],t1);}
+
+/* k14028 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14030(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1113 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[318],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8829(C_word c,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_8829,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8832,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13997,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13999,a[2]=((C_word)li229),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1177 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13998 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13999(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_13999,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14003,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1179 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[315],t2,lf[317]);}
+
+/* k14001 in a13998 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_14003(C_word c,C_word t0,C_word 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_14003,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[112],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[316],t6));}
+
+/* k13995 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13997(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1174 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[315],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8832(C_word c,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_8832,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8835,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13678,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13680,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1185 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13680(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_13680,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13687,a[2]=t3,a[3]=t1,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1188 r */
+t7=t3;
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[230]);}
+
+/* k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13687(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_13687,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13690,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: 1189 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[314]);}
+
+/* k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13690(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_13690,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13693,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: 1190 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[234]);}
+
+/* k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13693(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_13693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13696,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: 1191 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[238]);}
+
+/* k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_13696,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_13698,a[2]=((C_word*)t0)[7],a[3]=((C_word)li224),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13708,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)li225),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_13862,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)li227),tmp=(C_word)a,a+=9,tmp));
+t11=((C_word*)t9)[1];
+f_13862(t11,((C_word*)t0)[2],((C_word*)t0)[7]);}
+
+/* expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13862(C_word t0,C_word 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_13862,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_13876,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_13878,a[2]=t5,a[3]=t10,a[4]=t7,a[5]=((C_word)li226),tmp=(C_word)a,a+=6,tmp));
+t12=((C_word*)t10)[1];
+f_13878(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_13949,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: 1228 c */
+t8=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t8))(4,t8,t7,t6,((C_word*)t0)[3]);}
+else{
+/* expand.scm: 1226 err */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_13698(t6,t1,t4);}}
+else{
+/* expand.scm: 1221 err */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_13698(t4,t1,t2);}}}
+
+/* k13947 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13949(C_word c,C_word t0,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_13949,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[313]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13965,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_13971,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: 1233 test */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13708(t3,t2,((C_word*)t0)[2]);}}
+
+/* k13969 in k13947 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13971(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_13971,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13978,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: 1234 expand */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13862(t2,((C_word*)t0)[5],((C_word*)t0)[2]);}}
+
+/* k13976 in k13969 in k13947 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13978(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_13978,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));}
+
+/* k13963 in k13947 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13965(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_13965,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));}
+
+/* loop2237 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13878(C_word t0,C_word 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_13878,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));
+/* loop22372250 */
+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));
+/* loop22372250 */
+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);}}
+
+/* k13874 in expand in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13876(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[312],t1);}
+
+/* test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13708(C_word t0,C_word 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_13708,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_13722,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1197 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),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_13743,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: 1202 c */
+t6=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t5,((C_word*)t0)[7],t3);}
+else{
+/* expand.scm: 1198 err */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_13698(t3,t1,t2);}}}
+
+/* k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13743(C_word c,C_word t0,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_13743,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_13761,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: 1205 test */
+t5=((C_word*)((C_word*)t0)[8])[1];
+f_13708(t5,t3,t4);}
+else{
+/* expand.scm: 1207 err */
+t3=((C_word*)((C_word*)t0)[7])[1];
+f_13698(t3,((C_word*)t0)[10],((C_word*)t0)[6]);}}}
+else{
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_13789,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: 1208 c */
+t3=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[5],((C_word*)t0)[2]);}}
+
+/* k13787 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13789(C_word c,C_word t0,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_13789,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_13804,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: 1211 test */
+t5=((C_word*)((C_word*)t0)[7])[1];
+f_13708(t5,t3,t4);}
+else{
+/* expand.scm: 1213 err */
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_13698(t3,((C_word*)t0)[9],((C_word*)t0)[5]);}}}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13839,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: 1214 c */
+t3=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k13837 in k13787 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13839(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_13839,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13846,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: 1214 test */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_13708(t4,t2,t3);}
+else{
+/* expand.scm: 1215 err */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_13698(t2,((C_word*)t0)[5],((C_word*)t0)[4]);}}
+
+/* k13844 in k13837 in k13787 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13846(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));}
+
+/* k13802 in k13787 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13804(C_word c,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_13804,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_13818,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);}}
+
+/* k13816 in k13802 in k13787 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13818(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13818,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+/* expand.scm: 1212 test */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13708(t3,((C_word*)t0)[2],t2);}
+
+/* k13759 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13761(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_13761,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13772,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);}}
+
+/* k13770 in k13759 in k13741 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13772(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13772,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+/* expand.scm: 1206 test */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13708(t3,((C_word*)t0)[2],t2);}
+
+/* k13720 in test in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13722(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1197 ##sys#feature? */
+((C_proc3)C_retrieve_symbol_proc(lf[311]))(3,*((C_word*)lf[311]+1),((C_word*)t0)[2],t1);}
+
+/* err in k13694 in k13691 in k13688 in k13685 in a13679 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13698(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_13698,NULL,3,t0,t1,t2);}
+t3=(C_word)C_a_i_cons(&a,2,lf[309],((C_word*)t0)[2]);
+/* expand.scm: 1193 ##sys#error */
+t4=*((C_word*)lf[18]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,lf[310],t2,t3);}
+
+/* k13676 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13678(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1182 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[309],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8835(C_word c,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_8835,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8838,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13657,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13659,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1239 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13658 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13659(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_13659,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[307],t7));}
+
+/* k13655 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13657(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1236 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[308],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8838(C_word c,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_8838,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8841,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13636,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13638,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1247 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13637 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13638(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_13638,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[307],t7));}
+
+/* k13634 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13636(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1244 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[306],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8841(C_word c,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_8841,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8844,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13585,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13587,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1255 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13586 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13587(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_13587,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13591,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1257 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[68],t2,lf[305]);}
+
+/* k13589 in a13586 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13591(C_word c,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_13591,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13628,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: 1260 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t3,t4);}
+
+/* k13626 in k13589 in a13586 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13628(C_word c,C_word t0,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_13628,2,t0,t1);}
+t2=(C_word)C_eqp(lf[303],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_13614,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);}
+
+/* k13612 in k13626 in k13589 in a13586 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13614(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_13614,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[304],t3));}
+
+/* k13583 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13585(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1252 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[68],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8844(C_word c,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_8844,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8847,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13541,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13543,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1268 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13542 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13543(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_13543,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13547,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1270 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[300],t2,lf[302]);}
+
+/* k13545 in a13542 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13547,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13550,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_13577,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);}
+
+/* k13575 in k13545 in a13542 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13577(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13577,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[103],t1);
+/* expand.scm: 1271 ##sys#register-meta-expression */
+((C_proc3)C_retrieve_symbol_proc(lf[252]))(3,*((C_word*)lf[252]+1),((C_word*)t0)[2],t2);}
+
+/* k13548 in k13545 in a13542 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13550(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_13550,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13565,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);}
+
+/* k13563 in k13548 in k13545 in a13542 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13565(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_13565,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[301],t3));}
+
+/* k13539 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13541(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1265 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[300],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8847(C_word c,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_8847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8850,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13381,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13383,a[2]=((C_word)li219),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1277 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13383(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_13383,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_cdr(t2);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13390,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1280 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[70]))(2,*((C_word*)lf[70]+1),t6);}
+
+/* k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13390(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_13390,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13393,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_13393(2,t3,C_SCHEME_UNDEFINED);}
+else{
+/* expand.scm: 1282 syntax-error */
+((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),t2,lf[296],lf[299]);}}
+
+/* k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13393(C_word c,C_word t0,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_13393,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13396,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_13448,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li218),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_13448(t6,t2,((C_word*)t0)[2]);}
+
+/* loop2326 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13448(C_word t0,C_word 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_13448,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_13456,a[2]=((C_word*)t0)[3],a[3]=((C_word)li217),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13523,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));
+/* g23332334 */
+t6=t3;
+f_13456(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k13521 in loop2326 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13523(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_13448(t3,((C_word*)t0)[2],t2);}
+
+/* g2333 in loop2326 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13456(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_13456,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13463,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_13463(t4,C_SCHEME_FALSE);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13478,a[2]=((C_word)li216),tmp=(C_word)a,a+=3,tmp);
+t5=t3;
+f_13463(t5,f_13478(t2));}}
+
+/* loop in g2333 in loop2326 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_13478(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);}}}
+
+/* k13461 in g2333 in loop2326 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13463(C_word 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: 1291 syntax-error */
+((C_proc6)C_retrieve_symbol_proc(lf[129]))(6,*((C_word*)lf[129]+1),((C_word*)t0)[3],lf[296],lf[298],((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);}}
+
+/* k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13396(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_13396,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13399,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13403,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_13411,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_13413,a[2]=t8,a[3]=t13,a[4]=t10,a[5]=((C_word)li215),tmp=(C_word)a,a+=6,tmp));
+t15=((C_word*)t13)[1];
+f_13413(t15,t11,((C_word*)t0)[2]);}
+
+/* loop2353 in k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13413(C_word t0,C_word 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_13413,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[14]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13442,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));
+/* g23692370 */
+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);}}
+
+/* k13440 in loop2353 in k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13442(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_13442,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));
+/* loop23532366 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_13413(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));
+/* loop23532366 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_13413(t6,((C_word*)t0)[3],t5);}}
+
+/* k13409 in k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13411(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1295 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k13401 in k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13403(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[189]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(2),t1);}
+
+/* k13397 in k13394 in k13391 in k13388 in a13382 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13399(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[297]);}
+
+/* k13379 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13381(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1274 ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[296],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8850(C_word c,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_8850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8853,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13344,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13346,a[2]=((C_word)li214),tmp=(C_word)a,a+=3,tmp);
+/* ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t3,t4);}
+
+/* a13345 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13346(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_13346,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13350,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t5,lf[292],t2,lf[295]);}
+
+/* k13348 in a13345 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13350(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_13350,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[293];
+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_13368,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 */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t10,lf[292],((C_word*)t0)[5],lf[294]);}
+else{
+/* ##sys#process-syntax-rules */
+((C_proc7)C_retrieve_symbol_proc(lf[202]))(7,*((C_word*)lf[202]+1),((C_word*)t0)[4],((C_word*)t9)[1],((C_word*)t7)[1],((C_word*)t4)[1],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k13366 in k13348 in a13345 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13368(C_word c,C_word t0,C_word 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 */
+((C_proc7)C_retrieve_symbol_proc(lf[202]))(7,*((C_word*)lf[202]+1),((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]);}
+
+/* k13342 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13344(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* ##sys#extend-macro-environment */
+((C_proc5)C_retrieve_symbol_proc(lf[23]))(5,*((C_word*)lf[23]+1),((C_word*)t0)[2],lf[292],C_SCHEME_END_OF_LIST,t1);}
+
+/* k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8853(C_word c,C_word t0,C_word 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_8853,2,t0,t1);}
+t2=C_mutate((C_word*)lf[202]+1 /* (set! process-syntax-rules ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8855,a[2]=((C_word)li151),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[239]+1 /* (set! macro-subset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10531,a[2]=((C_word)li153),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[240]+1 /* (set! fixup-macro-environment ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10596,a[2]=((C_word)li156),tmp=(C_word)a,a+=3,tmp));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10692,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13340,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1328 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t6);}
+
+/* k13338 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13340(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1328 ##sys#fixup-macro-environment */
+((C_proc3)C_retrieve_symbol_proc(lf[240]))(3,*((C_word*)lf[240]+1),((C_word*)t0)[2],t1);}
+
+/* k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word ab[6],*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[241]+1 /* (set! default-macro-environment ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10696,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13336,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1333 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t4);}
+
+/* k13334 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13336(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1333 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[291]))(3,*((C_word*)lf[291]+1),((C_word*)t0)[2],t1);}
+
+/* k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10696,2,t0,t1);}
+t2=C_mutate((C_word*)lf[174]+1 /* (set! meta-macro-environment ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10700,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1334 make-parameter */
+((C_proc3)C_retrieve_symbol_proc(lf[291]))(3,*((C_word*)lf[291]+1),t3,C_SCHEME_FALSE);}
+
+/* k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10700(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10700,2,t0,t1);}
+t2=C_mutate((C_word*)lf[70]+1 /* (set! current-module ...) */,t1);
+t3=C_mutate(&lf[242] /* (set! module-name ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10714,a[2]=((C_word)li157),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[243]+1 /* (set! set-module-undefined-list! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10795,a[2]=((C_word)li158),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[244]+1 /* (set! module-undefined-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10804,a[2]=((C_word)li159),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[245]+1 /* (set! module-name ...) */,C_retrieve2(lf[242],"module-name"));
+t7=C_mutate((C_word*)lf[246]+1 /* (set! module-exports ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10904,a[2]=((C_word)li160),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[172]+1 /* (set! find-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10928,a[2]=((C_word)li161),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[251]+1 /* (set! toplevel-definition-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10968,a[2]=((C_word)li162),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[252]+1 /* (set! register-meta-expression ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10971,a[2]=((C_word)li163),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate(&lf[253] /* (set! check-for-redef ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10991,a[2]=((C_word)li164),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[256]+1 /* (set! register-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11012,a[2]=((C_word)li165),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[258]+1 /* (set! register-syntax-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11101,a[2]=((C_word)li166),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_11182,a[2]=((C_word)li167),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate((C_word*)lf[260]+1 /* (set! register-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11204,a[2]=((C_word)li170),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[195]+1 /* (set! mark-imported-symbols ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11272,a[2]=((C_word)li172),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate(&lf[261] /* (set! module-indirect-exports ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11341,a[2]=((C_word)li178),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate(&lf[267] /* (set! merge-se ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11627,a[2]=((C_word)li180),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate((C_word*)lf[268]+1 /* (set! compiled-module-registration ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11687,a[2]=((C_word)li186),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate((C_word*)lf[269]+1 /* (set! register-compiled-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12192,a[2]=((C_word)li196),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate((C_word*)lf[273]+1 /* (set! primitive-alias ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12571,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[275]+1 /* (set! register-primitive-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12588,a[2]=((C_word)li201),tmp=(C_word)a,a+=3,tmp));
+t23=C_mutate((C_word*)lf[257]+1 /* (set! find-export ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12737,a[2]=((C_word)li203),tmp=(C_word)a,a+=3,tmp));
+t24=C_mutate((C_word*)lf[278]+1 /* (set! finalize-module ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12822,a[2]=((C_word)li213),tmp=(C_word)a,a+=3,tmp));
+t25=C_set_block_item(lf[247] /* 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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12822(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_12822,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_12838,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_13285,a[2]=t18,a[3]=t26,a[4]=t20,a[5]=((C_word)li212),tmp=(C_word)a,a+=6,tmp));
+t28=((C_word*)t26)[1];
+f_13285(t28,t21,t24);}
+
+/* loop3599 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13285(C_word t0,C_word 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_13285,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_13324,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: 1632 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k13322 in loop3599 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_13324,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));
+/* loop35993612 */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_13285(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));
+/* loop35993612 */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_13285(t7,((C_word*)t0)[3],t6);}}
+
+/* k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t4;
+C_word t5;
+C_word ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12838,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,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]=((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_12841(2,t4,t1);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13238,a[2]=t2,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1637 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t4);}}
+
+/* k13236 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13238,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_13240,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li211),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_13240(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k13236 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13240(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_13240,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_13253,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_13279,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1639 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t4,t2);}}
+
+/* k13277 in loop in k13236 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13279(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1639 ##sys#find-export */
+((C_proc5)C_retrieve_symbol_proc(lf[257]))(5,*((C_word*)lf[257]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k13251 in loop in k13236 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13253(C_word c,C_word t0,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_13253,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_13264,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: 1640 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_13240(t5,t3,t4);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* expand.scm: 1641 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_13240(t3,((C_word*)t0)[3],t2);}}
+
+/* k13262 in k13251 in loop in k13236 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13264(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_13264,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));}
+
+/* k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_12841,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12844,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_13111,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)li210),tmp=(C_word)a,a+=8,tmp));
+t8=((C_word*)t6)[1];
+f_13111(t8,t2,t4);}
+
+/* loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13111(C_word t0,C_word 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_13111,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: 1649 loop */
+t13=t1;
+t14=t6;
+t1=t13;
+t2=t14;
+goto loop;}
+else{
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13144,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_13159,a[2]=t5,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13162,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_13162(t11,(C_word)C_i_symbolp(t10));}
+else{
+t10=t9;
+f_13162(t10,C_SCHEME_FALSE);}}}}
+
+/* k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13162(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_13162,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[7]);
+t3=((C_word*)t0)[6];
+f_13144(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_13212,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: 1656 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}}
+
+/* k13210 in k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13212(C_word c,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_13212,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_13174,a[2]=((C_word*)t0)[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_13174(t5,(C_word)C_i_symbolp(t4));}
+else{
+t4=t3;
+f_13174(t4,C_SCHEME_FALSE);}}
+
+/* k13172 in k13210 in k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13174(C_word t0,C_word t1){
+C_word 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_13174,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_retrieve(lf[9]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[8]);
+t4=((C_word*)t0)[7];
+f_13144(t4,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t3));}
+else{
+if(C_truep(((C_word*)t0)[5])){
+/* expand.scm: 1669 ##sys#module-rename */
+((C_proc4)C_retrieve_symbol_proc(lf[65]))(4,*((C_word*)lf[65]+1),((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_13190,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_13194,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_13198,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1665 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),t5,((C_word*)t0)[3]);}}}
+
+/* k13196 in k13172 in k13210 in k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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: 1663 string-append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[33]+1)))(5,*((C_word*)lf[33]+1),((C_word*)t0)[2],lf[289],t1,lf[290]);}
+
+/* k13192 in k13172 in k13210 in k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13194(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1662 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k13188 in k13172 in k13210 in k13160 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13190(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_13190,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_13144(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],C_SCHEME_FALSE));}
+
+/* k13157 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13159(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_13159,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_13144(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+
+/* k13142 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13144(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_13144,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13148,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: 1670 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_13111(t4,t2,t3);}
+
+/* k13146 in k13142 in loop in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13148(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_13148,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));}
+
+/* k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12844(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_12844,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12847,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_13000,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1691 module-undefined-list */
+((C_proc3)C_retrieve_symbol_proc(lf[244]))(3,*((C_word*)lf[244]+1),t3,((C_word*)t0)[7]);}
+
+/* k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13000(C_word c,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_13000,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_13002,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((C_word)li209),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_13002(t5,((C_word*)t0)[2],t1);}
+
+/* loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13002(C_word t0,C_word 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_13002,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_13010,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li208),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13094,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));
+/* g36633664 */
+t6=t3;
+f_13010(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k13092 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13002(t3,((C_word*)t0)[2],t2);}
+
+/* g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13010(C_word 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_13010,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_13021,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1675 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t4,lf[288],t2);}}
+
+/* k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13021,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13024,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1676 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)t0)[2],lf[287]);}
+
+/* k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13024(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_13024,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_13040,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13044,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13048,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1680 cadar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[81]+1)))(3,*((C_word*)lf[81]+1),t6,t1);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13055,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13059,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_13061,a[2]=t7,a[3]=((C_word)li207),tmp=(C_word)a,a+=4,tmp));
+t9=((C_word*)t7)[1];
+f_13061(t9,t5,t1);}}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* loop in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_13061(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_13061,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[284]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13075,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_13087,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1689 cadar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[81]+1)))(3,*((C_word*)lf[81]+1),t4,t2);}}
+
+/* k13085 in loop in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13087(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1689 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),((C_word*)t0)[2],t1);}
+
+/* k13073 in loop in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13075(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_13075,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13079,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: 1690 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_13061(t4,t2,t3);}
+
+/* k13077 in k13073 in loop in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13079(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1688 string-append */
+((C_proc6)C_retrieve_proc(*((C_word*)lf[33]+1)))(6,*((C_word*)lf[33]+1),((C_word*)t0)[3],lf[285],((C_word*)t0)[2],lf[286],t1);}
+
+/* k13057 in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13059(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1683 string-append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[33]+1)))(4,*((C_word*)lf[33]+1),((C_word*)t0)[2],lf[283],t1);}
+
+/* k13053 in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13055(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1682 ##sys#warn */
+((C_proc3)C_retrieve_symbol_proc(lf[181]))(3,*((C_word*)lf[181]+1),((C_word*)t0)[2],t1);}
+
+/* k13046 in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13048(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1680 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),((C_word*)t0)[2],t1);}
+
+/* k13042 in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13044(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1679 string-append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[33]+1)))(5,*((C_word*)lf[33]+1),((C_word*)t0)[2],lf[281],t1,lf[282]);}
+
+/* k13038 in k13022 in k13019 in g3663 in loop3656 in k12998 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_13040(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1678 ##sys#warn */
+((C_proc3)C_retrieve_symbol_proc(lf[181]))(3,*((C_word*)lf[181]+1),((C_word*)t0)[2],t1);}
+
+/* k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12847(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_12847,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12850,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: 1693 ##sys#error */
+t3=*((C_word*)lf[18]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[280],((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_12850(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12850(C_word c,C_word t0,C_word t1){
+C_word 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_12850,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_12853,a[2]=((C_word*)t0)[2],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_12925,a[2]=t6,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1699 module-indirect-exports */
+f_11341(t7,((C_word*)t0)[5]);}
+
+/* k12923 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12925(C_word c,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_12925,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_12927,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li206),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_12927(t5,((C_word*)t0)[2],t1);}
+
+/* loop3685 in k12923 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12927(C_word t0,C_word 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_12927,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_12937,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_12989,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_12937(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_12982,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=t7,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 1697 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t8);}}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12980 in loop3685 in k12923 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12982(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_12982,2,t0,t1);}
+t2=(C_word)C_i_assq(((C_word*)t0)[5],t1);
+if(C_truep(t2)){
+t3=((C_word*)t0)[4];
+f_12937(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: 1698 ##sys#error */
+t4=*((C_word*)lf[18]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[2],lf[279],t3);}}
+
+/* k12987 in loop3685 in k12923 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12989(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_12989,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_12937(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
+
+/* k12935 in loop3685 in k12923 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12937(C_word t0,C_word t1){
+C_word 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));
+/* loop36853698 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12927(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));
+/* loop36853698 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12927(t5,((C_word*)t0)[3],t4);}}
+
+/* k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12853(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_12853,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12856,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_12917,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1701 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t3);}
+
+/* k12915 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12917(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_12917,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12921,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1702 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
+
+/* k12919 in k12915 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12921(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_12921,2,t0,t1);}
+/* expand.scm: 1700 merge-se */
+f_11627(((C_word*)t0)[4],(C_word)C_a_i_list(&a,3,((C_word*)t0)[3],t1,((C_word*)t0)[2]));}
+
+/* k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12856(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_12856,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12859,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: 1704 ##sys#mark-imported-symbols */
+((C_proc3)C_retrieve_symbol_proc(lf[195]))(3,*((C_word*)lf[195]+1),t2,((C_word*)t0)[2]);}
+
+/* k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word t6;
+C_word ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12859,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12862,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_12873,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li205),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_12873(t6,t2,((C_word*)t0)[2]);}
+
+/* loop3721 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12873(C_word t0,C_word 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_12873,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_12881,a[2]=((C_word*)t0)[3],a[3]=((C_word)li204),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12902,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));
+/* g37283729 */
+t6=t3;
+f_12881(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12900 in loop3721 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12902(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_12873(t3,((C_word*)t0)[2],t2);}
+
+/* g3728 in loop3721 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12881(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_12881,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12885,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_i_cadr(t2);
+/* expand.scm: 1707 merge-se */
+f_11627(t3,(C_word)C_a_i_list(&a,2,t4,((C_word*)t0)[2]));}
+
+/* k12883 in g3728 in loop3721 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12885(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[9]);
+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));}
+
+/* k12860 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12862(C_word c,C_word t0,C_word 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_12862,2,t0,t1);}
+t2=C_retrieve(lf[9]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12868,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[189]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t3,t4,C_fix(10),t5);}
+
+/* k12866 in k12860 in k12857 in k12854 in k12851 in k12848 in k12845 in k12842 in k12839 in k12836 in ##sys#finalize-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12868(C_word c,C_word 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[189]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t2,t3,C_fix(11),t4);}
+
+/* ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12737(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_12737,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_12748,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: 1617 module-exists-list */
+((C_proc3)C_retrieve_symbol_proc(lf[277]))(3,*((C_word*)lf[277]+1),t8,t3);}
+else{
+t10=t8;
+f_12748(2,t10,t7);}}
+
+/* k12746 in ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12748(C_word c,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_12748,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_12750,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li202),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_12750(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k12746 in ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12750(C_word t0,C_word 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_12750,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_12799,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: 1621 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t6,t2);}
+else{
+t6=(C_word)C_i_cdr(t2);
+/* expand.scm: 1624 loop */
+t9=t1;
+t10=t6;
+t1=t9;
+t2=t10;
+goto loop;}}}}
+
+/* k12797 in loop in k12746 in ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12799(C_word c,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_12799,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_12778,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_12795,a[2]=((C_word*)t0)[6],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1622 cdar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t4,((C_word*)t0)[4]);}
+else{
+t4=t3;
+f_12778(t4,C_SCHEME_FALSE);}}}
+
+/* k12793 in k12797 in loop in k12746 in ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12795(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[3];
+f_12778(t2,(C_word)C_i_memq(((C_word*)t0)[2],t1));}
+
+/* k12776 in k12797 in loop in k12746 in ##sys#find-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12778(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: 1623 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12750(t3,((C_word*)t0)[4],t2);}}
+
+/* ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12588(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_12588r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_12588r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_12588r(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_12592,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_12592(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_12592(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);}}}
+
+/* k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12592(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_12592,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12595,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: 1598 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}
+
+/* k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12595(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12595,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_12610,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_12668,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li200),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_12668(t10,t6,((C_word*)t0)[2]);}
+
+/* loop3505 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12668(C_word t0,C_word 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_12668,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_12678,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_12709,a[2]=t3,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1603 ##sys#primitive-alias */
+((C_proc3)C_retrieve_symbol_proc(lf[273]))(3,*((C_word*)lf[273]+1),t5,t4);}
+else{
+t5=t3;
+f_12678(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);}}
+
+/* k12707 in loop3505 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12709(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_12709,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+t3=((C_word*)t0)[2];
+f_12678(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
+
+/* k12676 in loop3505 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12678(C_word t0,C_word t1){
+C_word 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));
+/* loop35053518 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12668(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));
+/* loop35053518 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12668(t5,((C_word*)t0)[3],t4);}}
+
+/* k12608 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12610(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12610,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_12614,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_12616,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)li199),tmp=(C_word)a,a+=8,tmp));
+t10=((C_word*)t8)[1];
+f_12616(t10,t6,((C_word*)t0)[2]);}
+
+/* loop3529 in k12608 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12616(C_word t0,C_word 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_12616,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_12643,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li198),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12662,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));
+/* g35453546 */
+t6=t3;
+f_12643(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12660 in loop3529 in k12608 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12662(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12662,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));
+/* loop35293542 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12616(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));
+/* loop35293542 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12616(t6,((C_word*)t0)[3],t5);}}
+
+/* g3545 in loop3529 in k12608 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_12643,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: 1609 ##sys#error */
+t4=*((C_word*)lf[18]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,lf[276],t2,((C_word*)t0)[2]);}}
+else{
+t3=t2;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12612 in k12608 in k12593 in k12590 in ##sys#register-primitive-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12614(C_word c,C_word t0,C_word t1){
+C_word 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_12614,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_retrieve(lf[247]));
+t7=C_mutate((C_word*)lf[247]+1 /* (set! module-table ...) */,t6);
+t8=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t4);}
+
+/* ##sys#primitive-alias in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12571(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_12571,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12575,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12582,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_slot(t2,C_fix(1));
+/* expand.scm: 1593 ##sys#string-append */
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),t4,lf[274],t5);}
+
+/* k12580 in ##sys#primitive-alias in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12582(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1592 ##sys#string->symbol */
+((C_proc3)C_retrieve_symbol_proc(lf[66]))(3,*((C_word*)lf[66]+1),((C_word*)t0)[2],t1);}
+
+/* k12573 in ##sys#primitive-alias in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12575,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12578,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1594 ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[10]))(5,*((C_word*)lf[10]+1),t2,t1,lf[71],((C_word*)t0)[2]);}
+
+/* k12576 in k12573 in ##sys#primitive-alias in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12578(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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12192(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_12192r,6,t0,t1,t2,t3,t4,t5);}
+else{
+a=C_alloc((c-6)*3);
+t6=C_restore_rest(a,C_rest_count(0));
+f_12192r(t0,t1,t2,t3,t4,t5,t6);}}
+
+static void C_ccall f_12192r(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_12196,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_12196(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_12196(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);}}}
+
+/* k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12196(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12196,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_12225,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_12491,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_12491(t10,t6,((C_word*)t0)[2]);}
+
+/* loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12491(C_word t0,C_word 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_12491,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_12501,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_12546,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_12222,a[2]=t4,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1546 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t6);}
+else{
+t6=(C_word)C_i_car(t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12539,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_cdr(t5);
+/* expand.scm: 1556 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t7,t8);}}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12537 in loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12539(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_12539,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_12501(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
+
+/* k12220 in loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12222,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_12208,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_12208(t5,(C_word)C_i_pairp(t4));}
+else{
+t4=t3;
+f_12208(t4,C_SCHEME_FALSE);}}
+
+/* k12206 in k12220 in loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12208(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_12208,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+f_12501(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],C_SCHEME_END_OF_LIST));}
+else{
+/* expand.scm: 1549 ##sys#error */
+t2=*((C_word*)lf[18]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[249],lf[272],((C_word*)t0)[2]);}}
+
+/* k12544 in loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12546(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_12546,2,t0,t1);}
+t2=((C_word*)t0)[2];
+f_12501(t2,(C_word)C_a_i_cons(&a,2,t1,C_SCHEME_END_OF_LIST));}
+
+/* k12499 in loop3357 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12501(C_word t0,C_word t1){
+C_word 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));
+/* loop33573370 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12491(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));
+/* loop33573370 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12491(t5,((C_word*)t0)[3],t4);}}
+
+/* k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12225,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_12228,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_12425,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_12425(t10,t6,((C_word*)t0)[2]);}
+
+/* loop3382 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12425(C_word t0,C_word 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_12425,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_12435,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_12474,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: 1561 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t8,t9);}
+else{
+t6=t3;
+f_12435(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);}}
+
+/* k12472 in loop3382 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12474(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_12474,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_12435(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
+
+/* k12433 in loop3382 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12435(C_word t0,C_word t1){
+C_word 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_12425(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_12425(t5,((C_word*)t0)[3],t4);}}
+
+/* k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_12228,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_12231,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_12373,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li193),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_12373(t10,t6,((C_word*)t0)[2]);}
+
+/* loop3407 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12373(C_word t0,C_word 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_12373,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_12412,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: 1566 ##sys#er-transformer */
+((C_proc3)C_retrieve_symbol_proc(lf[166]))(3,*((C_word*)lf[166]+1),t5,t6);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12410 in loop3407 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12412(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12412,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));
+/* loop34073420 */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_12373(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));
+/* loop34073420 */
+t7=((C_word*)((C_word*)t0)[4])[1];
+f_12373(t7,((C_word*)t0)[3],t6);}}
+
+/* k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12231(C_word c,C_word t0,C_word t1){
+C_word 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_12231,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_12237,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_12367,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: 1570 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t7);}
+
+/* k12365 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12367(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_12367,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12371,a[2]=((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: 1571 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
+
+/* k12369 in k12365 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12371(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_12371,2,t0,t1);}
+/* expand.scm: 1569 merge-se */
+f_11627(((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]));}
+
+/* k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12237(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_12237,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12240,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: 1573 ##sys#mark-imported-symbols */
+((C_proc3)C_retrieve_symbol_proc(lf[195]))(3,*((C_word*)lf[195]+1),t2,((C_word*)t0)[3]);}
+
+/* k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12240(C_word c,C_word t0,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_12240,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12243,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_12333,a[2]=t4,a[3]=((C_word*)t0)[5],a[4]=((C_word)li192),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_12333(t6,t2,((C_word*)t0)[2]);}
+
+/* loop3433 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12333(C_word t0,C_word 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_12333,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_12341,a[2]=((C_word*)t0)[3],a[3]=((C_word)li191),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_12341(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);}}
+
+/* g3440 in loop3433 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_12341(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]));}
+
+/* k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12243(C_word c,C_word t0,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_12243,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12246,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_12291,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word)li190),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_12291(t6,t2,((C_word*)t0)[2]);}
+
+/* loop3447 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12291(C_word t0,C_word 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_12291,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_12299,a[2]=((C_word*)t0)[3],a[3]=((C_word)li189),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_12299(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);}}
+
+/* g3454 in loop3447 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_12299(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);}}
+
+/* k12244 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12246(C_word c,C_word t0,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_12246,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12249,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_12259,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li188),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_12259(t6,t2,((C_word*)t0)[2]);}
+
+/* loop3463 in k12244 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12259(C_word t0,C_word 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_12259,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_12267,a[2]=((C_word*)t0)[3],a[3]=((C_word)li187),tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_12267(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);}}
+
+/* g3470 in loop3463 in k12244 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_12267(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]));}
+
+/* k12247 in k12244 in k12241 in k12238 in k12235 in k12229 in k12226 in k12223 in k12194 in ##sys#register-compiled-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12249(C_word c,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_12249,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_retrieve(lf[247]));
+t4=C_mutate((C_word*)lf[247]+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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11687(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_11687,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_11710,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_12186,a[2]=t18,tmp=(C_word)a,a+=3,tmp);
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12190,a[2]=t19,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1510 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t20,t11);}
+else{
+t19=t18;
+f_11710(t19,C_SCHEME_END_OF_LIST);}}
+
+/* k12188 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12190(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);}
+
+/* k12184 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[18],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12186,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[249],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[271],t5);
+t7=((C_word*)t0)[2];
+f_11710(t7,(C_word)C_a_i_cons(&a,2,t6,C_SCHEME_END_OF_LIST));}
+
+/* k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11710(C_word t0,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_11710,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11714,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_11718,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_12152,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12156,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1511 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t5,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_11718(t4,C_SCHEME_END_OF_LIST);}}
+
+/* k12154 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12156(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);}
+
+/* k12150 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12152(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_12152,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,lf[249],t1);
+t3=((C_word*)t0)[2];
+f_11718(t3,(C_word)C_a_i_cons(&a,2,t2,C_SCHEME_END_OF_LIST));}
+
+/* k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11718(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11718,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11722,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_11726,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_12099,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_12105,a[2]=t5,a[3]=t13,a[4]=t7,a[5]=((C_word)li185),tmp=(C_word)a,a+=6,tmp));
+t15=((C_word*)t13)[1];
+f_12105(t15,t8,t11);}
+
+/* loop3221 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12105(C_word t0,C_word 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_12105,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[14]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12134,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));
+/* g32373238 */
+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);}}
+
+/* k12132 in loop3221 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12134(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12134,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));
+/* loop32213234 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12105(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));
+/* loop32213234 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12105(t6,((C_word*)t0)[3],t5);}}
+
+/* k12097 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_12099(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1512 reverse */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[79]+1)))(3,*((C_word*)lf[79]+1),((C_word*)t0)[2],t1);}
+
+/* k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11726(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_11726,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_11974,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_11978,a[2]=t7,tmp=(C_word)a,a+=3,tmp);
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11982,a[2]=t12,a[3]=t9,a[4]=t11,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1520 module-indirect-exports */
+f_11341(t13,((C_word*)t0)[5]);}
+
+/* k11980 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11982(C_word c,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_11982,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_11984,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li184),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_11984(t5,((C_word*)t0)[2],t1);}
+
+/* loop3244 in k11980 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11984(C_word t0,C_word 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_11984,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_12083,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_12083(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_12083(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);}}
+
+/* k12081 in loop3244 in k11980 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_12083(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12083,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));
+/* loop32443257 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11984(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));
+/* loop32443257 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11984(t6,((C_word*)t0)[3],t5);}}
+
+/* k11976 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11978(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);}
+
+/* k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11974(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11974,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_11868,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_11872,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_11874,a[2]=t10,a[3]=t15,a[4]=t12,a[5]=((C_word*)t0)[2],a[6]=((C_word)li183),tmp=(C_word)a,a+=7,tmp));
+t17=((C_word*)t15)[1];
+f_11874(t17,t13,((C_word*)t0)[3]);}
+
+/* loop3276 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11874(C_word t0,C_word 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_11874,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_11901,a[2]=((C_word*)t0)[5],a[3]=((C_word)li182),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11958,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));
+/* g32923293 */
+t6=t3;
+f_11901(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11956 in loop3276 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11958(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11958,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));
+/* loop32763289 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11874(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));
+/* loop32763289 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11874(t6,((C_word*)t0)[3],t5);}}
+
+/* g3292 in loop3276 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_11901,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_11933,a[2]=t1,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+t9=(C_word)C_i_cdr(t4);
+/* expand.scm: 1527 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t8,t9);}
+else{
+t5=C_retrieve(lf[9]);
+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));}}
+
+/* k11931 in g3292 in loop3276 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11933(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_11933,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[270],t3));}
+
+/* k11870 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11872(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);}
+
+/* k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11868(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_11868,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_11778,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_11782,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_11794,a[2]=t9,a[3]=((C_word*)t0)[3],a[4]=((C_word)li181),tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_11794(t11,t4,t7);}}
+
+/* loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11794(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_11794,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_11864,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: 1537 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t3,t2);}}
+
+/* k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11864(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_11864,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: 1537 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11794(t3,((C_word*)t0)[2],t2);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11817,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: 1539 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t2,((C_word*)t0)[4]);}}
+
+/* k11815 in k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11817,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11860,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: 1540 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t2,((C_word*)t0)[3]);}
+
+/* k11858 in k11815 in k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11860(C_word c,C_word t0,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_11860,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_11848,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_11852,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 1540 cdar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t5,((C_word*)t0)[3]);}
+
+/* k11850 in k11858 in k11815 in k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11852(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1540 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),((C_word*)t0)[2],t1);}
+
+/* k11846 in k11858 in k11815 in k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11848(C_word c,C_word t0,C_word 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_11848,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[270],t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11828,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: 1541 loop */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_11794(t7,t5,t6);}
+
+/* k11826 in k11846 in k11858 in k11815 in k11862 in loop in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11828(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_11828,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));}
+
+/* k11780 in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11782(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);}
+
+/* k11776 in k11866 in k11972 in k11724 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11778(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_11778,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[269],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);}
+
+/* k11720 in k11716 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11722(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);}
+
+/* k11712 in k11708 in ##sys#compiled-module-registration in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11714(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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11627(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_11627,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11631,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_apply(4,0,t3,*((C_word*)lf[58]+1),t2);}
+
+/* k11629 in merge-se in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11631(C_word c,C_word t0,C_word 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_11631,2,t0,t1);}
+t2=C_retrieve(lf[9]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11637,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_11642,a[2]=t5,a[3]=((C_word)li179),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_11642(t7,t3,t1);}
+
+/* loop in k11629 in merge-se in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11642(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_11642,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_11681,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1499 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t3,t2);}}
+
+/* k11679 in loop in k11629 in merge-se in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11681(C_word c,C_word t0,C_word 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_11681,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: 1499 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11642(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_11673,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: 1500 loop */
+t6=((C_word*)((C_word*)t0)[3])[1];
+f_11642(t6,t4,t5);}}
+
+/* k11671 in k11679 in loop in k11629 in merge-se in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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));}
+
+/* k11635 in k11629 in merge-se in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11637(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_retrieve(lf[9]);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
+
+/* module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11341(C_word 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_11341,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_11399,a[2]=t8,a[3]=((C_word)li173),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_11422,a[2]=t8,a[3]=t11,a[4]=t12,a[5]=t15,a[6]=((C_word)li177),tmp=(C_word)a,a+=7,tmp));
+t17=((C_word*)t15)[1];
+f_11422(t17,t1,t5);}}
+
+/* loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11422(C_word t0,C_word 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_11422,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: 1468 loop */
+t7=t1;
+t8=t4;
+t1=t7;
+t2=t8;
+goto loop;}
+else{
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_11449,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: 1470 cdar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t4,t2);}}}
+
+/* k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[11],*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|8,a[1]=(C_word)f_11451,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)li176),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_11451(t5,((C_word*)t0)[2],t1);}
+
+/* loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11451(C_word 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_11451,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: 1471 loop */
+t4=((C_word*)((C_word*)t0)[6])[1];
+f_11422(t4,t1,t3);}
+else{
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11621,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: 1472 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t4);}}
+
+/* k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11621(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11621,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_11474,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: 1473 warn */
+t4=((C_word*)t0)[4];
+f_11399(t4,t2,lf[264],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_11492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[6],a[4]=((C_word*)t0)[7],a[5]=((C_word)li174),tmp=(C_word)a,a+=6,tmp);
+/* g31593160 */
+t5=t4;
+f_11492(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_11609,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: 1482 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t5);}}}
+
+/* k11607 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11609(C_word c,C_word t0,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_11609,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_11536,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li175),tmp=(C_word)a,a+=6,tmp);
+/* g31683169 */
+t4=t3;
+f_11536(t4,((C_word*)t0)[2],t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11590,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: 1490 warn */
+t5=((C_word*)t0)[3];
+f_11399(t5,t3,lf[266],t4);}}
+
+/* k11588 in k11607 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11590(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: 1491 loop2 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11451(t3,((C_word*)t0)[2],t2);}
+
+/* g3168 in k11607 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11536(C_word t0,C_word 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_11536,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_11554,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: 1485 loop2 */
+t9=((C_word*)((C_word*)t0)[3])[1];
+f_11451(t9,t7,t8);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11569,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: 1487 warn */
+t6=((C_word*)t0)[2];
+f_11399(t6,t4,lf[265],t5);}}
+
+/* k11567 in g3168 in k11607 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11569(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: 1488 loop2 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11451(t3,((C_word*)t0)[2],t2);}
+
+/* k11552 in g3168 in k11607 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11554(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_11554,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));}
+
+/* g3159 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11492(C_word t0,C_word 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_11492,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11500,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_11519,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(t5)){
+t7=t3;
+f_11500(t7,(C_word)C_a_i_cons(&a,2,t4,t5));}
+else{
+t7=(C_word)C_i_car(((C_word*)t0)[4]);
+/* expand.scm: 1480 ##sys#module-rename */
+((C_proc4)C_retrieve_symbol_proc(lf[65]))(4,*((C_word*)lf[65]+1),t6,t7,((C_word*)t0)[2]);}}
+
+/* k11517 in g3159 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11519(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_11519,2,t0,t1);}
+t2=((C_word*)t0)[3];
+f_11500(t2,(C_word)C_a_i_cons(&a,2,((C_word*)t0)[2],t1));}
+
+/* k11498 in g3159 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11500(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_11500,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11504,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: 1481 loop2 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_11451(t4,t2,t3);}
+
+/* k11502 in k11498 in g3159 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11504(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_11504,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));}
+
+/* k11472 in k11619 in loop2 in k11447 in loop in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11474(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: 1474 loop2 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11451(t3,((C_word*)t0)[2],t2);}
+
+/* warn in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11399(C_word 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_11399,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11407,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11411,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1462 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),t5,((C_word*)t0)[2]);}
+
+/* k11409 in warn in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11411(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1462 string-append */
+((C_proc6)C_retrieve_proc(*((C_word*)lf[33]+1)))(6,*((C_word*)lf[33]+1),((C_word*)t0)[3],((C_word*)t0)[2],lf[262],t1,lf[263]);}
+
+/* k11405 in warn in module-indirect-exports in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11407(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1461 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* ##sys#mark-imported-symbols in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11272(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_11272,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_11278,a[2]=t4,a[3]=((C_word)li171),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_11278(t6,t1,t2);}
+
+/* loop3100 in ##sys#mark-imported-symbols in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11278(C_word t0,C_word 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_11278,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_11328,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_11293,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_11293(t10,(C_word)C_i_not(t9));}
+else{
+t7=t5;
+f_11293(t7,C_SCHEME_FALSE);}}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11291 in loop3100 in ##sys#mark-imported-symbols in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_11293(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_retrieve(lf[9]);
+t3=(C_word)C_i_cdr(((C_word*)t0)[6]);
+/* expand.scm: 1447 ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[10]))(5,*((C_word*)lf[10]+1),((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_11278(t3,((C_word*)t0)[2],t2);}}
+
+/* k11326 in loop3100 in ##sys#mark-imported-symbols in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11328(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_11278(t3,((C_word*)t0)[2],t2);}
+
+/* ##sys#register-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11204(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_11204r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11204r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11204r(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_11206,a[2]=t3,a[3]=t2,a[4]=((C_word)li168),tmp=(C_word)a,a+=5,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11219,a[2]=t5,a[3]=((C_word)li169),tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11224,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-vexports30783091 */
+t8=t1;
+((C_proc2)C_retrieve_proc(t8))(2,t8,f_11224(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-sexports30793089 */
+t10=t1;
+((C_proc2)C_retrieve_proc(t10))(2,t10,f_11219(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))){
+/* body30763084 */
+t12=t1;
+((C_proc2)C_retrieve_proc(t12))(2,t12,f_11206(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-vexports3078 in ##sys#register-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_11224(C_word *a,C_word t0){
+C_word tmp;
+C_word t1;
+C_stack_check;
+return(f_11219(C_a_i(&a,19),((C_word*)t0)[2],C_SCHEME_END_OF_LIST));}
+
+/* def-sexports3079 in ##sys#register-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_11219(C_word *a,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_stack_check;
+return(f_11206(C_a_i(&a,19),((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST));}
+
+/* body3076 in ##sys#register-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_11206(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_retrieve(lf[247]));
+t8=C_mutate((C_word*)lf[247]+1 /* (set! module-table ...) */,t7);
+return(t5);}
+
+/* ##sys#register-undefined in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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;
+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_11182,4,t0,t1,t2,t3);}
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11189,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1433 module-undefined-list */
+((C_proc3)C_retrieve_symbol_proc(lf[244]))(3,*((C_word*)lf[244]+1),t4,t3);}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k11187 in ##sys#register-undefined in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11189,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: 1435 set-module-undefined-list! */
+((C_proc4)C_retrieve_symbol_proc(lf[243]))(4,*((C_word*)lf[243]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}}
+
+/* ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11101(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_11101,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_11111,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_11111(2,t10,t8);}
+else{
+/* expand.scm: 1415 ##sys#find-export */
+((C_proc5)C_retrieve_symbol_proc(lf[257]))(5,*((C_word*)lf[257]+1),t9,t2,t3,C_SCHEME_TRUE);}}
+else{
+t5=C_SCHEME_UNDEFINED;
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
+
+/* k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11111(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_11111,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11114,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: 1416 module-undefined-list */
+((C_proc3)C_retrieve_symbol_proc(lf[244]))(3,*((C_word*)lf[244]+1),t2,((C_word*)t0)[5]);}
+
+/* k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11114(C_word c,C_word t0,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_11114,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_11120,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: 1419 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t5,lf[259],((C_word*)t0)[5]);}
+else{
+t6=t5;
+f_11120(2,t6,C_SCHEME_UNDEFINED);}}
+
+/* k11118 in k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11120(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_11120,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11123,a[2]=((C_word*)t0)[2],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_11163,a[2]=((C_word*)t0)[6],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1420 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t3);}
+
+/* k11161 in k11118 in k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11163(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_11163,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11167,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1420 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}
+
+/* k11165 in k11161 in k11118 in k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11167(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1420 check-for-redef */
+f_10991(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11121 in k11118 in k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11123(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_11123,2,t0,t1);}
+t2=C_retrieve(lf[9]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11129,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[189]+1);
+((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t3,t9,C_fix(3),t8);}
+else{
+t4=t3;
+f_11129(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k11127 in k11121 in k11118 in k11112 in k11109 in ##sys#register-syntax-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11129(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_11129,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[189]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t7,t8,C_fix(5),t6);}
+
+/* ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11012(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_11012,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_11022,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t7)){
+t9=t8;
+f_11022(2,t9,t7);}
+else{
+/* expand.scm: 1396 ##sys#find-export */
+((C_proc5)C_retrieve_symbol_proc(lf[257]))(5,*((C_word*)lf[257]+1),t8,t2,t3,C_SCHEME_TRUE);}}
+else{
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11022(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_11022,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11025,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: 1397 module-undefined-list */
+((C_proc3)C_retrieve_symbol_proc(lf[244]))(3,*((C_word*)lf[244]+1),t2,((C_word*)t0)[3]);}
+
+/* k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 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_11025,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11028,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_11088,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: 1399 ##sys#module-rename */
+((C_proc4)C_retrieve_symbol_proc(lf[65]))(4,*((C_word*)lf[65]+1),t3,((C_word*)t0)[4],t6);}
+
+/* k11086 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11088(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1398 ##sys#toplevel-definition-hook */
+((C_proc6)C_retrieve_symbol_proc(lf[251]))(6,*((C_word*)lf[251]+1),((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11028(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_11028,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11031,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_11084,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1402 ##sys#delq */
+((C_proc4)C_retrieve_symbol_proc(lf[183]))(4,*((C_word*)lf[183]+1),t3,((C_word*)t0)[5],((C_word*)t0)[2]);}
+else{
+t3=t2;
+f_11031(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k11082 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11084(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1402 set-module-undefined-list! */
+((C_proc4)C_retrieve_symbol_proc(lf[243]))(4,*((C_word*)lf[243]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11029 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11031(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_11031,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11034,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_11070,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1403 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t3);}
+
+/* k11068 in k11029 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11070(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_11070,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11074,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 1403 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}
+
+/* k11072 in k11068 in k11029 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11074(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1403 check-for-redef */
+f_10991(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11032 in k11029 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11034(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11037,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[189]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t2,t7,C_fix(4),t6);}
+
+/* k11035 in k11032 in k11029 in k11026 in k11023 in k11020 in ##sys#register-export in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_11037(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_11037,2,t0,t1);}
+if(C_truep(((C_word*)t0)[5])){
+t2=C_retrieve(lf[9]);
+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[189]+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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_10991(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_10991,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_10998,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t5)){
+/* expand.scm: 1389 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t6,lf[255],t2);}
+else{
+t7=t6;
+f_10998(2,t7,C_SCHEME_FALSE);}}
+
+/* k10996 in check-for-redef in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10998(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: 1391 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[2],lf[254],((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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10971(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_10971,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10975,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1384 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[70]))(2,*((C_word*)lf[70]+1),t3);}
+
+/* k10973 in ##sys#register-meta-expression in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10975(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10975,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[189]+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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10968(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_10968,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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10928(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_10928r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_10928r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10928r(C_word 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_10932,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_10932(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_10932(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);}}}
+
+/* k10930 in ##sys#find-module in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10932(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_retrieve(lf[247]));
+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: 1378 error */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[248]+1)))(5,*((C_word*)lf[248]+1),((C_word*)t0)[2],lf[249],lf[250],((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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10904(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_10904,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: 1368 values */
+C_values(5,0,t1,t5,t8,t11);}
+
+/* module-undefined-list in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10804(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_10804,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 k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10795(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_10795,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure(t2,lf[68]);
+/* ##sys#block-set! */
+t5=*((C_word*)lf[189]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,C_fix(6),t3);}
+
+/* module-name in k10698 in k10694 in k10690 in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10714(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_10714,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 k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10596(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_10596r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_10596r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10596r(C_word 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_10600,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_10600(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_10600(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);}}}
+
+/* k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10600(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_10600,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10603,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: 1315 ##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_10603(2,t3,((C_word*)t0)[2]);}}
+
+/* k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10603(C_word c,C_word t0,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_10603,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10606,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_10608,a[2]=t4,a[3]=t1,a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_10608(t6,t2,((C_word*)t0)[2]);}
+
+/* loop2835 in k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_10608(C_word t0,C_word 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_10608,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_10616,a[2]=((C_word*)t0)[3],a[3]=((C_word)li154),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10655,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));
+/* g28422843 */
+t6=t3;
+f_10616(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10653 in loop2835 in k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10655(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_10608(t3,((C_word*)t0)[2],t2);}
+
+/* g2842 in loop2835 in k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_10616(C_word t0,C_word 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_10616,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_10634,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: 1323 ##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);}}
+
+/* k10632 in g2842 in loop2835 in k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10634(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));}
+
+/* k10604 in k10601 in k10598 in ##sys#fixup-macro-environment in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10606(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 k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10531(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_10531r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_10531r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10531r(C_word 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_10535,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_10535(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_10535(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);}}}
+
+/* k10533 in ##sys#macro-subset in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10535(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_10535,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10538,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_10545,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 1308 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t3);}
+
+/* k10543 in k10533 in ##sys#macro-subset in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10545(C_word c,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_10545,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_10547,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li152),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_10547(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k10543 in k10533 in ##sys#macro-subset in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_10547(C_word t0,C_word 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_10547,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_10568,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_i_cdr(t2);
+/* expand.scm: 1311 loop */
+t9=t6;
+t10=t7;
+t1=t9;
+t2=t10;
+goto loop;}}
+
+/* k10566 in loop in k10543 in k10533 in ##sys#macro-subset in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10568(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_10568,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));}
+
+/* k10536 in k10533 in ##sys#macro-subset in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10538(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 1312 ##sys#fixup-macro-environment */
+((C_proc4)C_retrieve_symbol_proc(lf[240]))(4,*((C_word*)lf[240]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8855(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_8855,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_8862,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);
+/* r2395 */
+t106=t5;
+((C_proc3)C_retrieve_proc(t106))(3,t106,t105,lf[238]);}
+
+/* k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8862(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_8862,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[203]);
+t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[204]);
+t5=C_mutate(((C_word *)((C_word*)t0)[53])+1,lf[205]);
+t6=C_mutate(((C_word *)((C_word*)t0)[52])+1,lf[206]);
+t7=C_mutate(((C_word *)((C_word*)t0)[51])+1,lf[207]);
+t8=C_mutate(((C_word *)((C_word*)t0)[50])+1,lf[208]);
+t9=C_mutate(((C_word *)((C_word*)t0)[49])+1,lf[209]);
+t10=C_mutate(((C_word *)((C_word*)t0)[48])+1,lf[210]);
+t11=C_mutate(((C_word *)((C_word*)t0)[47])+1,lf[211]);
+t12=C_mutate(((C_word *)((C_word*)t0)[46])+1,lf[212]);
+t13=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8876,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[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);
+/* r2395 */
+t14=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t14))(3,t14,t13,lf[237]);}
+
+/* k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8876(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_8876,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_8880,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[236]);}
+
+/* k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8880(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_8880,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_8884,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[235]);}
+
+/* k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8884(C_word c,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_8884,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[213]);
+t4=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8889,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[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);
+/* r2395 */
+t5=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[234]);}
+
+/* k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8889(C_word c,C_word t0,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_8889,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[214]);
+t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[215]);
+t5=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8895,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,lf[233]);}
+
+/* k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8895(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_8895,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_8899,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[232]);}
+
+/* k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8899(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_8899,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_8903,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[112]);}
+
+/* k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[57],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8903,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_8907,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[47]);}
+
+/* k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8907(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_8907,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_8911,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[100]);}
+
+/* k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[57],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8911,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=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8916,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t5=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[152]);}
+
+/* k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8916(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_8916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8920,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[231]);}
+
+/* k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8920(C_word c,C_word t0,C_word 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_8920,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[217]);
+t4=C_mutate(((C_word *)((C_word*)t0)[54])+1,lf[218]);
+t5=C_mutate(((C_word *)((C_word*)t0)[53])+1,lf[219]);
+t6=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8927,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t7=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,lf[230]);}
+
+/* k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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[57],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8927,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[220]);
+t4=(*a=C_CLOSURE_TYPE|56,a[1]=(C_word)f_8932,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t5=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,lf[82]);}
+
+/* k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8932(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_8932,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_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]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[199]);}
+
+/* k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+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 ab[57],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8936,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_8940,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[229]);}
+
+/* k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8940(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_8940,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_8944,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,lf[228]);}
+
+/* k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8944(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_8944,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_8949,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);
+/* r2395 */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8949(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8949,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_8951,a[2]=((C_word*)t0)[54],a[3]=((C_word*)t0)[52],a[4]=((C_word)li130),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_8957,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)li132),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_9082,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)li134),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_9166,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)li135),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_9387,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)li136),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_9509,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)li138),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_9797,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)li141),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_10004,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)li143),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_10258,a[2]=((C_word*)t0)[26],a[3]=((C_word*)t0)[37],a[4]=((C_word*)t0)[34],a[5]=((C_word)li144),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_10331,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[9],a[4]=((C_word)li145),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_10424,a[2]=((C_word*)t0)[4],a[3]=((C_word)li146),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_10446,a[2]=((C_word*)t0)[53],a[3]=((C_word)li147),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_10472,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[8],a[4]=((C_word)li148),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_10492,a[2]=((C_word*)t0)[53],a[3]=((C_word)li150),tmp=(C_word)a,a+=4,tmp));
+/* make-transformer2437 */
+t17=((C_word*)((C_word*)t0)[51])[1];
+((C_proc3)C_retrieve_proc(t17))(3,t17,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* f_10492 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10492(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_10492,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_10502,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word)li149),tmp=(C_word)a,a+=5,tmp));
+t7=((C_word*)t5)[1];
+f_10502(t7,t1,t3);}
+
+/* loop */
+static void C_fcall f_10502(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_10502,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10509,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?2436 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t3,t4);}
+else{
+t4=t3;
+f_10509(2,t4,C_SCHEME_FALSE);}}
+
+/* k10507 in loop */
+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 *a;
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[4]);
+/* loop2736 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10502(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_10472 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10472(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_10472,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10479,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* segment-template?2447 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k10477 */
+static void C_ccall f_10479(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_10479,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10486,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_i_cdr(((C_word*)t0)[3]);
+/* segment-depth2448 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_fix(0));}}
+
+/* k10484 in k10477 */
+static void C_ccall f_10486(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_10446 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10446(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_10446,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?2436 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t5))(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_10424 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10424(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_10424,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10431,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* segment-template?2447 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k10429 */
+static void C_ccall f_10431(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 */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),((C_word*)t0)[2],lf[227],((C_word*)t0)[3]);}}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* f_10331 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10331(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_10331,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_10373,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?2447 */
+t7=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}}
+
+/* k10371 */
+static void C_ccall f_10373(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10373,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_10384,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-variables2445 */
+t5=((C_word*)((C_word*)t0)[6])[1];
+((C_proc6)C_retrieve_proc(t5))(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_10405,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-variables2445 */
+t5=((C_word*)((C_word*)t0)[6])[1];
+((C_proc6)C_retrieve_proc(t5))(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_10422,a[2]=((C_word*)t0)[2],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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[223]+1)))(3,*((C_word*)lf[223]+1),t2,((C_word*)t0)[7]);}
+else{
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}}}
+
+/* k10420 in k10371 */
+static void C_ccall f_10422(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* free-meta-variables2445 */
+t2=((C_word*)((C_word*)t0)[6])[1];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[5],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10403 in k10371 */
+static void C_ccall f_10405(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* free-meta-variables2445 */
+t2=((C_word*)((C_word*)t0)[6])[1];
+((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);}
+
+/* k10382 in k10371 */
+static void C_ccall f_10384(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* free-meta-variables2445 */
+t2=((C_word*)((C_word*)t0)[6])[1];
+((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);}
+
+/* f_10258 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10258(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_10258,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_10284,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?2446 */
+t6=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
+
+/* k10282 */
+static void C_ccall f_10284(C_word c,C_word t0,C_word t1){
+C_word 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_10284,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-variables2444 */
+t4=((C_word*)((C_word*)t0)[4])[1];
+((C_proc5)C_retrieve_proc(t4))(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_10312,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-variables2444 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+((C_proc5)C_retrieve_proc(t5))(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_10329,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[223]+1)))(3,*((C_word*)lf[223]+1),t2,((C_word*)t0)[6]);}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}}}}
+
+/* k10327 in k10282 */
+static void C_ccall f_10329(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* meta-variables2444 */
+t2=((C_word*)((C_word*)t0)[5])[1];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10310 in k10282 */
+static void C_ccall f_10312(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* meta-variables2444 */
+t2=((C_word*)((C_word*)t0)[5])[1];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* f_10004 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_10004(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_10004,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),t1,lf[224],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[222],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_10051,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?2447 */
+t6=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
+
+/* k10049 */
+static void C_ccall f_10051(C_word c,C_word t0,C_word t1){
+C_word 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_10051,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_10054,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-depth2448 */
+t3=((C_word*)((C_word*)t0)[5])[1];
+((C_proc3)C_retrieve_proc(t3))(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_10212,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-template2443 */
+t4=((C_word*)((C_word*)t0)[11])[1];
+((C_proc5)C_retrieve_proc(t4))(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_10245,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_10249,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[223]+1)))(3,*((C_word*)lf[223]+1),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));}}}}
+
+/* k10247 in k10049 */
+static void C_ccall f_10249(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* process-template2443 */
+t2=((C_word*)((C_word*)t0)[5])[1];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10243 in k10049 */
+static void C_ccall f_10245(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_10245,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));}
+
+/* k10210 in k10049 */
+static void C_ccall f_10212(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_10212,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10220,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-template2443 */
+t4=((C_word*)((C_word*)t0)[4])[1];
+((C_proc5)C_retrieve_proc(t4))(5,t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10218 in k10210 in k10049 */
+static void C_ccall f_10220(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_10220,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));}
+
+/* k10052 in k10049 */
+static void C_ccall f_10054(C_word c,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_10054,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_10060,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-variables2445 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+((C_proc6)C_retrieve_proc(t5))(6,t5,t3,t4,t2,((C_word*)t0)[6],C_SCHEME_END_OF_LIST);}
+
+/* k10058 in k10052 in k10049 */
+static void C_ccall f_10060(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_10060,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(t1))){
+/* ##sys#syntax-error-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),((C_word*)t0)[11],lf[225],((C_word*)t0)[10]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_10072,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-template2443 */
+t4=((C_word*)((C_word*)t0)[9])[1];
+((C_proc5)C_retrieve_proc(t4))(5,t4,t2,t3,((C_word*)t0)[2],((C_word*)t0)[7]);}}
+
+/* k10070 in k10058 in k10052 in k10049 */
+static void C_ccall f_10072(C_word c,C_word t0,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_10072,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10075,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_10138,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_10138(t6,(C_word)C_eqp(t1,t5));}
+else{
+t5=t3;
+f_10138(t5,C_SCHEME_FALSE);}}
+else{
+t5=t3;
+f_10138(t5,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_10138(t4,C_SCHEME_FALSE);}}
+
+/* k10136 in k10070 in k10058 in k10052 in k10049 */
+static void C_fcall f_10138(C_word t0,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_10138,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[6];
+f_10075(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_10153,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);}}
+
+/* k10151 in k10136 in k10070 in k10058 in k10052 in k10049 */
+static void C_ccall f_10153(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_10153,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+t3=((C_word*)t0)[3];
+f_10075(t3,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t2));}
+
+/* k10073 in k10070 in k10058 in k10052 in k10049 */
+static void C_fcall f_10075(C_word t0,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_10075,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10078,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_10109,a[2]=t4,a[3]=((C_word)li142),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_10109(t6,t2,((C_word*)t0)[2],t1);}
+
+/* doloop2670 in k10073 in k10070 in k10058 in k10052 in k10049 */
+static void C_fcall f_10109(C_word t0,C_word 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_10109,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[226],t8);
+t12=t1;
+t13=t6;
+t14=t9;
+t1=t12;
+t2=t13;
+t3=t14;
+goto loop;}}
+
+/* k10076 in k10073 in k10070 in k10058 in k10052 in k10049 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10078,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10107,a[2]=((C_word*)t0)[2],a[3]=((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-tail2449 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k10105 in k10076 in k10073 in k10070 in k10058 in k10052 in k10049 */
+static void C_ccall f_10107(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_10107,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_10099,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_10103,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-tail2449 */
+t4=((C_word*)((C_word*)t0)[3])[1];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}}
+
+/* k10101 in k10105 in k10076 in k10073 in k10070 in k10058 in k10052 in k10049 */
+static void C_ccall f_10103(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* process-template2443 */
+t2=((C_word*)((C_word*)t0)[5])[1];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10097 in k10105 in k10076 in k10073 in k10070 in k10058 in k10052 in k10049 */
+static void C_ccall f_10099(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_10099,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_9797 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_9797(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_9797,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_9821,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* mapit2596 */
+t6=t4;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t3);}}
+else{
+t5=(*a=C_CLOSURE_TYPE|14,a[1]=(C_word)f_9827,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?2446 */
+t6=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
+
+/* k9825 */
+static void C_ccall f_9827(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_9827,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_9836,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)li139),tmp=(C_word)a,a+=8,tmp);
+/* process-pattern2442 */
+t4=((C_word*)((C_word*)t0)[8])[1];
+((C_proc5)C_retrieve_proc(t4))(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_9887,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-pattern2442 */
+t6=((C_word*)((C_word*)t0)[8])[1];
+((C_proc5)C_retrieve_proc(t6))(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_9927,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?2436 */
+t6=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t3,t5);}
+else{
+t4=t3;
+f_9927(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);}}}}
+
+/* k9925 in k9825 */
+static void C_ccall f_9927(C_word c,C_word t0,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_9927,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9937,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[223]+1)))(3,*((C_word*)lf[223]+1),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_9950,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)li140),tmp=(C_word)a,a+=10,tmp));
+t5=((C_word*)t3)[1];
+f_9950(t5,((C_word*)t0)[6],C_fix(0));}}
+
+/* lp in k9925 in k9825 */
+static void C_fcall f_9950(C_word t0,C_word 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_9950,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_9964,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-pattern2442 */
+t9=((C_word*)((C_word*)t0)[3])[1];
+((C_proc5)C_retrieve_proc(t9))(5,t9,t4,t5,t8,((C_word*)t0)[2]);}}
+
+/* k9962 in lp in k9925 in k9825 */
+static void C_ccall f_9964(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_9964,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9968,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));
+/* lp2625 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_9950(t4,t2,t3);}
+
+/* k9966 in k9962 in lp in k9925 in k9825 */
+static void C_ccall f_9968(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k9935 in k9925 in k9825 */
+static void C_ccall f_9937(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_9937,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-pattern2442 */
+t4=((C_word*)((C_word*)t0)[4])[1];
+((C_proc5)C_retrieve_proc(t4))(5,t4,((C_word*)t0)[3],t1,t3,((C_word*)t0)[2]);}
+
+/* k9885 in k9825 */
+static void C_ccall f_9887(C_word c,C_word t0,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_9887,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9891,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-pattern2442 */
+t6=((C_word*)((C_word*)t0)[3])[1];
+((C_proc5)C_retrieve_proc(t6))(5,t6,t2,t3,t5,((C_word*)t0)[2]);}
+
+/* k9889 in k9885 in k9825 */
+static void C_ccall f_9891(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a9835 in k9825 */
+static void C_ccall f_9836(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_9836,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];
+/* mapit2596 */
+t5=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t5))(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);
+/* mapit2596 */
+t11=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t11))(3,t11,t1,t10);}}
+
+/* k9819 */
+static void C_ccall f_9821(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_9821,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_9509 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_9509(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_9509,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_vector_length(t3);
+t5=(*a=C_CLOSURE_TYPE|18,a[1]=(C_word)f_9516,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?2436 */
+t8=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t8))(3,t8,t5,t7);}
+else{
+t6=t5;
+f_9516(2,t6,C_SCHEME_FALSE);}}
+
+/* k9514 */
+static void C_ccall f_9516(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9516,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_9555,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_9555(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_9555(t12,(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[2])[1],t11));}}
+
+/* k9553 in k9514 */
+static void C_fcall f_9555(C_word t0,C_word 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_9555,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9559,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_9563,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_9565,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)li137),tmp=(C_word)a,a+=17,tmp));
+t7=((C_word*)t5)[1];
+f_9565(t7,t3,C_fix(0));}
+
+/* lp in k9553 in k9514 */
+static void C_fcall f_9565(C_word t0,C_word 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_9565,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_9625,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_9629,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-match2439 */
+t21=((C_word*)((C_word*)t0)[3])[1];
+((C_proc4)C_retrieve_proc(t21))(4,t21,t15,t18,t20);}
+else{
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9696,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-match2439 */
+t13=((C_word*)((C_word*)t0)[3])[1];
+((C_proc4)C_retrieve_proc(t13))(4,t13,t8,t11,t12);}}}
+
+/* k9694 in lp in k9553 in k9514 */
+static void C_ccall f_9696(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_9696,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9700,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));
+/* lp2571 */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_9565(t4,t2,t3);}
+
+/* k9698 in k9694 in lp in k9553 in k9514 */
+static void C_ccall f_9700(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k9627 in lp in k9553 in k9514 */
+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 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_9629,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);}
+
+/* k9623 in lp in k9553 in k9514 */
+static void C_ccall f_9625(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9625,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));}
+
+/* k9561 in k9553 in k9514 */
+static void C_ccall f_9563(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);}
+
+/* k9557 in k9553 in k9514 */
+static void C_ccall f_9559(C_word c,C_word t0,C_word t1){
+C_word 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_9559,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_9387 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_9387(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_9387,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_9391,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-match2439 */
+t7=((C_word*)((C_word*)t0)[2])[1];
+((C_proc4)C_retrieve_proc(t7))(4,t7,t4,t6,t3);}
+
+/* k9389 */
+static void C_ccall f_9391(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9391,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_9463,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);}}
+
+/* k9461 in k9389 */
+static void C_ccall f_9463(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_9463,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_9166 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_9166(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_9166,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[222],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_9216,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?2446 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}}
+
+/* k9214 */
+static void C_ccall f_9216(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9216,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_car(((C_word*)t0)[15]);
+/* process-segment-match2440 */
+t3=((C_word*)((C_word*)t0)[14])[1];
+((C_proc4)C_retrieve_proc(t3))(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_9264,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_9268,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-match2439 */
+t12=((C_word*)((C_word*)t0)[6])[1];
+((C_proc4)C_retrieve_proc(t12))(4,t12,t8,t10,t11);}
+else{
+if(C_truep((C_word)C_i_vectorp(((C_word*)t0)[15]))){
+/* process-vector-match2441 */
+t2=((C_word*)((C_word*)t0)[4])[1];
+((C_proc4)C_retrieve_proc(t2))(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_9330,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_9330(t4,t2);}
+else{
+t4=(C_word)C_booleanp(((C_word*)t0)[15]);
+t5=t3;
+f_9330(t5,(C_truep(t4)?t4:(C_word)C_charp(((C_word*)t0)[15])));}}}}}
+
+/* k9328 in k9214 */
+static void C_fcall f_9330(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_9330,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));}}
+
+/* k9266 in k9214 */
+static void C_ccall f_9268(C_word c,C_word t0,C_word 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_9268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9272,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_9276,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-match2439 */
+t7=((C_word*)((C_word*)t0)[2])[1];
+((C_proc4)C_retrieve_proc(t7))(4,t7,t3,t5,t6);}
+
+/* k9274 in k9266 in k9214 */
+static void C_ccall f_9276(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);}
+
+/* k9270 in k9266 in k9214 */
+static void C_ccall f_9272(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);}
+
+/* k9262 in k9214 */
+static void C_ccall f_9264(C_word c,C_word t0,C_word 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_9264,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_9082 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_9082(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_9082,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9089,a[2]=((C_word*)t0)[2],a[3]=((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_9089(t6,(C_word)C_i_nullp(t5));}
+else{
+t5=t3;
+f_9089(t5,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_9089(t4,C_SCHEME_FALSE);}}
+
+/* k9087 */
+static void C_fcall f_9089(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_9089,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9092,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t2,((C_word*)t0)[10]);}
+else{
+/* ##sys#syntax-error-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),((C_word*)t0)[7],lf[221],((C_word*)t0)[10]);}}
+
+/* k9090 in k9087 */
+static void C_ccall f_9092(C_word c,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_9092,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[10]);
+t3=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9137,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_9141,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* process-match2439 */
+t5=((C_word*)((C_word*)t0)[2])[1];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,((C_word*)((C_word*)t0)[3])[1],t1);}
+
+/* k9139 in k9090 in k9087 */
+static void C_ccall f_9141(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);}
+
+/* k9135 in k9090 in k9087 */
+static void C_ccall f_9137(C_word c,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_9137,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_9118,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_9132,a[2]=((C_word)li133),tmp=(C_word)a,a+=3,tmp);
+/* process-pattern2442 */
+t5=((C_word*)((C_word*)t0)[3])[1];
+((C_proc5)C_retrieve_proc(t5))(5,t5,t3,((C_word*)t0)[4],((C_word*)((C_word*)t0)[2])[1],t4);}
+
+/* a9131 in k9135 in k9090 in k9087 */
+static void C_ccall f_9132(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_9132,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k9116 in k9135 in k9090 in k9087 */
+static void C_ccall f_9118(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_9118,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9126,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_9130,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* meta-variables2444 */
+t4=((C_word*)((C_word*)t0)[3])[1];
+((C_proc5)C_retrieve_proc(t4))(5,t4,t3,((C_word*)t0)[2],C_fix(0),C_SCHEME_END_OF_LIST);}
+
+/* k9128 in k9116 in k9135 in k9090 in k9087 */
+static void C_ccall f_9130(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* process-template2443 */
+t2=((C_word*)((C_word*)t0)[4])[1];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0),t1);}
+
+/* k9124 in k9116 in k9135 in k9090 in k9087 */
+static void C_ccall f_9126(C_word c,C_word t0,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_9126,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_8957 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8957(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_8957,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_8997,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_9001,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_9023,a[2]=t13,a[3]=t18,a[4]=t15,a[5]=((C_word*)t0)[2],a[6]=((C_word)li131),tmp=(C_word)a,a+=7,tmp));
+t20=((C_word*)t18)[1];
+f_9023(t20,t16,t2);}
+
+/* loop2458 */
+static void C_fcall f_9023(C_word t0,C_word 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_9023,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_9052,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));
+/* g24742475 */
+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);}}
+
+/* k9050 in loop2458 */
+static void C_ccall f_9052(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9052,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));
+/* loop24582471 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9023(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));
+/* loop24582471 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_9023(t6,((C_word*)t0)[3],t5);}}
+
+/* k8999 */
+static void C_ccall f_9001(C_word c,C_word t0,C_word 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_9001,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);}
+
+/* k8995 */
+static void C_ccall f_8997(C_word c,C_word t0,C_word t1){
+C_word 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_8997,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_8951 in k8947 in k8942 in k8938 in k8934 in k8930 in k8925 in k8918 in k8914 in k8909 in k8905 in k8901 in k8897 in k8893 in k8887 in k8882 in k8878 in k8874 in k8860 in ##sys#process-syntax-rules in k8851 in k8848 in k8845 in k8842 in k8839 in k8836 in k8833 in k8830 in k8827 in k8824 in k8821 in k8818 in k8815 in k8812 in k8809 in k8806 in k8803 in k8799 in k8796 in k8793 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8951(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_8951,3,t0,t1,t2);}
+/* c2396 */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* ##sys#mark-primitive in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8752(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_8752,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_8758,a[2]=t4,a[3]=((C_word)li128),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8758(t6,t1,t2);}
+
+/* loop1768 in ##sys#mark-primitive in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8758(C_word t0,C_word 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_8758,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_8781,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: 928 ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[10]))(5,*((C_word*)lf[10]+1),t3,t5,lf[71],t6);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8779 in loop1768 in ##sys#mark-primitive in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8781(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_8758(t3,((C_word*)t0)[2],t2);}
+
+/* ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7566(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_7566,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
+t10=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7570,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: 767 r */
+t11=t3;
+((C_proc3)C_retrieve_proc(t11))(3,t11,t10,lf[200]);}
+
+/* k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7570(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_7570,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7573,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 768 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[199]);}
+
+/* k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7573(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_7573,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7576,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 769 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[198]);}
+
+/* k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7576(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_7576,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7579,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: 770 r */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[197]);}
+
+/* k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7579(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_7579,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_7581,a[2]=((C_word)li99),tmp=(C_word)a,a+=3,tmp));
+t11=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7590,a[2]=((C_word*)t0)[12],a[3]=((C_word)li100),tmp=(C_word)a,a+=4,tmp));
+t12=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7633,a[2]=((C_word*)t0)[12],a[3]=((C_word)li103),tmp=(C_word)a,a+=4,tmp));
+t13=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_7720,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)li118),tmp=(C_word)a,a+=13,tmp));
+t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8360,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: 867 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t14,((C_word*)t0)[12],((C_word*)t0)[6],lf[196]);}
+
+/* k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8360(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_8360,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8363,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 868 ##sys#current-module */
+((C_proc2)C_retrieve_symbol_proc(lf[70]))(2,*((C_word*)lf[70]+1),t2);}
+
+/* k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8363(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_8363,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8366,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_8727,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: 874 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),t3,t6,t7);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8742,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: 877 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),t3,t6,t7);}}
+else{
+t3=t2;
+f_8366(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k8740 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8742(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[189]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(7),t1);}
+
+/* k8725 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8727(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[189]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(8),t1);}
+
+/* k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8366(C_word c,C_word t0,C_word 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_8366,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8369,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_8375,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)li126),tmp=(C_word)a,a+=10,tmp));
+t7=((C_word*)t5)[1];
+f_8375(t7,t2,t3);}
+
+/* loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8375(C_word t0,C_word 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_8375,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_8383,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)li125),tmp=(C_word)a,a+=9,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8706,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));
+/* g16331634 */
+t6=t3;
+f_8383(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8704 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8706(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_8375(t3,((C_word*)t0)[2],t2);}
+
+/* g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8383(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_8383,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8387,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: 880 import-spec */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_7720(t4,t3,t2);}
+
+/* k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8387(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8387,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_retrieve(lf[9]);
+t7=C_retrieve(lf[9]);
+t8=C_retrieve(lf[9]);
+t9=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8405,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: 887 ##sys#mark-imported-symbols */
+((C_proc3)C_retrieve_symbol_proc(lf[195]))(3,*((C_word*)lf[195]+1),t9,t2);}
+
+/* k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8405(C_word c,C_word t0,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_8405,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8408,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_8637,a[2]=t4,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[7],a[5]=((C_word)li124),tmp=(C_word)a,a+=6,tmp));
+t6=((C_word*)t4)[1];
+f_8637(t6,t2,((C_word*)t0)[6]);}
+
+/* loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8637(C_word t0,C_word 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_8637,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_8645,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li123),tmp=(C_word)a,a+=5,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8692,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));
+/* g16531654 */
+t6=t3;
+f_8645(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8690 in loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8692(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_8637(t3,((C_word*)t0)[2],t2);}
+
+/* g1653 in loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8645(C_word 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_8645,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_8655,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: 892 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t5,t4,lf[71]);}
+
+/* k8653 in g1653 in loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8655(C_word c,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_8655,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8658,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_8658(t5,t4);}
+else{
+t3=t2;
+f_8658(t3,C_SCHEME_UNDEFINED);}}
+
+/* k8656 in k8653 in g1653 in loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8658(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_8658,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8685,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: 895 import-env */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k8683 in k8656 in k8653 in g1653 in loop1646 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8685(C_word 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: 897 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[2],lf[194],((C_word*)t0)[4]);}}
+else{
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8408(C_word c,C_word t0,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_8408,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_8411,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_8573,a[2]=t4,a[3]=((C_word*)t0)[10],a[4]=((C_word)li122),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_8573(t6,t2,((C_word*)t0)[8]);}
+
+/* loop1671 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8573(C_word t0,C_word 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_8573,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_8581,a[2]=((C_word*)t0)[3],a[3]=((C_word)li121),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8624,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));
+/* g16781679 */
+t6=t3;
+f_8581(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8622 in loop1671 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8624(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_8573(t3,((C_word*)t0)[2],t2);}
+
+/* g1678 in loop1671 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8581(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_8581,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8621,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 901 macro-env */
+t5=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k8619 in g1678 in loop1671 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8621(C_word c,C_word t0,C_word 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: 903 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),((C_word*)t0)[2],lf[193],t6);}}
+else{
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8411(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_8411,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8414,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_8439,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_8439(2,t4,C_SCHEME_UNDEFINED);}
+else{
+/* expand.scm: 907 syntax-error */
+((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),t3,((C_word*)t0)[2],lf[192]);}}
+else{
+t3=t2;
+f_8414(t3,C_SCHEME_UNDEFINED);}}
+
+/* k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8439(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_8439,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8442,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_8486,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_8494,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_8535,a[2]=t8,a[3]=t13,a[4]=t10,a[5]=((C_word)li120),tmp=(C_word)a,a+=6,tmp));
+t15=((C_word*)t13)[1];
+f_8535(t15,t11,((C_word*)t0)[2]);}
+
+/* loop1693 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8535(C_word t0,C_word 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_8535,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[191]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8564,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));
+/* g17091710 */
+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);}}
+
+/* k8562 in loop1693 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8564(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8564,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));
+/* loop16931706 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8535(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));
+/* loop16931706 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8535(t6,((C_word*)t0)[3],t5);}}
+
+/* k8492 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8494(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8494,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_8498,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_8500,a[2]=t3,a[3]=t8,a[4]=t5,a[5]=((C_word)li119),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_8500(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1716 in k8492 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8500(C_word t0,C_word 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_8500,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[191]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8529,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));
+/* g17321733 */
+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);}}
+
+/* k8527 in loop1716 in k8492 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8529(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8529,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));
+/* loop17161729 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8500(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));
+/* loop17161729 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8500(t6,((C_word*)t0)[3],t5);}}
+
+/* k8496 in k8492 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8498(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 910 append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[58]+1)))(5,*((C_word*)lf[58]+1),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8484 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8486(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[189]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(2),t1);}
+
+/* k8440 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8442(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_8442,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8445,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_8458,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[190],t9);
+t11=(C_word)C_a_i_cons(&a,2,t10,C_SCHEME_END_OF_LIST);
+/* expand.scm: 917 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),t3,t6,t11);}
+else{
+t3=((C_word*)t0)[4];
+f_8414(t3,C_retrieve(lf[9]));}}
+
+/* k8456 in k8440 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8458(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[189]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[2],t2,C_fix(9),t1);}
+
+/* k8443 in k8440 in k8437 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8445(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_8414(t2,C_retrieve(lf[9]));}
+
+/* k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8414(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_8414,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8417,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_8432,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_8436,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 921 import-env */
+t5=((C_word*)t0)[3];
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k8434 in k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8436(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 921 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8430 in k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 921 import-env */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8415 in k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8417,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8424,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_8428,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 922 macro-env */
+t4=((C_word*)t0)[4];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k8426 in k8415 in k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8428(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 922 append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[58]+1)))(4,*((C_word*)lf[58]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8422 in k8415 in k8412 in k8409 in k8406 in k8403 in k8385 in g1633 in loop1626 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8424(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 922 macro-env */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k8367 in k8364 in k8361 in k8358 in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8369(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[188]);}
+
+/* import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7720(C_word t0,C_word 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_7720,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_symbolp(t2))){
+/* expand.scm: 800 import-name */
+t3=((C_word*)((C_word*)t0)[11])[1];
+f_7633(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_7739,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_7739(t6,t4);}
+else{
+t6=(C_word)C_i_length(t2);
+t7=t5;
+f_7739(t7,(C_word)C_fixnum_lessp(t6,C_fix(2)));}}}
+
+/* k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7739(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_7739,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* expand.scm: 802 syntax-error */
+((C_proc5)C_retrieve_symbol_proc(lf[129]))(5,*((C_word*)lf[129]+1),((C_word*)t0)[12],((C_word*)t0)[11],lf[178],((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_7748,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: 805 import-spec */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_7720(t5,t3,t4);}}
+
+/* k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7748(C_word c,C_word t0,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_7748,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_7760,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: 808 c */
+t6=((C_word*)t0)[6];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t4,((C_word*)t0)[2],t5);}
+
+/* k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7760,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7763,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: 809 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,((C_word*)t0)[7],((C_word*)t0)[9],lf[179]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_7885,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: 820 c */
+t4=((C_word*)t0)[5];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,((C_word*)t0)[2],t3);}}
+
+/* k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7885(C_word c,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_7885,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7888,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: 821 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,((C_word*)t0)[6],((C_word*)t0)[8],lf[180]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_8027,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: 831 c */
+t4=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,((C_word*)t0)[2],t3);}}
+
+/* k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8027(C_word c,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_8027,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8030,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: 832 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,((C_word*)t0)[5],((C_word*)t0)[9],lf[185]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_8206,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: 857 c */
+t4=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,((C_word*)t0)[2],t3);}}
+
+/* k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8206(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_8206,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8209,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: 858 ##sys#check-syntax */
+((C_proc5)C_retrieve_symbol_proc(lf[54]))(5,*((C_word*)lf[54]+1),t2,((C_word*)t0)[2],((C_word*)t0)[4],lf[186]);}
+else{
+/* expand.scm: 866 syntax-error */
+((C_proc5)C_retrieve_symbol_proc(lf[129]))(5,*((C_word*)lf[129]+1),((C_word*)t0)[7],((C_word*)t0)[2],lf[187],((C_word*)t0)[4]);}}
+
+/* k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8209(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_8209,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8212,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: 859 tostr */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_7590(t4,t2,t3);}
+
+/* k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8212(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_8212,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8214,a[2]=t1,a[3]=((C_word)li115),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_8245,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_8286,a[2]=t2,a[3]=t4,a[4]=t9,a[5]=t6,a[6]=((C_word)li117),tmp=(C_word)a,a+=7,tmp));
+t11=((C_word*)t9)[1];
+f_8286(t11,t7,((C_word*)t0)[2]);}
+
+/* loop1575 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8286(C_word 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_8286,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_8315,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));
+/* g15911592 */
+t5=((C_word*)t0)[2];
+f_8214(t5,t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8313 in loop1575 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8315(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8315,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));
+/* loop15751588 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8286(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));
+/* loop15751588 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8286(t6,((C_word*)t0)[3],t5);}}
+
+/* k8243 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8245(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_8245,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_8249,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_8251,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=t8,a[5]=t5,a[6]=((C_word)li116),tmp=(C_word)a,a+=7,tmp));
+t10=((C_word*)t8)[1];
+f_8251(t10,t6,((C_word*)t0)[2]);}
+
+/* loop1598 in k8243 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8251(C_word 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_8251,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_8280,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));
+/* g16141615 */
+t5=((C_word*)t0)[2];
+f_8214(t5,t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8278 in loop1598 in k8243 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8280(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8280,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));
+/* loop15981611 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8251(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));
+/* loop15981611 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_8251(t6,((C_word*)t0)[3],t5);}}
+
+/* k8247 in k8243 in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8249(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_8249,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 k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8214(C_word t0,C_word 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_8214,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8222,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8230,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8234,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: 863 ##sys#symbol->string */
+((C_proc3)C_retrieve_symbol_proc(lf[170]))(3,*((C_word*)lf[170]+1),t5,t6);}
+
+/* k8232 in ren in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8234(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 863 ##sys#string-append */
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8228 in ren in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8230(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 862 ##sys#string->symbol */
+((C_proc3)C_retrieve_symbol_proc(lf[66]))(3,*((C_word*)lf[66]+1),((C_word*)t0)[2],t1);}
+
+/* k8220 in ren in k8210 in k8207 in k8204 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8222(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8222,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));}
+
+/* k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8030(C_word c,C_word t0,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_8030,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_8039,a[2]=t4,a[3]=((C_word)li114),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8039(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 k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8039(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_8039,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_8055,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_8060,a[2]=t9,a[3]=((C_word)li111),tmp=(C_word)a,a+=4,tmp));
+t11=((C_word*)t9)[1];
+f_8060(t11,t7,t6);}
+else{
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8143,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: 841 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t7,t3);}}
+else{
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_8200,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: 848 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t7,t2);}}
+
+/* k8198 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8200(C_word c,C_word t0,C_word 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_8200,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_8150,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);
+/* g15651566 */
+t4=t3;
+f_8150(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: 854 loop */
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_8039(t6,((C_word*)t0)[2],t3,((C_word*)t0)[4],t5,((C_word*)t0)[3],((C_word*)t0)[8]);}}
+
+/* g1565 in k8198 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8150(C_word 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_8150,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_8178,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: 851 cdar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t5,((C_word*)t0)[7]);}
+
+/* k8176 in g1565 in k8198 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8178(C_word c,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_8178,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_8166,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: 853 ##sys#delq */
+((C_proc4)C_retrieve_symbol_proc(lf[183]))(4,*((C_word*)lf[183]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8164 in k8176 in g1565 in k8198 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8166(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 850 loop */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_8039(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k8141 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 t6;
+C_word t7;
+C_word ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8143,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_8093,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)li112),tmp=(C_word)a,a+=9,tmp);
+/* g15611562 */
+t4=t3;
+f_8093(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: 847 loop */
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_8039(t6,((C_word*)t0)[2],((C_word*)t0)[4],t3,((C_word*)t0)[3],t5,((C_word*)t0)[8]);}}
+
+/* g1561 in k8141 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8093(C_word 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_8093,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_8121,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: 845 cdar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[184]+1)))(3,*((C_word*)lf[184]+1),t5,((C_word*)t0)[7]);}
+
+/* k8119 in g1561 in k8141 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_8121,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_8109,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: 846 ##sys#delq */
+((C_proc4)C_retrieve_symbol_proc(lf[183]))(4,*((C_word*)lf[183]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8107 in k8119 in g1561 in k8141 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8109(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 843 loop */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_8039(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop1547 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_8060(C_word 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_8060,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_8075,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: 838 ##sys#warn */
+((C_proc4)C_retrieve_symbol_proc(lf[181]))(4,*((C_word*)lf[181]+1),t3,lf[182],t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8073 in loop1547 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8075(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_8060(t3,((C_word*)t0)[2],t2);}
+
+/* k8053 in loop in k8028 in k8025 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8055(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_8055,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]));}
+
+/* k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7888(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7888,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_7891,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_7988,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t9,a[5]=t5,a[6]=((C_word)li110),tmp=(C_word)a,a+=7,tmp));
+t11=((C_word*)t9)[1];
+f_7988(t11,t6,t7);}
+
+/* loop1483 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7988(C_word 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_7988,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_8017,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));
+/* g14991500 */
+f_7581(t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k8015 in loop1483 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_8017(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_8017,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));
+/* loop14831496 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7988(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));
+/* loop14831496 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7988(t6,((C_word*)t0)[3],t5);}}
+
+/* k7889 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7891(C_word c,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_7891,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_7896,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t1,a[5]=((C_word)li109),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_7896(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* loop in k7889 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7896(C_word t0,C_word 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_7896,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_7908,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li108),tmp=(C_word)a,a+=6,tmp));
+t7=((C_word*)t5)[1];
+f_7908(t7,t1,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);}
+else{
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7982,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: 829 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t4,t2);}}
+
+/* k7980 in loop in k7889 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 t6;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7982,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: 829 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_7896(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: 830 loop */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_7896(t5,((C_word*)t0)[3],t2,t4);}}
+
+/* loop in loop in k7889 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7908(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_7908,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_7950,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: 827 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t4,t2);}}
+
+/* k7948 in loop in loop in k7889 in k7886 in k7883 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7950(C_word c,C_word t0,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_7950,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: 827 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_7908(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: 828 loop */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_7908(t5,((C_word*)t0)[3],t2,t4);}}
+
+/* k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 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_7763,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_7766,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_7846,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t9,a[5]=t5,a[6]=((C_word)li107),tmp=(C_word)a,a+=7,tmp));
+t11=((C_word*)t9)[1];
+f_7846(t11,t6,t7);}
+
+/* loop1438 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7846(C_word 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_7846,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_7875,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));
+/* g14541455 */
+f_7581(t3,t4);}
+else{
+t3=((C_word*)((C_word*)t0)[3])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k7873 in loop1438 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7875(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_7875,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));
+/* loop14381451 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7846(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));
+/* loop14381451 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_7846(t6,((C_word*)t0)[3],t5);}}
+
+/* k7764 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7766(C_word c,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_7766,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_7771,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word*)t0)[4],a[5]=((C_word)li106),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_7771(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);}
+
+/* loop in k7764 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7771(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_7771,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_7788,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t2,a[6]=((C_word)li104),tmp=(C_word)a,a+=7,tmp);
+/* g14711472 */
+t8=t7;
+f_7788(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_7810,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=t4,a[5]=t2,a[6]=((C_word)li105),tmp=(C_word)a,a+=7,tmp);
+/* g14751476 */
+t10=t9;
+f_7810(t10,t1,t8);}
+else{
+t9=(C_word)C_i_cdr(t2);
+/* expand.scm: 819 loop */
+t13=t1;
+t14=t9;
+t15=t3;
+t16=t4;
+t1=t13;
+t2=t14;
+t3=t15;
+t4=t16;
+goto loop;}}}}
+
+/* g1475 in loop in k7764 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7810(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_7810,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: 818 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_7771(t5,t1,t3,((C_word*)t0)[2],t4);}
+
+/* g1471 in loop in k7764 in k7761 in k7758 in k7746 in k7737 in import-spec in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7788(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_7788,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: 815 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_7771(t5,t1,t3,t4,((C_word*)t0)[2]);}
+
+/* import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7633(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_7633,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7637,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 780 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t3,t2);}
+
+/* k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7637(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_7637,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7640,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 781 ##sys#find-module */
+((C_proc4)C_retrieve_symbol_proc(lf[172]))(4,*((C_word*)lf[172]+1),t2,t1,C_SCHEME_FALSE);}
+
+/* k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7640(C_word c,C_word t0,C_word t1){
+C_word 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_7640,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_7643,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_7643(2,t5,C_SCHEME_UNDEFINED);}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7655,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_7714,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7718,a[2]=t6,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 784 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),t7,((C_word*)t0)[3]);}}
+
+/* k7716 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7718(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 784 string-append */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[33]+1)))(4,*((C_word*)lf[33]+1),((C_word*)t0)[2],t1,lf[177]);}
+
+/* k7712 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7714(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 783 ##sys#find-extension */
+((C_proc4)C_retrieve_symbol_proc(lf[176]))(4,*((C_word*)lf[176]+1),((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
+
+/* k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7655(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_7655,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_retrieve(lf[70]);
+t3=C_retrieve(lf[3]);
+t4=C_retrieve(lf[4]);
+t5=C_retrieve(lf[20]);
+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_7661,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: 788 ##sys#current-meta-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[4]))(2,*((C_word*)lf[4]+1),t10);}
+else{
+/* expand.scm: 793 syntax-error */
+((C_proc5)C_retrieve_symbol_proc(lf[129]))(5,*((C_word*)lf[129]+1),((C_word*)t0)[4],((C_word*)t0)[2],lf[175],((C_word*)t0)[3]);}}
+
+/* k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7661(C_word c,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_7661,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_7664,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 789 ##sys#meta-macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[174]))(2,*((C_word*)lf[174]+1),t4);}
+
+/* k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7664(C_word c,C_word t0,C_word 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_7664,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_7665,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)li101),tmp=(C_word)a,a+=11,tmp);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7697,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_7703,a[2]=((C_word*)t0)[2],a[3]=((C_word)li102),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);}
+
+/* a7702 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7703(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_7703,2,t0,t1);}
+/* expand.scm: 790 ##sys#load */
+((C_proc5)C_retrieve_symbol_proc(lf[173]))(5,*((C_word*)lf[173]+1),t1,((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE);}
+
+/* k7695 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7697(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_7697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7701,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 791 ##sys#find-module */
+((C_proc3)C_retrieve_symbol_proc(lf[172]))(3,*((C_word*)lf[172]+1),t2,((C_word*)t0)[2]);}
+
+/* k7699 in k7695 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_7643(2,t3,t2);}
+
+/* swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 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_7665,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7669,a[2]=((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);
+/* g137213731388 */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7669(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_7669,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_7672,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);
+/* g137213731388 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[10])[1]);}
+
+/* k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7672(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_7672,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_7676,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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);
+/* g137413751389 */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7676,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_7679,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);
+/* g137413751389 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[8])[1]);}
+
+/* k7677 in k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7679(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_7679,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_7683,a[2]=((C_word*)t0)[2],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);
+/* g137613771390 */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7681 in k7677 in k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7683(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_7683,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7686,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);
+/* g137613771390 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k7684 in k7681 in k7677 in k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7686,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_7690,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);
+/* g137813791391 */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k7688 in k7684 in k7681 in k7677 in k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7690(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_7690,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7693,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* g137813791391 */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k7691 in k7688 in k7684 in k7681 in k7677 in k7674 in k7670 in k7667 in swap1369 in k7662 in k7659 in k7653 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 *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);}
+
+/* k7641 in k7638 in k7635 in import-name in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7643,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 k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7590(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_7590,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_7603,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 775 keyword? */
+((C_proc3)C_retrieve_symbol_proc(lf[133]))(3,*((C_word*)lf[133]+1),t3,t2);}}
+
+/* k7601 in tostr in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7603(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7603,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7610,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 775 ##sys#symbol->string */
+((C_proc3)C_retrieve_symbol_proc(lf[170]))(3,*((C_word*)lf[170]+1),t2,((C_word*)t0)[3]);}
+else{
+if(C_truep((C_word)C_i_symbolp(((C_word*)t0)[3]))){
+/* expand.scm: 776 ##sys#symbol->string */
+((C_proc3)C_retrieve_symbol_proc(lf[170]))(3,*((C_word*)lf[170]+1),((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+if(C_truep((C_word)C_i_numberp(((C_word*)t0)[3]))){
+/* expand.scm: 777 number->string */
+C_number_to_string(3,0,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+/* expand.scm: 778 syntax-error */
+((C_proc4)C_retrieve_symbol_proc(lf[129]))(4,*((C_word*)lf[129]+1),((C_word*)t0)[4],((C_word*)t0)[2],lf[171]);}}}}
+
+/* k7608 in k7601 in tostr in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7610(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 775 ##sys#string-append */
+((C_proc4)C_retrieve_symbol_proc(lf[168]))(4,*((C_word*)lf[168]+1),((C_word*)t0)[2],t1,lf[169]);}
+
+/* resolve in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7581(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_7581,NULL,2,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7585,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 772 lookup */
+f_3875(t3,t2,C_SCHEME_END_OF_LIST);}
+
+/* k7583 in resolve in k7577 in k7574 in k7571 in k7568 in ##sys#expand-import in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7585(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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7354(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_7354,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_7356,a[2]=t2,a[3]=((C_word)li97),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_7356 in ##sys#er-transformer in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7356(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[11],*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_7356,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=C_SCHEME_UNDEFINED;
+t9=t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7359,a[2]=t3,a[3]=t6,a[4]=((C_word)li93),tmp=(C_word)a,a+=5,tmp);
+t10=t8=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7427,a[2]=t4,a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 761 handler */
+t11=((C_word*)t0)[2];
+((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t2,t7,t8);}
+
+/* compare */
+static void C_ccall f_7427(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_7427,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_symbolp(t2);
+t5=(C_truep(t4)?(C_word)C_i_symbolp(t3):C_SCHEME_FALSE);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7440,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* expand.scm: 732 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t6,t2,lf[7]);}
+else{
+t6=(C_word)C_eqp(t2,t3);
+t7=C_retrieve(lf[9]);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t6);}}
+
+/* k7438 in compare */
+static void C_ccall f_7440(C_word c,C_word t0,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_7440,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7443,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_7443(t3,t1);}
+else{
+t3=((C_word*)t0)[2];
+t4=((C_word*)t0)[3];
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f17986,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 754 lookup */
+f_3875(t5,t3,t4);}}
+
+/* f17986 in k7438 in compare */
+static void C_ccall f17986(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[9]);
+if(C_truep(t1)){
+t3=((C_word*)t0)[3];
+f_7443(t3,t1);}
+else{
+t3=((C_word*)t0)[2];
+t4=((C_word*)t0)[3];
+f_7443(t4,t3);}}
+
+/* k7441 in k7438 in compare */
+static void C_fcall f_7443(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_7443,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7446,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: 735 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)t0)[3],lf[7]);}
+
+/* k7444 in k7441 in k7438 in compare */
+static void C_ccall f_7446(C_word c,C_word t0,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_7446,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7449,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_7449(t3,t1);}
+else{
+t3=((C_word*)t0)[3];
+t4=((C_word*)t0)[2];
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f17979,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 754 lookup */
+f_3875(t5,t3,t4);}}
+
+/* f17979 in k7444 in k7441 in k7438 in compare */
+static void C_ccall f17979(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[9]);
+if(C_truep(t1)){
+t3=((C_word*)t0)[3];
+f_7449(t3,t1);}
+else{
+t3=((C_word*)t0)[2];
+t4=((C_word*)t0)[3];
+f_7449(t4,t3);}}
+
+/* k7447 in k7444 in k7441 in k7438 in compare */
+static void C_fcall f_7449(C_word t0,C_word 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_7449,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_7468,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 740 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)t0)[3],lf[71]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7500,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 742 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}}
+else{
+if(C_truep((C_word)C_i_symbolp(t1))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7528,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 746 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t2);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[3],t1);
+t3=C_retrieve(lf[9]);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}}
+
+/* k7526 in k7447 in k7444 in k7441 in k7438 in compare */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7528,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_7513,a[2]=((C_word*)t0)[3],a[3]=((C_word)li95),tmp=(C_word)a,a+=4,tmp);
+t4=f_7513(t3,t2);
+t5=C_retrieve(lf[9]);
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t4);}
+else{
+t3=C_retrieve(lf[9]);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* g1312 in k7526 in k7447 in k7444 in k7441 in k7438 in compare */
+static C_word C_fcall f_7513(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));}
+
+/* k7498 in k7447 in k7444 in k7441 in k7438 in compare */
+static void C_ccall f_7500(C_word c,C_word t0,C_word 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_7500,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_7485,a[2]=((C_word*)t0)[3],a[3]=((C_word)li94),tmp=(C_word)a,a+=4,tmp);
+t4=f_7485(t3,t2);
+t5=C_retrieve(lf[9]);
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t4);}
+else{
+t3=C_retrieve(lf[9]);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* g1301 in k7498 in k7447 in k7444 in k7441 in k7438 in compare */
+static C_word C_fcall f_7485(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]));}
+
+/* k7466 in k7447 in k7444 in k7441 in k7438 in compare */
+static void C_ccall f_7468(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_7468,2,t0,t1);}
+t2=(C_truep(t1)?t1:((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7475,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 741 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t3,((C_word*)t0)[2],lf[71]);}
+
+/* k7473 in k7466 in k7447 in k7444 in k7441 in k7438 in compare */
+static void C_ccall f_7475(C_word c,C_word t0,C_word t1){
+C_word 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_retrieve(lf[9]);
+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_retrieve(lf[9]);
+t5=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}}
+
+/* rename */
+static void C_ccall f_7359(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);
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr3,(void*)f_7359,3,t0,t1,t2);}
+t3=(C_word)C_i_assq(t2,((C_word*)((C_word*)t0)[3])[1]);
+if(C_truep(t3)){
+t4=t1;
+t5=C_retrieve(lf[9]);
+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_7380,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: 714 lookup */
+f_3875(t4,t2,((C_word*)t0)[2]);}}
+
+/* k7378 in rename */
+static void C_ccall f_7380(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_7380,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7384,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);
+/* g12311232 */
+t3=t2;
+f_7384(t3,((C_word*)t0)[2],t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7414,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: 725 macro-alias */
+f_3893(t2,((C_word*)t0)[5],((C_word*)t0)[3]);}}
+
+/* k7412 in k7378 in rename */
+static void C_ccall f_7414(C_word c,C_word t0,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_7414,2,t0,t1);}
+t2=C_retrieve(lf[9]);
+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=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}
+
+/* g1231 in k7378 in rename */
+static void C_fcall f_7384(C_word 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_7384,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_symbolp(t2))){
+t3=C_retrieve(lf[9]);
+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_7397,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 720 macro-alias */
+f_3893(t3,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* k7395 in g1231 in k7378 in rename */
+static void C_ccall f_7397(C_word c,C_word t0,C_word 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_7397,2,t0,t1);}
+t2=C_retrieve(lf[9]);
+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);}
+
+/* er-macro-transformer in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7351(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_7351,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6879(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_6879r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest(a,C_rest_count(0));
+f_6879r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_6879r(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_6881,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_7294,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_7303,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-culprit10851201 */
+t9=t8;
+f_7303(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-se10861199 */
+t11=t7;
+f_7294(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))){
+/* body10831091 */
+t13=t6;
+f_6881(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-culprit1085 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7303(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_7303,NULL,2,t0,t1);}
+/* def-se10861199 */
+t2=((C_word*)t0)[2];
+f_7294(t2,t1,C_SCHEME_FALSE);}
+
+/* def-se1086 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7294(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_7294,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7302,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 624 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t3);}
+
+/* k7300 in def-se1086 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7302(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* body10831091 */
+t2=((C_word*)t0)[4];
+f_6881(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6881(C_word t0,C_word 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_6881,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_6884,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_6896,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_6927,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_6993,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
+t16=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_7022,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_7022(t18,t17);}
+else{
+t17=t16;
+f_7022(t17,C_SCHEME_UNDEFINED);}}
+
+/* k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7022(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_7022,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_7027,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_7027(t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7027(C_word t0,C_word 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_7027,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_7046,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_7046(t10,C_fix(1));}
+else{
+t10=(C_word)C_fixnum_greaterp(t5,C_fix(2));
+t11=t8;
+f_7046(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: 677 err */
+t5=((C_word*)((C_word*)t0)[7])[1];
+f_6896(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: 681 test */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 682 test */
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 683 test */
+t9=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 684 test */
+t10=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 685 test */
+t11=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 686 test */
+t12=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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: 687 test */
+t13=((C_word*)((C_word*)t0)[5])[1];
+f_6884(t13,t1,t2,((C_word*)((C_word*)t0)[3])[1],lf[161]);}
+else{
+t13=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7224,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li85),tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 689 test */
+t14=((C_word*)((C_word*)t0)[5])[1];
+f_6884(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_7265,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: 699 walk */
+t27=t4;
+t28=t5;
+t29=t6;
+t1=t27;
+t2=t28;
+t3=t29;
+goto loop;}
+else{
+/* expand.scm: 697 err */
+t4=((C_word*)((C_word*)t0)[7])[1];
+f_6896(t4,t1,lf[163]);}}
+else{
+/* expand.scm: 696 err */
+t4=((C_word*)((C_word*)t0)[7])[1];
+f_6896(t4,t1,lf[164]);}}}}}
+
+/* k7263 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7265(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: 700 walk */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_7027(t4,((C_word*)t0)[2],t2,t3);}
+
+/* a7223 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7224(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_7224,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7228,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: 692 lookup */
+f_3875(t3,t2,((C_word*)t0)[2]);}
+else{
+t4=t3;
+f_7228(2,t4,C_SCHEME_FALSE);}}
+
+/* k7226 in a7223 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7228(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]));}}
+
+/* k7044 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7046(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_7046,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_7051,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_7051(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_fix(0));}
+
+/* doloop1169 in k7044 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_7051(C_word t0,C_word 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_7051,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: 670 err */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_6896(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_7070,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: 672 err */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_6896(t6,t5,lf[140]);}
+else{
+if(C_truep((C_word)C_i_pairp(t2))){
+t6=(C_word)C_i_car(t2);
+/* expand.scm: 675 walk */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_7027(t7,t5,t6,((C_word*)t0)[2]);}
+else{
+/* expand.scm: 674 err */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_6896(t6,t5,lf[141]);}}}}
+
+/* k7068 in doloop1169 in k7044 in walk in k7020 in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_7070(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_7051(t4,((C_word*)t0)[2],t2,t3);}
+
+/* proper-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6993(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_6993,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6999,a[2]=((C_word)li82),tmp=(C_word)a,a+=3,tmp);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_6999(t2));}
+
+/* loop in proper-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_6999(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 body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6927(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_6927,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6931,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 639 ##sys#extended-lambda-list? */
+((C_proc3)C_retrieve_symbol_proc(lf[75]))(3,*((C_word*)lf[75]+1),t3,t2);}
+
+/* k6929 in lambda-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6931(C_word c,C_word t0,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_6931,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_6939,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_6939(t5,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* loop in k6929 in lambda-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6939(C_word t0,C_word 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_6939,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_6959,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 642 keyword? */
+t5=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t5))(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_6991,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 645 keyword? */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(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);}}}}
+
+/* k6989 in loop in k6929 in lambda-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6991(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: 646 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_6939(t3,((C_word*)t0)[4],t2);}}
+
+/* k6957 in loop in k6929 in lambda-list? in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6959(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 body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6896(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_6896,NULL,3,t0,t1,t2);}
+t3=C_retrieve(lf[126]);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6900,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: 631 get-line-number */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}
+
+/* k6898 in err in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6900(C_word c,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_6900,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6907,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_6914,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: 634 symbol->string */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6925,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 635 symbol->string */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}}
+
+/* k6923 in k6898 in err in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6925(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 635 string-append */
+t2=((C_word*)t0)[4];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[137],t1,lf[138],((C_word*)t0)[2]);}
+
+/* k6912 in k6898 in err in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6914(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_6914,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6918,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: 634 number->string */
+C_number_to_string(3,0,t2,((C_word*)t0)[2]);}
+
+/* k6916 in k6912 in k6898 in err in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6918(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 634 string-append */
+t2=((C_word*)t0)[5];
+((C_proc8)C_retrieve_proc(t2))(8,t2,((C_word*)t0)[4],lf[134],((C_word*)t0)[3],lf[135],t1,lf[136],((C_word*)t0)[2]);}
+
+/* k6905 in k6898 in err in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6907(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 632 ##sys#syntax-error-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* test in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6884(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_6884,NULL,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6891,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 627 pred */
+t6=t3;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
+
+/* k6889 in test in body1083 in ##sys#check-syntax in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6891(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: 627 err */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_6896(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}}
+
+/* get-line-number in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6838(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_6838,3,t0,t1,t2);}
+if(C_truep(C_retrieve(lf[125]))){
+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_6860,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 611 ##sys#hash-table-ref */
+((C_proc4)C_retrieve_symbol_proc(lf[132]))(4,*((C_word*)lf[132]+1),t4,C_retrieve(lf[125]),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);}}
+
+/* k6858 in get-line-number in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6860(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_6860,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6864,a[2]=((C_word*)t0)[3],a[3]=((C_word)li76),tmp=(C_word)a,a+=4,tmp);
+/* g10581059 */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,f_6864(t2,t1));}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* g1058 in k6858 in get-line-number in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_6864(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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6832(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_6832,3,t0,t1,t2);}
+/* expand.scm: 604 ##sys#syntax-error-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),t1,lf[130],t2);}
+
+/* ##sys#syntax-error-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6821(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_6821r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_6821r(t0,t1,t2);}}
+
+static void C_ccall f_6821r(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_6829,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 599 ##sys#strip-syntax */
+((C_proc3)C_retrieve_symbol_proc(lf[14]))(3,*((C_word*)lf[14]+1),t3,t2);}
+
+/* k6827 in ##sys#syntax-error-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6829(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_retrieve(lf[127]),lf[128],t1);}
+
+/* ##sys#expand-curried-define in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6751(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_6751,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_6754,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_6814,a[2]=t6,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 588 loop */
+t11=((C_word*)t8)[1];
+f_6754(t11,t10,t2,t3);}
+
+/* k6812 in ##sys#expand-curried-define in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6814(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_6814,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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6754(C_word t0,C_word 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_6754,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_6780,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_6807,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);}}
+
+/* k6805 in loop in ##sys#expand-curried-define in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6807(C_word c,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_6807,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: 587 loop */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_6754(t5,((C_word*)t0)[3],((C_word*)t0)[2],t4);}
+
+/* k6778 in loop in ##sys#expand-curried-define in k4209 in k3871 in k3867 in k3839 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6780,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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6663(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_6663,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_6666,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_6749,a[2]=t1,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 575 mwalk */
+t11=((C_word*)t8)[1];
+f_6666(t11,t10,t2,t3);}
+
+/* k6747 in match-expression in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6749(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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6666(C_word t0,C_word 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_6666,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_6720,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: 572 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_6680,a[2]=t2,a[3]=((C_word)li69),tmp=(C_word)a,a+=4,tmp);
+/* g10111012 */
+t6=t1;
+((C_proc2)C_retrieve_proc(t6))(2,t6,f_6680(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));}}}}
+
+/* g1011 in mwalk in match-expression in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_6680(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));}
+
+/* k6718 in mwalk in match-expression in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6720(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: 573 mwalk */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_6666(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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5824(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_5824r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_5824r(t0,t1,t2,t3);}}
+
+static void C_ccall f_5824r(C_word t0,C_word 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_5826,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_6606,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_6611,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-se766983 */
+t7=t6;
+f_6611(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?767981 */
+t9=t5;
+f_6606(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))){
+/* body764772 */
+t11=t4;
+f_5826(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-se766 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6611(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_6611,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6619,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 447 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
+
+/* k6617 in def-se766 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6619(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* def-cs?767981 */
+t2=((C_word*)t0)[3];
+f_6606(t2,((C_word*)t0)[2],t1);}
+
+/* def-cs?767 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6606(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_6606,NULL,3,t0,t1,t2);}
+/* body764772 */
+t3=((C_word*)t0)[2];
+f_5826(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5826(C_word t0,C_word 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_5826,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_5829,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_6142,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_6319,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: 556 expand */
+t13=((C_word*)t9)[1];
+f_6319(t13,t1,((C_word*)t0)[2]);}
+
+/* expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6319(C_word 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_6319,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_6325,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_6325(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 body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6325(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_6325,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_6347,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_6589,a[2]=t10,a[3]=t11,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 515 lookup */
+f_3875(t12,t10,((C_word*)t0)[6]);}
+else{
+t12=t11;
+f_6347(t12,C_SCHEME_FALSE);}}
+else{
+t12=t11;
+f_6347(t12,C_SCHEME_FALSE);}}
+else{
+/* expand.scm: 509 fini */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_5829(t7,t1,t3,t4,t5,t6,t2);}}
+
+/* k6587 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6589(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[3];
+f_6347(t2,(C_truep(t1)?t1:((C_word*)t0)[2]));}
+
+/* k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6347(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_6347,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_6365,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: 518 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),t3,lf[105],((C_word*)t0)[6],lf[119],C_SCHEME_FALSE,((C_word*)t0)[14]);}
+else{
+t3=(C_word)C_eqp(lf[110],t1);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6491,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: 541 ##sys#check-syntax */
+((C_proc6)C_retrieve_symbol_proc(lf[54]))(6,*((C_word*)lf[54]+1),t4,lf[110],((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_6503,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: 544 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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_6531,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: 547 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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: 550 fini */
+t8=((C_word*)((C_word*)t0)[3])[1];
+f_5829(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_6557,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: 552 ##sys#expand-0 */
+((C_proc5)C_retrieve_symbol_proc(lf[29]))(5,*((C_word*)lf[29]+1),t8,((C_word*)t0)[6],((C_word*)t0)[14],((C_word*)t0)[2]);}}}}}}
+else{
+/* expand.scm: 516 fini */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_5829(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]);}}
+
+/* k6555 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6557(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_6557,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[11],t1);
+if(C_truep(t2)){
+/* expand.scm: 554 fini */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_5829(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: 555 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_6325(t4,((C_word*)t0)[9],t3,((C_word*)t0)[8],((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);}}
+
+/* k6529 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6531(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_6531,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6538,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: 548 ##sys#append */
+t4=*((C_word*)lf[52]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t3,((C_word*)t0)[2]);}
+
+/* k6536 in k6529 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6538(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 548 loop */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_6325(t2,((C_word*)t0)[6],t1,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6501 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6503(C_word c,C_word t0,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_6503,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: 545 loop */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_6325(t6,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t3,t5);}
+
+/* k6489 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6491(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 542 fini/syntax */
+t2=((C_word*)((C_word*)t0)[8])[1];
+f_6142(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]);}
+
+/* k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6365(C_word c,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_6365,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_6370,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_6370(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6370(C_word t0,C_word 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_6370,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_6417,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: 530 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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_6439,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: 534 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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_6383,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: 522 ##sys#check-syntax */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),t4,lf[105],t2,lf[118],C_SCHEME_FALSE,((C_word*)t0)[8]);}}
+
+/* k6381 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6383(C_word c,C_word t0,C_word 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_6383,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: 523 loop */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_6325(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: 523 loop */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_6325(t5,((C_word*)t0)[5],((C_word*)t0)[4],t2,t4,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k6437 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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 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_6439,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_6466,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);}
+
+/* k6464 in k6437 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6466(C_word c,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_6466,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: 536 loop */
+t5=((C_word*)((C_word*)t0)[7])[1];
+f_6325(t5,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],t4,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k6415 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6417(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_6417,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6428,a[2]=((C_word*)t0)[2],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: 531 macro-alias */
+f_3893(t2,lf[105],((C_word*)t0)[2]);}
+
+/* k6426 in k6415 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6428(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_6428,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6432,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: 532 ##sys#expand-curried-define */
+((C_proc5)C_retrieve_symbol_proc(lf[114]))(5,*((C_word*)lf[114]+1),t2,((C_word*)t0)[3],t3,((C_word*)t0)[2]);}
+
+/* k6430 in k6426 in k6415 in loop2 in k6363 in k6345 in loop in expand in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6432(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6432,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+/* expand.scm: 531 loop2 */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_6370(t3,((C_word*)t0)[2],t2);}
+
+/* fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6142(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_6142,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6150,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_6152,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_6152(t11,t7,t6,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE);}
+
+/* loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6152(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_6152,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6167,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_3893(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_6198,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_6301,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 494 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t9,t2);}
+else{
+t9=t5;
+f_6198(t9,C_SCHEME_FALSE);}}
+else{
+t7=t5;
+f_6198(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;}}}
+
+/* k6299 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6301(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_6301,2,t0,t1);}
+if(C_truep((C_word)C_i_symbolp(t1))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6287,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_6297,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 495 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t3,((C_word*)t0)[3]);}
+else{
+t2=((C_word*)t0)[4];
+f_6198(t2,C_SCHEME_FALSE);}}
+
+/* k6295 in k6299 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6297(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 495 lookup */
+f_3875(((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k6285 in k6299 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6287(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_6287,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6290,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_6198(t4,(C_word)C_eqp(lf[110],t3));}
+else{
+/* expand.scm: 495 caar */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t2,((C_word*)t0)[2]);}}
+
+/* k6288 in k6285 in k6299 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6290(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_6198(t2,(C_word)C_eqp(lf[110],t1));}
+
+/* k6196 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6198(C_word t0,C_word 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_6198,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_6230,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 caadr */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[113]+1)))(3,*((C_word*)lf[113]+1),t5,t2);}
+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_6152(t6,((C_word*)t0)[3],t3,t5,C_SCHEME_FALSE);}}
+else{
+/* expand.scm: 505 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_6152(t2,((C_word*)t0)[3],((C_word*)t0)[6],((C_word*)t0)[5],C_SCHEME_TRUE);}}
+
+/* k6228 in k6196 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6230(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_6230,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_6242,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: 501 macro-alias */
+f_3893(t2,lf[112],((C_word*)t0)[2]);}
+
+/* k6240 in k6228 in k6196 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6242(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_6242,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6250,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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 cdadr */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[111]+1)))(3,*((C_word*)lf[111]+1),t2,((C_word*)t0)[2]);}
+
+/* k6248 in k6240 in k6228 in k6196 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6250,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_6254,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_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);}
+
+/* k6252 in k6248 in k6240 in k6228 in k6196 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6254(C_word c,C_word t0,C_word t1){
+C_word 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_6254,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[8],t1);
+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=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],t4);
+t6=(C_word)C_a_i_cons(&a,2,lf[110],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_6152(t8,((C_word*)t0)[3],((C_word*)t0)[2],t7,C_SCHEME_FALSE);}
+
+/* k6165 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6167(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_6167,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6175,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_6183,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)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k6181 in k6165 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6183(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)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[2],*((C_word*)lf[108]+1),t1);}
+
+/* k6173 in k6165 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6175(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_6175,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_6179,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);}
+
+/* k6177 in k6173 in k6165 in loop in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6179(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_6179,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));}
+
+/* k6148 in fini/syntax in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6150(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_5829(t2,((C_word*)t0)[6],((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5829(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_5829,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_5841,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_5841(t12,t1,t6,C_SCHEME_END_OF_LIST);}
+else{
+t9=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5932,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)C_retrieve_proc(t10))(3,t10,t9,t2);}}
+
+/* k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5932(C_word c,C_word t0,C_word t1){
+C_word 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_5932,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_5946,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_6090,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]);}
+
+/* k6088 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6090(C_word c,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_6090,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_6092,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_6092(t5,((C_word*)t0)[2],t1);}
+
+/* loop819 in k6088 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6092(C_word t0,C_word 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_6092,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));
+/* loop819832 */
+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));
+/* loop819832 */
+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);}}
+
+/* k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5946(C_word c,C_word t0,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_5946,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5950,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_5954,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_6070,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6086,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)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}
+
+/* k6084 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6086(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)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a6069 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6070(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_6070,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));}
+
+/* k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5954(C_word c,C_word t0,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_5954,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5958,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_5962,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_5968,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_6064,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)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[2]);}
+
+/* k6062 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6064(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_6064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6068,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)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k6066 in k6062 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6068(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)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5968(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_5968,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_5972,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_6027,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_6027(t12,t8,t2);}
+
+/* loop852 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_6027(C_word t0,C_word 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_6027,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[12]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_6056,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));
+/* g868869 */
+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);}}
+
+/* k6054 in loop852 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6056(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_6056,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));
+/* loop852865 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6027(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));
+/* loop852865 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_6027(t6,((C_word*)t0)[3],t5);}}
+
+/* k5970 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5972(C_word c,C_word t0,C_word t1){
+C_word 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_5972,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_5999,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_6003,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6005,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 477 map */
+t8=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t8))(5,t8,t6,t7,((C_word*)t0)[2],t1);}
+
+/* a6004 in k5970 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6005(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_6005,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));}
+
+/* k6001 in k5970 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_6003(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);}
+
+/* k5997 in k5970 in a5967 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5999(C_word c,C_word t0,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_5999,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));}
+
+/* k5960 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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);
+/* ##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);}
+
+/* k5964 in k5960 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5966(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);}
+
+/* k5956 in k5952 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5958(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);}
+
+/* k5948 in k5944 in k5930 in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5950,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_retrieve(lf[9]);
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
+
+/* loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5841(C_word t0,C_word 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_5841,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_5860,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_5905,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_5922,a[2]=t6,a[3]=t7,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 459 lookup */
+f_3875(t8,t6,((C_word*)t0)[3]);}
+else{
+t7=t5;
+f_5860(t7,C_SCHEME_FALSE);}}
+else{
+t6=t5;
+f_5860(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]));}}
+
+/* k5920 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[3];
+f_5905(t3,(C_word)C_eqp(t2,lf[105]));}
+else{
+t2=((C_word*)t0)[3];
+f_5905(t2,(C_word)C_eqp(((C_word*)t0)[2],lf[105]));}}
+
+/* k5903 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5905(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_5905,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_5860(t2,t1);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5915,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 460 lookup */
+f_3875(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k5913 in k5903 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[3];
+f_5860(t3,(C_word)C_eqp(t2,lf[104]));}
+else{
+t2=((C_word*)t0)[3];
+f_5860(t2,(C_word)C_eqp(((C_word*)t0)[2],lf[104]));}}
+
+/* k5858 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5860(C_word t0,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_5860,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5867,a[2]=((C_word*)t0)[8],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5871,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)C_retrieve_proc(t4))(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_5841(t4,((C_word*)t0)[8],t2,t3);}}
+
+/* k5869 in k5858 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5871(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_5871,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5879,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_6319(t3,t2,((C_word*)t0)[2]);}
+
+/* k5877 in k5869 in k5858 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5879(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5879,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);}
+
+/* k5865 in k5858 in loop in fini in body764 in ##sys#canonicalize-body in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5867(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_5867,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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5196(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_5196,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5199,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_5216,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_3893(t11,lf[100],t5);}
+
+/* k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5216(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_5216,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_5219,a[2]=((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_3893(t2,lf[99],((C_word*)t0)[4]);}
+
+/* k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5219(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_5219,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_5222,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_3893(t2,lf[98],((C_word*)t0)[4]);}
+
+/* k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5222(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_5222,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5225,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_3893(t2,lf[97],((C_word*)t0)[4]);}
+
+/* k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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 ab[14],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5225,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_5228,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((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_3893(t2,lf[47],((C_word*)t0)[4]);}
+
+/* k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5228(C_word c,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_5228,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_5233,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_5233(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 k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5233(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_5233,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_5247,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_5534,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)C_retrieve_proc(t9))(3,t9,t8,t3);}
+else{
+/* expand.scm: 367 reverse */
+t8=((C_word*)t0)[8];
+((C_proc3)C_retrieve_proc(t8))(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_5199(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_5575,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_5575(2,t10,C_SCHEME_FALSE);}
+else{
+/* expand.scm: 404 lookup */
+f_3875(t8,t7,((C_word*)t0)[2]);}}
+else{
+t9=t8;
+f_5575(2,t9,C_SCHEME_FALSE);}}
+else{
+/* expand.scm: 401 err */
+t7=((C_word*)t0)[4];
+f_5199(t7,t1,lf[96]);}}}}
+
+/* k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5575(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_5575,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_5590,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_5590(t6,C_SCHEME_UNDEFINED);}
+else{
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5606,a[2]=t5,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 408 macro-alias */
+f_3893(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_5624,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_5624(t8,(C_word)C_i_symbolp(t7));}
+else{
+t7=t6;
+f_5624(t7,C_SCHEME_FALSE);}}
+else{
+/* expand.scm: 420 err */
+t6=((C_word*)t0)[7];
+f_5199(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_5670,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_5670(t9,C_SCHEME_UNDEFINED);}
+else{
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5689,a[2]=t7,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 422 macro-alias */
+f_3893(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_5233(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_5233(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_5199(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_5233(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_5751,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_5751(t9,(C_word)C_eqp(C_fix(2),t8));}
+else{
+t8=t7;
+f_5751(t8,C_SCHEME_FALSE);}}}}}}
+
+/* k5749 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5751(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_5751,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_5199(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_5233(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_5199(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_5233(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_5199(t2,((C_word*)t0)[8],lf[95]);}}
+
+/* k5687 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5689(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_5670(t3,t2);}
+
+/* k5668 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5670(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_5233(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_5199(t2,((C_word*)t0)[6],lf[91]);}}
+
+/* k5622 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5624(C_word t0,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_5624,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_5627,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_5627(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_5627(t6,t5);}}
+else{
+/* expand.scm: 419 err */
+t2=((C_word*)t0)[2];
+f_5199(t2,((C_word*)t0)[6],lf[89]);}}
+
+/* k5625 in k5622 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5627(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_5233(t5,((C_word*)t0)[4],C_fix(2),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t4);}
+
+/* k5604 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_5590(t3,t2);}
+
+/* k5588 in k5573 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5590(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_5233(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_5199(t3,((C_word*)t0)[5],lf[87]);}}
+
+/* k5532 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5534(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]);}
+
+/* k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_5251,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_5251(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_5414,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_5422,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)C_retrieve_proc(t9))(3,t9,t8,((C_word*)t0)[7]);}}
+
+/* k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5422(C_word c,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_5422,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_5424,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_5424(t5,((C_word*)t0)[2],t1);}
+
+/* loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5424(C_word t0,C_word 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_5424,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_5451,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_5523,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));
+/* g654655 */
+t6=t3;
+f_5451(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k5521 in loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5523(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_5523,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));
+/* loop638651 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5424(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));
+/* loop638651 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_5424(t6,((C_word*)t0)[3],t5);}}
+
+/* g654 in loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5451(C_word 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_5451,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5520,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 */
+((C_proc3)C_retrieve_symbol_proc(lf[85]))(3,*((C_word*)lf[85]+1),t4,t5);}
+
+/* k5518 in g654 in loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5520(C_word c,C_word t0,C_word t1){
+C_word 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_5520,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_5482,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_5504,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);}}
+
+/* k5502 in k5518 in g654 in loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5504(C_word c,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_5504,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);}
+
+/* k5480 in k5518 in g654 in loop638 in k5420 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5482(C_word c,C_word t0,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_5482,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));}
+
+/* k5412 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5414(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_5414,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5418,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);}
+
+/* k5416 in k5412 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5418,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_5251(t4,(C_word)C_a_i_cons(&a,2,t3,C_SCHEME_END_OF_LIST));}
+
+/* k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5251(C_word t0,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_5251,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_5263,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[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_5263(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_5263(t5,(C_word)C_i_nullp(t4));}
+else{
+t4=t2;
+f_5263(t4,C_SCHEME_FALSE);}}}}
+
+/* k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5263(C_word t0,C_word t1){
+C_word 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_5263,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5290,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),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_5335,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)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[7]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5358,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_5366,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)C_retrieve_proc(t6))(3,t6,t5,((C_word*)t0)[7]);}}}
+
+/* k5364 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5366(C_word c,C_word t0,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_5366,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);}}
+
+/* k5356 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5362,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);}
+
+/* k5360 in k5356 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5362(C_word c,C_word t0,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_5362,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);}
+
+/* k5333 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5335(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_5335,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_5339,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);}
+
+/* k5337 in k5333 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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 t5;
+C_word t6;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_5339,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);}
+
+/* k5288 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5290(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_5290,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_5310,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[81]+1)))(3,*((C_word*)lf[81]+1),t2,((C_word*)t0)[2]);}
+
+/* k5308 in k5288 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+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 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_5310,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_5282,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);}
+
+/* k5280 in k5308 in k5288 in k5261 in k5249 in k5245 in loop in k5226 in k5223 in k5220 in k5217 in k5214 in ##sys#expand-extended-lambda-list in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5282(C_word c,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_5282,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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5199(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_5199,NULL,3,t0,t1,t2);}
+/* expand.scm: 350 errh */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,((C_word*)t0)[2]);}
+
+/* ##sys#extended-lambda-list? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5153(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_5153,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_5159,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_5159(t2));}
+
+/* loop in ##sys#extended-lambda-list? in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_5159(C_word t1){
+C_word tmp;
+C_word t2;
+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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5067(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_5067r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_5067r(t0,t1,t2,t3);}}
+
+static void C_ccall f_5067r(C_word t0,C_word 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_5069,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_5095,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_5100,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-se550574 */
+t7=t6;
+f_5100(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?551572 */
+t9=t5;
+f_5095(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))){
+/* body548556 */
+t11=t4;
+f_5069(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-se550 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5100(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_5100,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5108,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 317 ##sys#current-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}
+
+/* k5106 in def-se550 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5108(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* def-cs?551572 */
+t2=((C_word*)t0)[3];
+f_5095(t2,((C_word*)t0)[2],t1);}
+
+/* def-cs?551 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5095(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_5095,NULL,3,t0,t1,t2);}
+/* body548556 */
+t3=((C_word*)t0)[2];
+f_5069(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body548 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5069(C_word t0,C_word 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_5069,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_5075,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_5075(t7,t1,((C_word*)t0)[2]);}
+
+/* loop in body548 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5075(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_5075,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_5081,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_5087,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);}
+
+/* a5086 in loop in body548 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5087(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_5087,4,t0,t1,t2,t3);}
+if(C_truep(t3)){
+/* expand.scm: 321 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_5075(t4,t1,t2);}
+else{
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* a5080 in loop in body548 in ##sys#expand in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5081(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_5081,2,t0,t1);}
+/* expand.scm: 319 ##sys#expand-0 */
+((C_proc5)C_retrieve_symbol_proc(lf[29]))(5,*((C_word*)lf[29]+1),t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4966(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_4966,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4969,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_5003,a[2]=t4,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 297 ##sys#qualified-symbol? */
+((C_proc3)C_retrieve_symbol_proc(lf[13]))(3,*((C_word*)lf[13]+1),t5,t2);}
+
+/* k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5003(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_5003,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_5006,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)t0)[4],lf[71]);}}
+
+/* k5004 in k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5006(C_word c,C_word t0,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_5006,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+t3=t1;
+t4=C_retrieve(lf[9]);
+t5=t2;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_5023,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)t0)[3],lf[72]);}}
+
+/* k5021 in k5004 in k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5023(C_word c,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_5023,2,t0,t1);}
+if(C_truep(t1)){
+t2=C_retrieve(lf[9]);
+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_5065,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 */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t2);}}
+
+/* k5063 in k5021 in k5004 in k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5065(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_5065,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_5033,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[3],a[4]=((C_word)li37),tmp=(C_word)a,a+=5,tmp);
+/* g522523 */
+t4=t3;
+f_5033(t4,((C_word*)t0)[2],t2);}
+else{
+/* expand.scm: 312 mrename */
+t3=((C_word*)t0)[3];
+f_4969(t3,((C_word*)t0)[2],((C_word*)t0)[4]);}}
+
+/* g522 in k5063 in k5021 in k5004 in k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_5033(C_word 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_5033,NULL,3,t0,t1,t2);}
+t3=C_retrieve(lf[9]);
+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_4969(t5,t1,((C_word*)t0)[2]);}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_5052,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 311 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t5,t4,lf[71]);}}
+
+/* k5050 in g522 in k5063 in k5021 in k5004 in k5001 in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_5052(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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4969(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_4969,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4973,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 */
+((C_proc2)C_retrieve_symbol_proc(lf[70]))(2,*((C_word*)lf[70]+1),t3);}
+
+/* k4971 in mrename in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4973(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_4973,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4977,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li35),tmp=(C_word)a,a+=5,tmp);
+/* g505506 */
+t3=t2;
+f_4977(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);}}
+
+/* g505 in k4971 in mrename in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4977(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_4977,NULL,3,t0,t1,t2);}
+t3=C_retrieve(lf[9]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4984,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_4984(2,t5,C_SCHEME_UNDEFINED);}
+else{
+/* expand.scm: 294 ##sys#register-undefined */
+((C_proc4)C_retrieve_symbol_proc(lf[69]))(4,*((C_word*)lf[69]+1),t4,((C_word*)t0)[3],t2);}}
+
+/* k4982 in g505 in k4971 in mrename in ##sys#alias-global-hook in k4209 in k3871 in k3867 in k3839 */
+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 *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 */
+((C_proc4)C_retrieve_symbol_proc(lf[65]))(4,*((C_word*)lf[65]+1),((C_word*)t0)[3],((C_word*)t0)[2],t4);}
+
+/* ##sys#module-rename in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4948(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_4948,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4956,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 */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[33]+1)))(5,*((C_word*)lf[33]+1),t4,t5,lf[67],t6);}
+
+/* k4954 in ##sys#module-rename in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4956(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 283 ##sys#string->symbol */
+((C_proc3)C_retrieve_symbol_proc(lf[66]))(3,*((C_word*)lf[66]+1),((C_word*)t0)[2],t1);}
+
+/* ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4373(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_4373,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_4376,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_4578,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_4624,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_4624(t14,t1,t2);}
+
+/* loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4624(C_word 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_4624,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_4646,a[2]=((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_3875(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);}}
+
+/* k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4646(C_word c,C_word t0,C_word t1){
+C_word 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_4646,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_4652,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_4652(t6,C_SCHEME_UNDEFINED);}
+else{
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4931,a[2]=t5,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4938,a[2]=t4,a[3]=t6,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 242 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t7);}}
+
+/* k4936 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4938(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 242 lookup */
+f_3875(((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],t1);}
+
+/* k4929 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4931(C_word c,C_word 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_4652(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_4652(t4,t3);}}
+
+/* k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4652(C_word t0,C_word 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_4652,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_4661,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 */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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_4823,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_4823(t6,(C_word)C_i_pairp(t5));}
+else{
+t5=t3;
+f_4823(t5,C_SCHEME_FALSE);}}
+else{
+t5=t3;
+f_4823(t5,C_SCHEME_FALSE);}}}
+
+/* k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4823(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_4823,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_4829,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 */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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_4859,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,((C_word*)((C_word*)t0)[5])[1],lf[62]);}
+else{
+t3=t2;
+f_4859(2,t3,C_SCHEME_FALSE);}}
+else{
+t3=t2;
+f_4859(2,t3,C_SCHEME_FALSE);}}}
+
+/* k4857 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4859(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_4859,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4863,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);
+/* g465466 */
+t3=t2;
+f_4863(t3,((C_word*)t0)[2],t1);}
+else{
+/* expand.scm: 275 expand */
+t2=((C_word*)((C_word*)t0)[7])[1];
+f_4578(t2,((C_word*)t0)[2],((C_word*)t0)[6],((C_word*)t0)[8],((C_word*)((C_word*)t0)[5])[1]);}}
+
+/* g465 in k4857 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4863(C_word 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_4863,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_4867,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_4376(t6,t3,((C_word*)t0)[5],t4,((C_word*)t0)[7],t5,C_SCHEME_TRUE);}
+
+/* k4865 in g465 in k4857 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4867(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_4867,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_4578(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_4879,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_retrieve(lf[61]))){
+/* expand.scm: 273 ##sys#compiler-syntax-hook */
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t3,((C_word*)t0)[4],t1);}
+else{
+/* expand.scm: 274 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_4624(t4,((C_word*)t0)[5],t1);}}}
+
+/* k4877 in k4865 in g465 in k4857 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4879(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_4624(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k4827 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4829,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4836,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 */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[58]+1)))(5,*((C_word*)lf[58]+1),t2,t5,t6,t7);}
+
+/* k4834 in k4827 in k4821 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4836(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);}
+
+/* k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4661(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_4661,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_4673,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 */
+((C_proc7)C_retrieve_symbol_proc(lf[54]))(7,*((C_word*)lf[54]+1),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);}}
+
+/* k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4673(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_4673,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_4766,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_4776,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_4776(t11,t7,t2);}
+
+/* loop407 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4776(C_word t0,C_word 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_4776,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));
+/* loop407420 */
+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));
+/* loop407420 */
+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);}}
+
+/* k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4766,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4770,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);}
+
+/* k4768 in k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4770(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_4770,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_4695,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_4699,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_4701,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_4701(t19,t15,((C_word*)t0)[2]);}
+
+/* loop431 in k4768 in k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4701(C_word t0,C_word 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_4701,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_4730,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);}}
+
+/* k4728 in loop431 in k4768 in k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4730(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4730,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_4701(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_4701(t6,((C_word*)t0)[3],t5);}}
+
+/* k4697 in k4768 in k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4699(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);}
+
+/* k4693 in k4768 in k4764 in k4671 in k4659 in k4650 in k4644 in loop in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4695(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_4695,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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4578(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_4578,NULL,5,t0,t1,t2,t3,t4);}
+t5=C_retrieve(lf[9]);
+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_4604,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_4376(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 */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),t1,lf[46],t3);}}
+
+/* k4602 in expand in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4604(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 k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4376(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_4376,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=C_retrieve(lf[9]);
+t8=C_retrieve(lf[9]);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4386,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t10=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4391,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[45]+1)))(3,*((C_word*)lf[45]+1),t9,t10);}
+
+/* a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4391(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_4391,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4397,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_4504,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[44]))(4,*((C_word*)lf[44]+1),t1,t3,t4);}
+
+/* a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4504(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_4504,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_4510,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_4566,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);}
+
+/* a4565 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4566(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_4566r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_4566r(t0,t1,t2);}}
+
+static void C_ccall f_4566r(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_4572,a[2]=t2,a[3]=((C_word)li23),tmp=(C_word)a,a+=4,tmp);
+/* k316321 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a4571 in a4565 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4572(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_4572,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4510(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_4510,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4514,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_4541,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_4547,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_4552,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_4558,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)C_retrieve_proc(t3))(5,t3,t2,((C_word*)t0)[6],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* a4557 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4558(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_4558,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[42]));
+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);}
+
+/* a4551 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4552(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_4552,2,t0,t1);}
+/* expand.scm: 207 handler */
+t2=((C_word*)t0)[5];
+((C_proc5)C_retrieve_proc(t2))(5,t2,t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* a4546 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4547(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_4547,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,C_retrieve(lf[42]));
+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_4541 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4541(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_4541,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+
+/* k4512 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4514(C_word c,C_word t0,C_word t1){
+C_word 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_4514,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4517,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_4530,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_4534,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 212 symbol->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[41]+1)))(3,*((C_word*)lf[41]+1),t6,((C_word*)t0)[2]);}
+else{
+t5=C_retrieve(lf[9]);
+t6=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}}
+
+/* k4532 in k4512 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4534(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 211 string-append */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[33]+1)))(5,*((C_word*)lf[33]+1),((C_word*)t0)[2],lf[39],t1,lf[40]);}
+
+/* k4528 in k4512 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4530(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 */
+((C_proc4)C_retrieve_symbol_proc(lf[38]))(4,*((C_word*)lf[38]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k4515 in k4512 in a4509 in a4503 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4517(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+t2=C_retrieve(lf[9]);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+
+/* a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4397(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_4397,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4403,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li16),tmp=(C_word)a,a+=5,tmp);
+/* k316321 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4403(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_4403,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4414,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_4414(t4,(C_word)C_i_memq(lf[37],t3));}
+else{
+t3=t2;
+f_4414(t3,C_SCHEME_FALSE);}}
+
+/* k4412 in a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4414(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_4414,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_4425,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_4431,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_4431(t8,t3,t4);}
+else{
+t2=((C_word*)t0)[4];
+/* expand.scm: 180 ##sys#abort */
+((C_proc3)C_retrieve_symbol_proc(lf[31]))(3,*((C_word*)lf[31]+1),((C_word*)t0)[3],t2);}}
+
+/* copy in k4412 in a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4431(C_word t0,C_word 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_4431,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_4450,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_4450(t7,(C_word)C_i_stringp(t6));}
+else{
+t6=t5;
+f_4450(t6,C_SCHEME_FALSE);}}
+else{
+t6=t5;
+f_4450(t6,C_SCHEME_FALSE);}}}
+
+/* k4448 in copy in k4412 in a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4450(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_4450,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4461,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 */
+((C_proc6)C_retrieve_proc(*((C_word*)lf[33]+1)))(6,*((C_word*)lf[33]+1),t2,lf[34],t3,lf[35],t4);}
+else{
+/* expand.scm: 202 copy */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_4431(t2,((C_word*)t0)[4],((C_word*)t0)[5]);}}
+
+/* k4459 in k4448 in copy in k4412 in a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_4461,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));}
+
+/* k4423 in k4412 in a4402 in a4396 in a4390 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4425(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_4425,2,t0,t1);}
+t2=(C_word)C_a_i_record(&a,3,lf[30],((C_word*)t0)[3],t1);
+/* expand.scm: 180 ##sys#abort */
+((C_proc3)C_retrieve_symbol_proc(lf[31]))(3,*((C_word*)lf[31]+1),((C_word*)t0)[2],t2);}
+
+/* k4384 in call-handler in ##sys#expand-0 in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4386(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g319320 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* ##sys#undefine-macro! in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4367(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_4367,3,t0,t1,t2);}
+/* expand.scm: 168 ##sys#unregister-macro */
+((C_proc3)C_retrieve_symbol_proc(lf[26]))(3,*((C_word*)lf[26]+1),t1,t2);}
+
+/* ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4316(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_4316,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_4324,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4328,a[2]=t3,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 162 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t4);}
+
+/* k4326 in ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4328(C_word c,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_4328,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_4330,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_4330(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k4326 in ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_fcall f_4330(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_4330,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_4365,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[27]+1)))(3,*((C_word*)lf[27]+1),t3,t2);}}
+
+/* k4363 in loop in k4326 in ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4365(C_word c,C_word t0,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_4365,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_4357,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_4330(t6,t4,t5);}}
+
+/* k4355 in k4363 in loop in k4326 in ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4357(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_4357,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));}
+
+/* k4322 in ##sys#unregister-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4324(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 160 ##sys#macro-environment */
+((C_proc3)C_retrieve_symbol_proc(lf[20]))(3,*((C_word*)lf[20]+1),((C_word*)t0)[2],t1);}
+
+/* ##sys#macro? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4266(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_4266r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_4266r(t0,t1,t2,t3);}}
+
+static void C_ccall f_4266r(C_word 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_4270,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 */
+((C_proc2)C_retrieve_symbol_proc(lf[3]))(2,*((C_word*)lf[3]+1),t4);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_4270(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);}}}
+
+/* k4268 in ##sys#macro? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4270(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_4270,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4273,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 154 lookup */
+f_3875(t2,((C_word*)t0)[2],t1);}
+
+/* k4271 in k4268 in ##sys#macro? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4273(C_word c,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_4273,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_4282,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4292,a[2]=((C_word*)t0)[2],a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 156 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t4);}}
+
+/* k4290 in k4271 in k4268 in ##sys#macro? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4292(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 156 lookup */
+f_3875(((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k4280 in k4271 in k4268 in ##sys#macro? in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4282(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 k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4253(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_4253,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4257,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_4264,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 150 ##sys#macro-environment */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t5);}
+
+/* k4262 in ##sys#copy-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4264(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* expand.scm: 150 lookup */
+f_3875(((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k4255 in ##sys#copy-macro in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4257(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_retrieve(lf[23]),((C_word*)t0)[2],t1);}
+
+/* ##sys#extend-macro-environment in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4215(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_4215,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_4219,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 */
+((C_proc2)C_retrieve_symbol_proc(lf[20]))(2,*((C_word*)lf[20]+1),t5);}
+
+/* k4217 in ##sys#extend-macro-environment in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4219(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_4219,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4222,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_3875(t2,((C_word*)t0)[2],t1);}
+
+/* k4220 in k4217 in ##sys#extend-macro-environment in k4209 in k3871 in k3867 in k3839 */
+static void C_ccall f_4222(C_word c,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_4222,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_4226,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],a[4]=((C_word)li8),tmp=(C_word)a,a+=5,tmp);
+/* g257258 */
+t3=((C_word*)t0)[4];
+((C_proc2)C_retrieve_proc(t3))(2,t3,f_4226(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 */
+((C_proc3)C_retrieve_symbol_proc(lf[20]))(3,*((C_word*)lf[20]+1),((C_word*)t0)[4],t3);}}
+
+/* g257 in k4220 in k4217 in ##sys#extend-macro-environment in k4209 in k3871 in k3867 in k3839 */
+static C_word C_fcall f_4226(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 k3871 in k3867 in k3839 */
+static void C_ccall f_4002(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_4002r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_4002r(t0,t1,t2,t3);}}
+
+static void C_ccall f_4002r(C_word t0,C_word 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_4004,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_4155,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_4160,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-se186238 */
+t7=t6;
+f_4160(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-alias187236 */
+t9=t5;
+f_4155(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))){
+/* body184192 */
+t11=t4;
+f_4004(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-se186 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_fcall f_4160(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_4160,NULL,2,t0,t1);}
+/* def-alias187236 */
+t2=((C_word*)t0)[2];
+f_4155(t2,t1,C_SCHEME_FALSE);}
+
+/* def-alias187 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_fcall f_4155(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_4155,NULL,3,t0,t1,t2);}
+/* body184192 */
+t3=((C_word*)t0)[2];
+f_4004(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_fcall f_4004(C_word t0,C_word 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_4004,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_4010,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_4010(t9,t1,((C_word*)t0)[2]);}
+
+/* walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_fcall f_4010(C_word t0,C_word 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_4010,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_4029,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_3875(t4,t2,((C_word*)t0)[3]);}
+else{
+/* expand.scm: 107 get */
+((C_proc4)C_retrieve_symbol_proc(lf[16]))(4,*((C_word*)lf[16]+1),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_4100,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_4120,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 */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[17]+1)))(3,*((C_word*)lf[17]+1),t5,t4);}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}}}}}
+
+/* k4118 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_ccall f_4120(C_word c,C_word t0,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_4120,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_4129,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_4129(t5,C_fix(0)));}
+
+/* doloop227 in k4118 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static C_word C_fcall f_4129(C_word t0,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;}}
+
+/* k4098 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_ccall f_4100(C_word c,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_4100,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_4092,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_4010(t5,t3,t4);}
+
+/* k4090 in k4098 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_ccall f_4092(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]);}
+
+/* k4027 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_ccall f_4029(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_4029,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_4032,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 */
+((C_proc4)C_retrieve_symbol_proc(lf[16]))(4,*((C_word*)lf[16]+1),t2,((C_word*)t0)[4],lf[11]);}
+
+/* k4030 in k4027 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_ccall f_4032(C_word c,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_4032,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_4041,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_4041(t4,(C_word)C_i_not(t3));}
+else{
+t3=t2;
+f_4041(t3,C_SCHEME_FALSE);}}}
+
+/* k4039 in k4030 in k4027 in walk in body184 in ##sys#strip-syntax in k3871 in k3867 in k3839 */
+static void C_fcall f_4041(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 */
+((C_proc4)C_retrieve_symbol_proc(lf[15]))(4,*((C_word*)lf[15]+1),((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 k3871 in k3867 in k3839 */
+static void C_fcall f_3893(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_3893,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3900,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* expand.scm: 77 ##sys#qualified-symbol? */
+((C_proc3)C_retrieve_symbol_proc(lf[13]))(3,*((C_word*)lf[13]+1),t4,t2);}
+
+/* k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_ccall f_3900(C_word c,C_word t0,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_3900,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3903,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_3903(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_3903(t6,(C_truep(t5)?(C_word)C_eqp(C_make_character(35),(C_word)C_subchar(t3,C_fix(0))):C_SCHEME_FALSE));}}
+
+/* k3901 in k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_fcall f_3903(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_3903,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_3906,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 */
+((C_proc3)C_retrieve_symbol_proc(lf[12]))(3,*((C_word*)lf[12]+1),t2,((C_word*)t0)[4]);}}
+
+/* k3904 in k3901 in k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_ccall f_3906(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_3906,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3909,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_3875(t2,((C_word*)t0)[4],((C_word*)t0)[2]);}
+
+/* k3907 in k3904 in k3901 in k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_ccall f_3909(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_3909,2,t0,t1);}
+t2=(C_truep(t1)?t1:((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3915,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! */
+((C_proc5)C_retrieve_symbol_proc(lf[10]))(5,*((C_word*)lf[10]+1),t3,((C_word*)t0)[3],lf[7],t2);}
+
+/* k3913 in k3907 in k3904 in k3901 in k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_ccall f_3915(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_3915,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3918,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* expand.scm: 86 ##sys#put! */
+((C_proc5)C_retrieve_symbol_proc(lf[10]))(5,*((C_word*)lf[10]+1),t2,((C_word*)t0)[4],lf[11],((C_word*)t0)[2]);}
+
+/* k3916 in k3913 in k3907 in k3904 in k3901 in k3898 in macro-alias in k3871 in k3867 in k3839 */
+static void C_ccall f_3918(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[9]);
+t3=((C_word*)t0)[3];
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* lookup in k3871 in k3867 in k3839 */
+static void C_fcall f_3875(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_3875,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_3888,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* expand.scm: 73 ##sys#get */
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t5,t2,lf[7]);}}
+
+/* k3886 in lookup in k3871 in k3867 in k3839 */
+static void C_ccall f_3888(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[932] = {
+{"toplevel:expand_scm",(void*)C_expand_toplevel},
+{"f_3841:expand_scm",(void*)f_3841},
+{"f_3869:expand_scm",(void*)f_3869},
+{"f_3873:expand_scm",(void*)f_3873},
+{"f_4211:expand_scm",(void*)f_4211},
+{"f_15585:expand_scm",(void*)f_15585},
+{"f_15583:expand_scm",(void*)f_15583},
+{"f_8795:expand_scm",(void*)f_8795},
+{"f_15575:expand_scm",(void*)f_15575},
+{"f_15573:expand_scm",(void*)f_15573},
+{"f_8798:expand_scm",(void*)f_8798},
+{"f_15565:expand_scm",(void*)f_15565},
+{"f_15563:expand_scm",(void*)f_15563},
+{"f_8801:expand_scm",(void*)f_8801},
+{"f_8805:expand_scm",(void*)f_8805},
+{"f_15438:expand_scm",(void*)f_15438},
+{"f_15448:expand_scm",(void*)f_15448},
+{"f_15464:expand_scm",(void*)f_15464},
+{"f_15467:expand_scm",(void*)f_15467},
+{"f_15495:expand_scm",(void*)f_15495},
+{"f_15470:expand_scm",(void*)f_15470},
+{"f_15517:expand_scm",(void*)f_15517},
+{"f_15520:expand_scm",(void*)f_15520},
+{"f_15539:expand_scm",(void*)f_15539},
+{"f_15551:expand_scm",(void*)f_15551},
+{"f_15504:expand_scm",(void*)f_15504},
+{"f_15507:expand_scm",(void*)f_15507},
+{"f_15514:expand_scm",(void*)f_15514},
+{"f_15436:expand_scm",(void*)f_15436},
+{"f_8808:expand_scm",(void*)f_8808},
+{"f_15379:expand_scm",(void*)f_15379},
+{"f_15408:expand_scm",(void*)f_15408},
+{"f_15428:expand_scm",(void*)f_15428},
+{"f_15432:expand_scm",(void*)f_15432},
+{"f_15377:expand_scm",(void*)f_15377},
+{"f_8811:expand_scm",(void*)f_8811},
+{"f_15289:expand_scm",(void*)f_15289},
+{"f_15314:expand_scm",(void*)f_15314},
+{"f_15321:expand_scm",(void*)f_15321},
+{"f_15341:expand_scm",(void*)f_15341},
+{"f_15361:expand_scm",(void*)f_15361},
+{"f_15365:expand_scm",(void*)f_15365},
+{"f_15287:expand_scm",(void*)f_15287},
+{"f_8814:expand_scm",(void*)f_8814},
+{"f_14959:expand_scm",(void*)f_14959},
+{"f_14966:expand_scm",(void*)f_14966},
+{"f_14969:expand_scm",(void*)f_14969},
+{"f_14972:expand_scm",(void*)f_14972},
+{"f_14975:expand_scm",(void*)f_14975},
+{"f_14978:expand_scm",(void*)f_14978},
+{"f_14981:expand_scm",(void*)f_14981},
+{"f_14986:expand_scm",(void*)f_14986},
+{"f_15002:expand_scm",(void*)f_15002},
+{"f_15008:expand_scm",(void*)f_15008},
+{"f_15050:expand_scm",(void*)f_15050},
+{"f_15118:expand_scm",(void*)f_15118},
+{"f_15243:expand_scm",(void*)f_15243},
+{"f_15239:expand_scm",(void*)f_15239},
+{"f_15121:expand_scm",(void*)f_15121},
+{"f_15176:expand_scm",(void*)f_15176},
+{"f_15053:expand_scm",(void*)f_15053},
+{"f_15092:expand_scm",(void*)f_15092},
+{"f_15044:expand_scm",(void*)f_15044},
+{"f_15015:expand_scm",(void*)f_15015},
+{"f_14957:expand_scm",(void*)f_14957},
+{"f_8817:expand_scm",(void*)f_8817},
+{"f_14758:expand_scm",(void*)f_14758},
+{"f_14762:expand_scm",(void*)f_14762},
+{"f_14771:expand_scm",(void*)f_14771},
+{"f_14774:expand_scm",(void*)f_14774},
+{"f_14777:expand_scm",(void*)f_14777},
+{"f_14780:expand_scm",(void*)f_14780},
+{"f_14801:expand_scm",(void*)f_14801},
+{"f_14817:expand_scm",(void*)f_14817},
+{"f_14823:expand_scm",(void*)f_14823},
+{"f_14883:expand_scm",(void*)f_14883},
+{"f_14910:expand_scm",(void*)f_14910},
+{"f_14877:expand_scm",(void*)f_14877},
+{"f_14873:expand_scm",(void*)f_14873},
+{"f_14865:expand_scm",(void*)f_14865},
+{"f_14861:expand_scm",(void*)f_14861},
+{"f_14830:expand_scm",(void*)f_14830},
+{"f_14799:expand_scm",(void*)f_14799},
+{"f_14756:expand_scm",(void*)f_14756},
+{"f_8820:expand_scm",(void*)f_8820},
+{"f_14689:expand_scm",(void*)f_14689},
+{"f_14693:expand_scm",(void*)f_14693},
+{"f_14702:expand_scm",(void*)f_14702},
+{"f_14707:expand_scm",(void*)f_14707},
+{"f_14744:expand_scm",(void*)f_14744},
+{"f_14725:expand_scm",(void*)f_14725},
+{"f_14687:expand_scm",(void*)f_14687},
+{"f_8823:expand_scm",(void*)f_8823},
+{"f_14442:expand_scm",(void*)f_14442},
+{"f_14446:expand_scm",(void*)f_14446},
+{"f_14458:expand_scm",(void*)f_14458},
+{"f_14461:expand_scm",(void*)f_14461},
+{"f_14464:expand_scm",(void*)f_14464},
+{"f_14633:expand_scm",(void*)f_14633},
+{"f_14479:expand_scm",(void*)f_14479},
+{"f_14631:expand_scm",(void*)f_14631},
+{"f_14506:expand_scm",(void*)f_14506},
+{"f_14621:expand_scm",(void*)f_14621},
+{"f_14522:expand_scm",(void*)f_14522},
+{"f_14544:expand_scm",(void*)f_14544},
+{"f_14603:expand_scm",(void*)f_14603},
+{"f_14542:expand_scm",(void*)f_14542},
+{"f_14538:expand_scm",(void*)f_14538},
+{"f_14440:expand_scm",(void*)f_14440},
+{"f_8826:expand_scm",(void*)f_8826},
+{"f_14032:expand_scm",(void*)f_14032},
+{"f_14036:expand_scm",(void*)f_14036},
+{"f_14039:expand_scm",(void*)f_14039},
+{"f_14042:expand_scm",(void*)f_14042},
+{"f_14045:expand_scm",(void*)f_14045},
+{"f_14429:expand_scm",(void*)f_14429},
+{"f_14326:expand_scm",(void*)f_14326},
+{"f_14330:expand_scm",(void*)f_14330},
+{"f_14360:expand_scm",(void*)f_14360},
+{"f_14411:expand_scm",(void*)f_14411},
+{"f_14364:expand_scm",(void*)f_14364},
+{"f_14393:expand_scm",(void*)f_14393},
+{"f_14334:expand_scm",(void*)f_14334},
+{"f_14057:expand_scm",(void*)f_14057},
+{"f_14104:expand_scm",(void*)f_14104},
+{"f_14151:expand_scm",(void*)f_14151},
+{"f_14312:expand_scm",(void*)f_14312},
+{"f_14320:expand_scm",(void*)f_14320},
+{"f_14298:expand_scm",(void*)f_14298},
+{"f_14287:expand_scm",(void*)f_14287},
+{"f_14295:expand_scm",(void*)f_14295},
+{"f_14272:expand_scm",(void*)f_14272},
+{"f_14260:expand_scm",(void*)f_14260},
+{"f_14241:expand_scm",(void*)f_14241},
+{"f_14199:expand_scm",(void*)f_14199},
+{"f_14176:expand_scm",(void*)f_14176},
+{"f_14130:expand_scm",(void*)f_14130},
+{"f_14079:expand_scm",(void*)f_14079},
+{"f_14075:expand_scm",(void*)f_14075},
+{"f_14047:expand_scm",(void*)f_14047},
+{"f_14055:expand_scm",(void*)f_14055},
+{"f_14030:expand_scm",(void*)f_14030},
+{"f_8829:expand_scm",(void*)f_8829},
+{"f_13999:expand_scm",(void*)f_13999},
+{"f_14003:expand_scm",(void*)f_14003},
+{"f_13997:expand_scm",(void*)f_13997},
+{"f_8832:expand_scm",(void*)f_8832},
+{"f_13680:expand_scm",(void*)f_13680},
+{"f_13687:expand_scm",(void*)f_13687},
+{"f_13690:expand_scm",(void*)f_13690},
+{"f_13693:expand_scm",(void*)f_13693},
+{"f_13696:expand_scm",(void*)f_13696},
+{"f_13862:expand_scm",(void*)f_13862},
+{"f_13949:expand_scm",(void*)f_13949},
+{"f_13971:expand_scm",(void*)f_13971},
+{"f_13978:expand_scm",(void*)f_13978},
+{"f_13965:expand_scm",(void*)f_13965},
+{"f_13878:expand_scm",(void*)f_13878},
+{"f_13876:expand_scm",(void*)f_13876},
+{"f_13708:expand_scm",(void*)f_13708},
+{"f_13743:expand_scm",(void*)f_13743},
+{"f_13789:expand_scm",(void*)f_13789},
+{"f_13839:expand_scm",(void*)f_13839},
+{"f_13846:expand_scm",(void*)f_13846},
+{"f_13804:expand_scm",(void*)f_13804},
+{"f_13818:expand_scm",(void*)f_13818},
+{"f_13761:expand_scm",(void*)f_13761},
+{"f_13772:expand_scm",(void*)f_13772},
+{"f_13722:expand_scm",(void*)f_13722},
+{"f_13698:expand_scm",(void*)f_13698},
+{"f_13678:expand_scm",(void*)f_13678},
+{"f_8835:expand_scm",(void*)f_8835},
+{"f_13659:expand_scm",(void*)f_13659},
+{"f_13657:expand_scm",(void*)f_13657},
+{"f_8838:expand_scm",(void*)f_8838},
+{"f_13638:expand_scm",(void*)f_13638},
+{"f_13636:expand_scm",(void*)f_13636},
+{"f_8841:expand_scm",(void*)f_8841},
+{"f_13587:expand_scm",(void*)f_13587},
+{"f_13591:expand_scm",(void*)f_13591},
+{"f_13628:expand_scm",(void*)f_13628},
+{"f_13614:expand_scm",(void*)f_13614},
+{"f_13585:expand_scm",(void*)f_13585},
+{"f_8844:expand_scm",(void*)f_8844},
+{"f_13543:expand_scm",(void*)f_13543},
+{"f_13547:expand_scm",(void*)f_13547},
+{"f_13577:expand_scm",(void*)f_13577},
+{"f_13550:expand_scm",(void*)f_13550},
+{"f_13565:expand_scm",(void*)f_13565},
+{"f_13541:expand_scm",(void*)f_13541},
+{"f_8847:expand_scm",(void*)f_8847},
+{"f_13383:expand_scm",(void*)f_13383},
+{"f_13390:expand_scm",(void*)f_13390},
+{"f_13393:expand_scm",(void*)f_13393},
+{"f_13448:expand_scm",(void*)f_13448},
+{"f_13523:expand_scm",(void*)f_13523},
+{"f_13456:expand_scm",(void*)f_13456},
+{"f_13478:expand_scm",(void*)f_13478},
+{"f_13463:expand_scm",(void*)f_13463},
+{"f_13396:expand_scm",(void*)f_13396},
+{"f_13413:expand_scm",(void*)f_13413},
+{"f_13442:expand_scm",(void*)f_13442},
+{"f_13411:expand_scm",(void*)f_13411},
+{"f_13403:expand_scm",(void*)f_13403},
+{"f_13399:expand_scm",(void*)f_13399},
+{"f_13381:expand_scm",(void*)f_13381},
+{"f_8850:expand_scm",(void*)f_8850},
+{"f_13346:expand_scm",(void*)f_13346},
+{"f_13350:expand_scm",(void*)f_13350},
+{"f_13368:expand_scm",(void*)f_13368},
+{"f_13344:expand_scm",(void*)f_13344},
+{"f_8853:expand_scm",(void*)f_8853},
+{"f_13340:expand_scm",(void*)f_13340},
+{"f_10692:expand_scm",(void*)f_10692},
+{"f_13336:expand_scm",(void*)f_13336},
+{"f_10696:expand_scm",(void*)f_10696},
+{"f_10700:expand_scm",(void*)f_10700},
+{"f_12822:expand_scm",(void*)f_12822},
+{"f_13285:expand_scm",(void*)f_13285},
+{"f_13324:expand_scm",(void*)f_13324},
+{"f_12838:expand_scm",(void*)f_12838},
+{"f_13238:expand_scm",(void*)f_13238},
+{"f_13240:expand_scm",(void*)f_13240},
+{"f_13279:expand_scm",(void*)f_13279},
+{"f_13253:expand_scm",(void*)f_13253},
+{"f_13264:expand_scm",(void*)f_13264},
+{"f_12841:expand_scm",(void*)f_12841},
+{"f_13111:expand_scm",(void*)f_13111},
+{"f_13162:expand_scm",(void*)f_13162},
+{"f_13212:expand_scm",(void*)f_13212},
+{"f_13174:expand_scm",(void*)f_13174},
+{"f_13198:expand_scm",(void*)f_13198},
+{"f_13194:expand_scm",(void*)f_13194},
+{"f_13190:expand_scm",(void*)f_13190},
+{"f_13159:expand_scm",(void*)f_13159},
+{"f_13144:expand_scm",(void*)f_13144},
+{"f_13148:expand_scm",(void*)f_13148},
+{"f_12844:expand_scm",(void*)f_12844},
+{"f_13000:expand_scm",(void*)f_13000},
+{"f_13002:expand_scm",(void*)f_13002},
+{"f_13094:expand_scm",(void*)f_13094},
+{"f_13010:expand_scm",(void*)f_13010},
+{"f_13021:expand_scm",(void*)f_13021},
+{"f_13024:expand_scm",(void*)f_13024},
+{"f_13061:expand_scm",(void*)f_13061},
+{"f_13087:expand_scm",(void*)f_13087},
+{"f_13075:expand_scm",(void*)f_13075},
+{"f_13079:expand_scm",(void*)f_13079},
+{"f_13059:expand_scm",(void*)f_13059},
+{"f_13055:expand_scm",(void*)f_13055},
+{"f_13048:expand_scm",(void*)f_13048},
+{"f_13044:expand_scm",(void*)f_13044},
+{"f_13040:expand_scm",(void*)f_13040},
+{"f_12847:expand_scm",(void*)f_12847},
+{"f_12850:expand_scm",(void*)f_12850},
+{"f_12925:expand_scm",(void*)f_12925},
+{"f_12927:expand_scm",(void*)f_12927},
+{"f_12982:expand_scm",(void*)f_12982},
+{"f_12989:expand_scm",(void*)f_12989},
+{"f_12937:expand_scm",(void*)f_12937},
+{"f_12853:expand_scm",(void*)f_12853},
+{"f_12917:expand_scm",(void*)f_12917},
+{"f_12921:expand_scm",(void*)f_12921},
+{"f_12856:expand_scm",(void*)f_12856},
+{"f_12859:expand_scm",(void*)f_12859},
+{"f_12873:expand_scm",(void*)f_12873},
+{"f_12902:expand_scm",(void*)f_12902},
+{"f_12881:expand_scm",(void*)f_12881},
+{"f_12885:expand_scm",(void*)f_12885},
+{"f_12862:expand_scm",(void*)f_12862},
+{"f_12868:expand_scm",(void*)f_12868},
+{"f_12737:expand_scm",(void*)f_12737},
+{"f_12748:expand_scm",(void*)f_12748},
+{"f_12750:expand_scm",(void*)f_12750},
+{"f_12799:expand_scm",(void*)f_12799},
+{"f_12795:expand_scm",(void*)f_12795},
+{"f_12778:expand_scm",(void*)f_12778},
+{"f_12588:expand_scm",(void*)f_12588},
+{"f_12592:expand_scm",(void*)f_12592},
+{"f_12595:expand_scm",(void*)f_12595},
+{"f_12668:expand_scm",(void*)f_12668},
+{"f_12709:expand_scm",(void*)f_12709},
+{"f_12678:expand_scm",(void*)f_12678},
+{"f_12610:expand_scm",(void*)f_12610},
+{"f_12616:expand_scm",(void*)f_12616},
+{"f_12662:expand_scm",(void*)f_12662},
+{"f_12643:expand_scm",(void*)f_12643},
+{"f_12614:expand_scm",(void*)f_12614},
+{"f_12571:expand_scm",(void*)f_12571},
+{"f_12582:expand_scm",(void*)f_12582},
+{"f_12575:expand_scm",(void*)f_12575},
+{"f_12578:expand_scm",(void*)f_12578},
+{"f_12192:expand_scm",(void*)f_12192},
+{"f_12196:expand_scm",(void*)f_12196},
+{"f_12491:expand_scm",(void*)f_12491},
+{"f_12539:expand_scm",(void*)f_12539},
+{"f_12222:expand_scm",(void*)f_12222},
+{"f_12208:expand_scm",(void*)f_12208},
+{"f_12546:expand_scm",(void*)f_12546},
+{"f_12501:expand_scm",(void*)f_12501},
+{"f_12225:expand_scm",(void*)f_12225},
+{"f_12425:expand_scm",(void*)f_12425},
+{"f_12474:expand_scm",(void*)f_12474},
+{"f_12435:expand_scm",(void*)f_12435},
+{"f_12228:expand_scm",(void*)f_12228},
+{"f_12373:expand_scm",(void*)f_12373},
+{"f_12412:expand_scm",(void*)f_12412},
+{"f_12231:expand_scm",(void*)f_12231},
+{"f_12367:expand_scm",(void*)f_12367},
+{"f_12371:expand_scm",(void*)f_12371},
+{"f_12237:expand_scm",(void*)f_12237},
+{"f_12240:expand_scm",(void*)f_12240},
+{"f_12333:expand_scm",(void*)f_12333},
+{"f_12341:expand_scm",(void*)f_12341},
+{"f_12243:expand_scm",(void*)f_12243},
+{"f_12291:expand_scm",(void*)f_12291},
+{"f_12299:expand_scm",(void*)f_12299},
+{"f_12246:expand_scm",(void*)f_12246},
+{"f_12259:expand_scm",(void*)f_12259},
+{"f_12267:expand_scm",(void*)f_12267},
+{"f_12249:expand_scm",(void*)f_12249},
+{"f_11687:expand_scm",(void*)f_11687},
+{"f_12190:expand_scm",(void*)f_12190},
+{"f_12186:expand_scm",(void*)f_12186},
+{"f_11710:expand_scm",(void*)f_11710},
+{"f_12156:expand_scm",(void*)f_12156},
+{"f_12152:expand_scm",(void*)f_12152},
+{"f_11718:expand_scm",(void*)f_11718},
+{"f_12105:expand_scm",(void*)f_12105},
+{"f_12134:expand_scm",(void*)f_12134},
+{"f_12099:expand_scm",(void*)f_12099},
+{"f_11726:expand_scm",(void*)f_11726},
+{"f_11982:expand_scm",(void*)f_11982},
+{"f_11984:expand_scm",(void*)f_11984},
+{"f_12083:expand_scm",(void*)f_12083},
+{"f_11978:expand_scm",(void*)f_11978},
+{"f_11974:expand_scm",(void*)f_11974},
+{"f_11874:expand_scm",(void*)f_11874},
+{"f_11958:expand_scm",(void*)f_11958},
+{"f_11901:expand_scm",(void*)f_11901},
+{"f_11933:expand_scm",(void*)f_11933},
+{"f_11872:expand_scm",(void*)f_11872},
+{"f_11868:expand_scm",(void*)f_11868},
+{"f_11794:expand_scm",(void*)f_11794},
+{"f_11864:expand_scm",(void*)f_11864},
+{"f_11817:expand_scm",(void*)f_11817},
+{"f_11860:expand_scm",(void*)f_11860},
+{"f_11852:expand_scm",(void*)f_11852},
+{"f_11848:expand_scm",(void*)f_11848},
+{"f_11828:expand_scm",(void*)f_11828},
+{"f_11782:expand_scm",(void*)f_11782},
+{"f_11778:expand_scm",(void*)f_11778},
+{"f_11722:expand_scm",(void*)f_11722},
+{"f_11714:expand_scm",(void*)f_11714},
+{"f_11627:expand_scm",(void*)f_11627},
+{"f_11631:expand_scm",(void*)f_11631},
+{"f_11642:expand_scm",(void*)f_11642},
+{"f_11681:expand_scm",(void*)f_11681},
+{"f_11673:expand_scm",(void*)f_11673},
+{"f_11637:expand_scm",(void*)f_11637},
+{"f_11341:expand_scm",(void*)f_11341},
+{"f_11422:expand_scm",(void*)f_11422},
+{"f_11449:expand_scm",(void*)f_11449},
+{"f_11451:expand_scm",(void*)f_11451},
+{"f_11621:expand_scm",(void*)f_11621},
+{"f_11609:expand_scm",(void*)f_11609},
+{"f_11590:expand_scm",(void*)f_11590},
+{"f_11536:expand_scm",(void*)f_11536},
+{"f_11569:expand_scm",(void*)f_11569},
+{"f_11554:expand_scm",(void*)f_11554},
+{"f_11492:expand_scm",(void*)f_11492},
+{"f_11519:expand_scm",(void*)f_11519},
+{"f_11500:expand_scm",(void*)f_11500},
+{"f_11504:expand_scm",(void*)f_11504},
+{"f_11474:expand_scm",(void*)f_11474},
+{"f_11399:expand_scm",(void*)f_11399},
+{"f_11411:expand_scm",(void*)f_11411},
+{"f_11407:expand_scm",(void*)f_11407},
+{"f_11272:expand_scm",(void*)f_11272},
+{"f_11278:expand_scm",(void*)f_11278},
+{"f_11293:expand_scm",(void*)f_11293},
+{"f_11328:expand_scm",(void*)f_11328},
+{"f_11204:expand_scm",(void*)f_11204},
+{"f_11224:expand_scm",(void*)f_11224},
+{"f_11219:expand_scm",(void*)f_11219},
+{"f_11206:expand_scm",(void*)f_11206},
+{"f_11182:expand_scm",(void*)f_11182},
+{"f_11189:expand_scm",(void*)f_11189},
+{"f_11101:expand_scm",(void*)f_11101},
+{"f_11111:expand_scm",(void*)f_11111},
+{"f_11114:expand_scm",(void*)f_11114},
+{"f_11120:expand_scm",(void*)f_11120},
+{"f_11163:expand_scm",(void*)f_11163},
+{"f_11167:expand_scm",(void*)f_11167},
+{"f_11123:expand_scm",(void*)f_11123},
+{"f_11129:expand_scm",(void*)f_11129},
+{"f_11012:expand_scm",(void*)f_11012},
+{"f_11022:expand_scm",(void*)f_11022},
+{"f_11025:expand_scm",(void*)f_11025},
+{"f_11088:expand_scm",(void*)f_11088},
+{"f_11028:expand_scm",(void*)f_11028},
+{"f_11084:expand_scm",(void*)f_11084},
+{"f_11031:expand_scm",(void*)f_11031},
+{"f_11070:expand_scm",(void*)f_11070},
+{"f_11074:expand_scm",(void*)f_11074},
+{"f_11034:expand_scm",(void*)f_11034},
+{"f_11037:expand_scm",(void*)f_11037},
+{"f_10991:expand_scm",(void*)f_10991},
+{"f_10998:expand_scm",(void*)f_10998},
+{"f_10971:expand_scm",(void*)f_10971},
+{"f_10975:expand_scm",(void*)f_10975},
+{"f_10968:expand_scm",(void*)f_10968},
+{"f_10928:expand_scm",(void*)f_10928},
+{"f_10932:expand_scm",(void*)f_10932},
+{"f_10904:expand_scm",(void*)f_10904},
+{"f_10804:expand_scm",(void*)f_10804},
+{"f_10795:expand_scm",(void*)f_10795},
+{"f_10714:expand_scm",(void*)f_10714},
+{"f_10596:expand_scm",(void*)f_10596},
+{"f_10600:expand_scm",(void*)f_10600},
+{"f_10603:expand_scm",(void*)f_10603},
+{"f_10608:expand_scm",(void*)f_10608},
+{"f_10655:expand_scm",(void*)f_10655},
+{"f_10616:expand_scm",(void*)f_10616},
+{"f_10634:expand_scm",(void*)f_10634},
+{"f_10606:expand_scm",(void*)f_10606},
+{"f_10531:expand_scm",(void*)f_10531},
+{"f_10535:expand_scm",(void*)f_10535},
+{"f_10545:expand_scm",(void*)f_10545},
+{"f_10547:expand_scm",(void*)f_10547},
+{"f_10568:expand_scm",(void*)f_10568},
+{"f_10538:expand_scm",(void*)f_10538},
+{"f_8855:expand_scm",(void*)f_8855},
+{"f_8862:expand_scm",(void*)f_8862},
+{"f_8876:expand_scm",(void*)f_8876},
+{"f_8880:expand_scm",(void*)f_8880},
+{"f_8884:expand_scm",(void*)f_8884},
+{"f_8889:expand_scm",(void*)f_8889},
+{"f_8895:expand_scm",(void*)f_8895},
+{"f_8899:expand_scm",(void*)f_8899},
+{"f_8903:expand_scm",(void*)f_8903},
+{"f_8907:expand_scm",(void*)f_8907},
+{"f_8911:expand_scm",(void*)f_8911},
+{"f_8916:expand_scm",(void*)f_8916},
+{"f_8920:expand_scm",(void*)f_8920},
+{"f_8927:expand_scm",(void*)f_8927},
+{"f_8932:expand_scm",(void*)f_8932},
+{"f_8936:expand_scm",(void*)f_8936},
+{"f_8940:expand_scm",(void*)f_8940},
+{"f_8944:expand_scm",(void*)f_8944},
+{"f_8949:expand_scm",(void*)f_8949},
+{"f_10492:expand_scm",(void*)f_10492},
+{"f_10502:expand_scm",(void*)f_10502},
+{"f_10509:expand_scm",(void*)f_10509},
+{"f_10472:expand_scm",(void*)f_10472},
+{"f_10479:expand_scm",(void*)f_10479},
+{"f_10486:expand_scm",(void*)f_10486},
+{"f_10446:expand_scm",(void*)f_10446},
+{"f_10424:expand_scm",(void*)f_10424},
+{"f_10431:expand_scm",(void*)f_10431},
+{"f_10331:expand_scm",(void*)f_10331},
+{"f_10373:expand_scm",(void*)f_10373},
+{"f_10422:expand_scm",(void*)f_10422},
+{"f_10405:expand_scm",(void*)f_10405},
+{"f_10384:expand_scm",(void*)f_10384},
+{"f_10258:expand_scm",(void*)f_10258},
+{"f_10284:expand_scm",(void*)f_10284},
+{"f_10329:expand_scm",(void*)f_10329},
+{"f_10312:expand_scm",(void*)f_10312},
+{"f_10004:expand_scm",(void*)f_10004},
+{"f_10051:expand_scm",(void*)f_10051},
+{"f_10249:expand_scm",(void*)f_10249},
+{"f_10245:expand_scm",(void*)f_10245},
+{"f_10212:expand_scm",(void*)f_10212},
+{"f_10220:expand_scm",(void*)f_10220},
+{"f_10054:expand_scm",(void*)f_10054},
+{"f_10060:expand_scm",(void*)f_10060},
+{"f_10072:expand_scm",(void*)f_10072},
+{"f_10138:expand_scm",(void*)f_10138},
+{"f_10153:expand_scm",(void*)f_10153},
+{"f_10075:expand_scm",(void*)f_10075},
+{"f_10109:expand_scm",(void*)f_10109},
+{"f_10078:expand_scm",(void*)f_10078},
+{"f_10107:expand_scm",(void*)f_10107},
+{"f_10103:expand_scm",(void*)f_10103},
+{"f_10099:expand_scm",(void*)f_10099},
+{"f_9797:expand_scm",(void*)f_9797},
+{"f_9827:expand_scm",(void*)f_9827},
+{"f_9927:expand_scm",(void*)f_9927},
+{"f_9950:expand_scm",(void*)f_9950},
+{"f_9964:expand_scm",(void*)f_9964},
+{"f_9968:expand_scm",(void*)f_9968},
+{"f_9937:expand_scm",(void*)f_9937},
+{"f_9887:expand_scm",(void*)f_9887},
+{"f_9891:expand_scm",(void*)f_9891},
+{"f_9836:expand_scm",(void*)f_9836},
+{"f_9821:expand_scm",(void*)f_9821},
+{"f_9509:expand_scm",(void*)f_9509},
+{"f_9516:expand_scm",(void*)f_9516},
+{"f_9555:expand_scm",(void*)f_9555},
+{"f_9565:expand_scm",(void*)f_9565},
+{"f_9696:expand_scm",(void*)f_9696},
+{"f_9700:expand_scm",(void*)f_9700},
+{"f_9629:expand_scm",(void*)f_9629},
+{"f_9625:expand_scm",(void*)f_9625},
+{"f_9563:expand_scm",(void*)f_9563},
+{"f_9559:expand_scm",(void*)f_9559},
+{"f_9387:expand_scm",(void*)f_9387},
+{"f_9391:expand_scm",(void*)f_9391},
+{"f_9463:expand_scm",(void*)f_9463},
+{"f_9166:expand_scm",(void*)f_9166},
+{"f_9216:expand_scm",(void*)f_9216},
+{"f_9330:expand_scm",(void*)f_9330},
+{"f_9268:expand_scm",(void*)f_9268},
+{"f_9276:expand_scm",(void*)f_9276},
+{"f_9272:expand_scm",(void*)f_9272},
+{"f_9264:expand_scm",(void*)f_9264},
+{"f_9082:expand_scm",(void*)f_9082},
+{"f_9089:expand_scm",(void*)f_9089},
+{"f_9092:expand_scm",(void*)f_9092},
+{"f_9141:expand_scm",(void*)f_9141},
+{"f_9137:expand_scm",(void*)f_9137},
+{"f_9132:expand_scm",(void*)f_9132},
+{"f_9118:expand_scm",(void*)f_9118},
+{"f_9130:expand_scm",(void*)f_9130},
+{"f_9126:expand_scm",(void*)f_9126},
+{"f_8957:expand_scm",(void*)f_8957},
+{"f_9023:expand_scm",(void*)f_9023},
+{"f_9052:expand_scm",(void*)f_9052},
+{"f_9001:expand_scm",(void*)f_9001},
+{"f_8997:expand_scm",(void*)f_8997},
+{"f_8951:expand_scm",(void*)f_8951},
+{"f_8752:expand_scm",(void*)f_8752},
+{"f_8758:expand_scm",(void*)f_8758},
+{"f_8781:expand_scm",(void*)f_8781},
+{"f_7566:expand_scm",(void*)f_7566},
+{"f_7570:expand_scm",(void*)f_7570},
+{"f_7573:expand_scm",(void*)f_7573},
+{"f_7576:expand_scm",(void*)f_7576},
+{"f_7579:expand_scm",(void*)f_7579},
+{"f_8360:expand_scm",(void*)f_8360},
+{"f_8363:expand_scm",(void*)f_8363},
+{"f_8742:expand_scm",(void*)f_8742},
+{"f_8727:expand_scm",(void*)f_8727},
+{"f_8366:expand_scm",(void*)f_8366},
+{"f_8375:expand_scm",(void*)f_8375},
+{"f_8706:expand_scm",(void*)f_8706},
+{"f_8383:expand_scm",(void*)f_8383},
+{"f_8387:expand_scm",(void*)f_8387},
+{"f_8405:expand_scm",(void*)f_8405},
+{"f_8637:expand_scm",(void*)f_8637},
+{"f_8692:expand_scm",(void*)f_8692},
+{"f_8645:expand_scm",(void*)f_8645},
+{"f_8655:expand_scm",(void*)f_8655},
+{"f_8658:expand_scm",(void*)f_8658},
+{"f_8685:expand_scm",(void*)f_8685},
+{"f_8408:expand_scm",(void*)f_8408},
+{"f_8573:expand_scm",(void*)f_8573},
+{"f_8624:expand_scm",(void*)f_8624},
+{"f_8581:expand_scm",(void*)f_8581},
+{"f_8621:expand_scm",(void*)f_8621},
+{"f_8411:expand_scm",(void*)f_8411},
+{"f_8439:expand_scm",(void*)f_8439},
+{"f_8535:expand_scm",(void*)f_8535},
+{"f_8564:expand_scm",(void*)f_8564},
+{"f_8494:expand_scm",(void*)f_8494},
+{"f_8500:expand_scm",(void*)f_8500},
+{"f_8529:expand_scm",(void*)f_8529},
+{"f_8498:expand_scm",(void*)f_8498},
+{"f_8486:expand_scm",(void*)f_8486},
+{"f_8442:expand_scm",(void*)f_8442},
+{"f_8458:expand_scm",(void*)f_8458},
+{"f_8445:expand_scm",(void*)f_8445},
+{"f_8414:expand_scm",(void*)f_8414},
+{"f_8436:expand_scm",(void*)f_8436},
+{"f_8432:expand_scm",(void*)f_8432},
+{"f_8417:expand_scm",(void*)f_8417},
+{"f_8428:expand_scm",(void*)f_8428},
+{"f_8424:expand_scm",(void*)f_8424},
+{"f_8369:expand_scm",(void*)f_8369},
+{"f_7720:expand_scm",(void*)f_7720},
+{"f_7739:expand_scm",(void*)f_7739},
+{"f_7748:expand_scm",(void*)f_7748},
+{"f_7760:expand_scm",(void*)f_7760},
+{"f_7885:expand_scm",(void*)f_7885},
+{"f_8027:expand_scm",(void*)f_8027},
+{"f_8206:expand_scm",(void*)f_8206},
+{"f_8209:expand_scm",(void*)f_8209},
+{"f_8212:expand_scm",(void*)f_8212},
+{"f_8286:expand_scm",(void*)f_8286},
+{"f_8315:expand_scm",(void*)f_8315},
+{"f_8245:expand_scm",(void*)f_8245},
+{"f_8251:expand_scm",(void*)f_8251},
+{"f_8280:expand_scm",(void*)f_8280},
+{"f_8249:expand_scm",(void*)f_8249},
+{"f_8214:expand_scm",(void*)f_8214},
+{"f_8234:expand_scm",(void*)f_8234},
+{"f_8230:expand_scm",(void*)f_8230},
+{"f_8222:expand_scm",(void*)f_8222},
+{"f_8030:expand_scm",(void*)f_8030},
+{"f_8039:expand_scm",(void*)f_8039},
+{"f_8200:expand_scm",(void*)f_8200},
+{"f_8150:expand_scm",(void*)f_8150},
+{"f_8178:expand_scm",(void*)f_8178},
+{"f_8166:expand_scm",(void*)f_8166},
+{"f_8143:expand_scm",(void*)f_8143},
+{"f_8093:expand_scm",(void*)f_8093},
+{"f_8121:expand_scm",(void*)f_8121},
+{"f_8109:expand_scm",(void*)f_8109},
+{"f_8060:expand_scm",(void*)f_8060},
+{"f_8075:expand_scm",(void*)f_8075},
+{"f_8055:expand_scm",(void*)f_8055},
+{"f_7888:expand_scm",(void*)f_7888},
+{"f_7988:expand_scm",(void*)f_7988},
+{"f_8017:expand_scm",(void*)f_8017},
+{"f_7891:expand_scm",(void*)f_7891},
+{"f_7896:expand_scm",(void*)f_7896},
+{"f_7982:expand_scm",(void*)f_7982},
+{"f_7908:expand_scm",(void*)f_7908},
+{"f_7950:expand_scm",(void*)f_7950},
+{"f_7763:expand_scm",(void*)f_7763},
+{"f_7846:expand_scm",(void*)f_7846},
+{"f_7875:expand_scm",(void*)f_7875},
+{"f_7766:expand_scm",(void*)f_7766},
+{"f_7771:expand_scm",(void*)f_7771},
+{"f_7810:expand_scm",(void*)f_7810},
+{"f_7788:expand_scm",(void*)f_7788},
+{"f_7633:expand_scm",(void*)f_7633},
+{"f_7637:expand_scm",(void*)f_7637},
+{"f_7640:expand_scm",(void*)f_7640},
+{"f_7718:expand_scm",(void*)f_7718},
+{"f_7714:expand_scm",(void*)f_7714},
+{"f_7655:expand_scm",(void*)f_7655},
+{"f_7661:expand_scm",(void*)f_7661},
+{"f_7664:expand_scm",(void*)f_7664},
+{"f_7703:expand_scm",(void*)f_7703},
+{"f_7697:expand_scm",(void*)f_7697},
+{"f_7701:expand_scm",(void*)f_7701},
+{"f_7665:expand_scm",(void*)f_7665},
+{"f_7669:expand_scm",(void*)f_7669},
+{"f_7672:expand_scm",(void*)f_7672},
+{"f_7676:expand_scm",(void*)f_7676},
+{"f_7679:expand_scm",(void*)f_7679},
+{"f_7683:expand_scm",(void*)f_7683},
+{"f_7686:expand_scm",(void*)f_7686},
+{"f_7690:expand_scm",(void*)f_7690},
+{"f_7693:expand_scm",(void*)f_7693},
+{"f_7643:expand_scm",(void*)f_7643},
+{"f_7590:expand_scm",(void*)f_7590},
+{"f_7603:expand_scm",(void*)f_7603},
+{"f_7610:expand_scm",(void*)f_7610},
+{"f_7581:expand_scm",(void*)f_7581},
+{"f_7585:expand_scm",(void*)f_7585},
+{"f_7354:expand_scm",(void*)f_7354},
+{"f_7356:expand_scm",(void*)f_7356},
+{"f_7427:expand_scm",(void*)f_7427},
+{"f_7440:expand_scm",(void*)f_7440},
+{"f17986:expand_scm",(void*)f17986},
+{"f_7443:expand_scm",(void*)f_7443},
+{"f_7446:expand_scm",(void*)f_7446},
+{"f17979:expand_scm",(void*)f17979},
+{"f_7449:expand_scm",(void*)f_7449},
+{"f_7528:expand_scm",(void*)f_7528},
+{"f_7513:expand_scm",(void*)f_7513},
+{"f_7500:expand_scm",(void*)f_7500},
+{"f_7485:expand_scm",(void*)f_7485},
+{"f_7468:expand_scm",(void*)f_7468},
+{"f_7475:expand_scm",(void*)f_7475},
+{"f_7359:expand_scm",(void*)f_7359},
+{"f_7380:expand_scm",(void*)f_7380},
+{"f_7414:expand_scm",(void*)f_7414},
+{"f_7384:expand_scm",(void*)f_7384},
+{"f_7397:expand_scm",(void*)f_7397},
+{"f_7351:expand_scm",(void*)f_7351},
+{"f_6879:expand_scm",(void*)f_6879},
+{"f_7303:expand_scm",(void*)f_7303},
+{"f_7294:expand_scm",(void*)f_7294},
+{"f_7302:expand_scm",(void*)f_7302},
+{"f_6881:expand_scm",(void*)f_6881},
+{"f_7022:expand_scm",(void*)f_7022},
+{"f_7027:expand_scm",(void*)f_7027},
+{"f_7265:expand_scm",(void*)f_7265},
+{"f_7224:expand_scm",(void*)f_7224},
+{"f_7228:expand_scm",(void*)f_7228},
+{"f_7046:expand_scm",(void*)f_7046},
+{"f_7051:expand_scm",(void*)f_7051},
+{"f_7070:expand_scm",(void*)f_7070},
+{"f_6993:expand_scm",(void*)f_6993},
+{"f_6999:expand_scm",(void*)f_6999},
+{"f_6927:expand_scm",(void*)f_6927},
+{"f_6931:expand_scm",(void*)f_6931},
+{"f_6939:expand_scm",(void*)f_6939},
+{"f_6991:expand_scm",(void*)f_6991},
+{"f_6959:expand_scm",(void*)f_6959},
+{"f_6896:expand_scm",(void*)f_6896},
+{"f_6900:expand_scm",(void*)f_6900},
+{"f_6925:expand_scm",(void*)f_6925},
+{"f_6914:expand_scm",(void*)f_6914},
+{"f_6918:expand_scm",(void*)f_6918},
+{"f_6907:expand_scm",(void*)f_6907},
+{"f_6884:expand_scm",(void*)f_6884},
+{"f_6891:expand_scm",(void*)f_6891},
+{"f_6838:expand_scm",(void*)f_6838},
+{"f_6860:expand_scm",(void*)f_6860},
+{"f_6864:expand_scm",(void*)f_6864},
+{"f_6832:expand_scm",(void*)f_6832},
+{"f_6821:expand_scm",(void*)f_6821},
+{"f_6829:expand_scm",(void*)f_6829},
+{"f_6751:expand_scm",(void*)f_6751},
+{"f_6814:expand_scm",(void*)f_6814},
+{"f_6754:expand_scm",(void*)f_6754},
+{"f_6807:expand_scm",(void*)f_6807},
+{"f_6780:expand_scm",(void*)f_6780},
+{"f_6663:expand_scm",(void*)f_6663},
+{"f_6749:expand_scm",(void*)f_6749},
+{"f_6666:expand_scm",(void*)f_6666},
+{"f_6680:expand_scm",(void*)f_6680},
+{"f_6720:expand_scm",(void*)f_6720},
+{"f_5824:expand_scm",(void*)f_5824},
+{"f_6611:expand_scm",(void*)f_6611},
+{"f_6619:expand_scm",(void*)f_6619},
+{"f_6606:expand_scm",(void*)f_6606},
+{"f_5826:expand_scm",(void*)f_5826},
+{"f_6319:expand_scm",(void*)f_6319},
+{"f_6325:expand_scm",(void*)f_6325},
+{"f_6589:expand_scm",(void*)f_6589},
+{"f_6347:expand_scm",(void*)f_6347},
+{"f_6557:expand_scm",(void*)f_6557},
+{"f_6531:expand_scm",(void*)f_6531},
+{"f_6538:expand_scm",(void*)f_6538},
+{"f_6503:expand_scm",(void*)f_6503},
+{"f_6491:expand_scm",(void*)f_6491},
+{"f_6365:expand_scm",(void*)f_6365},
+{"f_6370:expand_scm",(void*)f_6370},
+{"f_6383:expand_scm",(void*)f_6383},
+{"f_6439:expand_scm",(void*)f_6439},
+{"f_6466:expand_scm",(void*)f_6466},
+{"f_6417:expand_scm",(void*)f_6417},
+{"f_6428:expand_scm",(void*)f_6428},
+{"f_6432:expand_scm",(void*)f_6432},
+{"f_6142:expand_scm",(void*)f_6142},
+{"f_6152:expand_scm",(void*)f_6152},
+{"f_6301:expand_scm",(void*)f_6301},
+{"f_6297:expand_scm",(void*)f_6297},
+{"f_6287:expand_scm",(void*)f_6287},
+{"f_6290:expand_scm",(void*)f_6290},
+{"f_6198:expand_scm",(void*)f_6198},
+{"f_6230:expand_scm",(void*)f_6230},
+{"f_6242:expand_scm",(void*)f_6242},
+{"f_6250:expand_scm",(void*)f_6250},
+{"f_6254:expand_scm",(void*)f_6254},
+{"f_6167:expand_scm",(void*)f_6167},
+{"f_6183:expand_scm",(void*)f_6183},
+{"f_6175:expand_scm",(void*)f_6175},
+{"f_6179:expand_scm",(void*)f_6179},
+{"f_6150:expand_scm",(void*)f_6150},
+{"f_5829:expand_scm",(void*)f_5829},
+{"f_5932:expand_scm",(void*)f_5932},
+{"f_6090:expand_scm",(void*)f_6090},
+{"f_6092:expand_scm",(void*)f_6092},
+{"f_5946:expand_scm",(void*)f_5946},
+{"f_6086:expand_scm",(void*)f_6086},
+{"f_6070:expand_scm",(void*)f_6070},
+{"f_5954:expand_scm",(void*)f_5954},
+{"f_6064:expand_scm",(void*)f_6064},
+{"f_6068:expand_scm",(void*)f_6068},
+{"f_5968:expand_scm",(void*)f_5968},
+{"f_6027:expand_scm",(void*)f_6027},
+{"f_6056:expand_scm",(void*)f_6056},
+{"f_5972:expand_scm",(void*)f_5972},
+{"f_6005:expand_scm",(void*)f_6005},
+{"f_6003:expand_scm",(void*)f_6003},
+{"f_5999:expand_scm",(void*)f_5999},
+{"f_5962:expand_scm",(void*)f_5962},
+{"f_5966:expand_scm",(void*)f_5966},
+{"f_5958:expand_scm",(void*)f_5958},
+{"f_5950:expand_scm",(void*)f_5950},
+{"f_5841:expand_scm",(void*)f_5841},
+{"f_5922:expand_scm",(void*)f_5922},
+{"f_5905:expand_scm",(void*)f_5905},
+{"f_5915:expand_scm",(void*)f_5915},
+{"f_5860:expand_scm",(void*)f_5860},
+{"f_5871:expand_scm",(void*)f_5871},
+{"f_5879:expand_scm",(void*)f_5879},
+{"f_5867:expand_scm",(void*)f_5867},
+{"f_5196:expand_scm",(void*)f_5196},
+{"f_5216:expand_scm",(void*)f_5216},
+{"f_5219:expand_scm",(void*)f_5219},
+{"f_5222:expand_scm",(void*)f_5222},
+{"f_5225:expand_scm",(void*)f_5225},
+{"f_5228:expand_scm",(void*)f_5228},
+{"f_5233:expand_scm",(void*)f_5233},
+{"f_5575:expand_scm",(void*)f_5575},
+{"f_5751:expand_scm",(void*)f_5751},
+{"f_5689:expand_scm",(void*)f_5689},
+{"f_5670:expand_scm",(void*)f_5670},
+{"f_5624:expand_scm",(void*)f_5624},
+{"f_5627:expand_scm",(void*)f_5627},
+{"f_5606:expand_scm",(void*)f_5606},
+{"f_5590:expand_scm",(void*)f_5590},
+{"f_5534:expand_scm",(void*)f_5534},
+{"f_5247:expand_scm",(void*)f_5247},
+{"f_5422:expand_scm",(void*)f_5422},
+{"f_5424:expand_scm",(void*)f_5424},
+{"f_5523:expand_scm",(void*)f_5523},
+{"f_5451:expand_scm",(void*)f_5451},
+{"f_5520:expand_scm",(void*)f_5520},
+{"f_5504:expand_scm",(void*)f_5504},
+{"f_5482:expand_scm",(void*)f_5482},
+{"f_5414:expand_scm",(void*)f_5414},
+{"f_5418:expand_scm",(void*)f_5418},
+{"f_5251:expand_scm",(void*)f_5251},
+{"f_5263:expand_scm",(void*)f_5263},
+{"f_5366:expand_scm",(void*)f_5366},
+{"f_5358:expand_scm",(void*)f_5358},
+{"f_5362:expand_scm",(void*)f_5362},
+{"f_5335:expand_scm",(void*)f_5335},
+{"f_5339:expand_scm",(void*)f_5339},
+{"f_5290:expand_scm",(void*)f_5290},
+{"f_5310:expand_scm",(void*)f_5310},
+{"f_5282:expand_scm",(void*)f_5282},
+{"f_5199:expand_scm",(void*)f_5199},
+{"f_5153:expand_scm",(void*)f_5153},
+{"f_5159:expand_scm",(void*)f_5159},
+{"f_5067:expand_scm",(void*)f_5067},
+{"f_5100:expand_scm",(void*)f_5100},
+{"f_5108:expand_scm",(void*)f_5108},
+{"f_5095:expand_scm",(void*)f_5095},
+{"f_5069:expand_scm",(void*)f_5069},
+{"f_5075:expand_scm",(void*)f_5075},
+{"f_5087:expand_scm",(void*)f_5087},
+{"f_5081:expand_scm",(void*)f_5081},
+{"f_4966:expand_scm",(void*)f_4966},
+{"f_5003:expand_scm",(void*)f_5003},
+{"f_5006:expand_scm",(void*)f_5006},
+{"f_5023:expand_scm",(void*)f_5023},
+{"f_5065:expand_scm",(void*)f_5065},
+{"f_5033:expand_scm",(void*)f_5033},
+{"f_5052:expand_scm",(void*)f_5052},
+{"f_4969:expand_scm",(void*)f_4969},
+{"f_4973:expand_scm",(void*)f_4973},
+{"f_4977:expand_scm",(void*)f_4977},
+{"f_4984:expand_scm",(void*)f_4984},
+{"f_4948:expand_scm",(void*)f_4948},
+{"f_4956:expand_scm",(void*)f_4956},
+{"f_4373:expand_scm",(void*)f_4373},
+{"f_4624:expand_scm",(void*)f_4624},
+{"f_4646:expand_scm",(void*)f_4646},
+{"f_4938:expand_scm",(void*)f_4938},
+{"f_4931:expand_scm",(void*)f_4931},
+{"f_4652:expand_scm",(void*)f_4652},
+{"f_4823:expand_scm",(void*)f_4823},
+{"f_4859:expand_scm",(void*)f_4859},
+{"f_4863:expand_scm",(void*)f_4863},
+{"f_4867:expand_scm",(void*)f_4867},
+{"f_4879:expand_scm",(void*)f_4879},
+{"f_4829:expand_scm",(void*)f_4829},
+{"f_4836:expand_scm",(void*)f_4836},
+{"f_4661:expand_scm",(void*)f_4661},
+{"f_4673:expand_scm",(void*)f_4673},
+{"f_4776:expand_scm",(void*)f_4776},
+{"f_4766:expand_scm",(void*)f_4766},
+{"f_4770:expand_scm",(void*)f_4770},
+{"f_4701:expand_scm",(void*)f_4701},
+{"f_4730:expand_scm",(void*)f_4730},
+{"f_4699:expand_scm",(void*)f_4699},
+{"f_4695:expand_scm",(void*)f_4695},
+{"f_4578:expand_scm",(void*)f_4578},
+{"f_4604:expand_scm",(void*)f_4604},
+{"f_4376:expand_scm",(void*)f_4376},
+{"f_4391:expand_scm",(void*)f_4391},
+{"f_4504:expand_scm",(void*)f_4504},
+{"f_4566:expand_scm",(void*)f_4566},
+{"f_4572:expand_scm",(void*)f_4572},
+{"f_4510:expand_scm",(void*)f_4510},
+{"f_4558:expand_scm",(void*)f_4558},
+{"f_4552:expand_scm",(void*)f_4552},
+{"f_4547:expand_scm",(void*)f_4547},
+{"f_4541:expand_scm",(void*)f_4541},
+{"f_4514:expand_scm",(void*)f_4514},
+{"f_4534:expand_scm",(void*)f_4534},
+{"f_4530:expand_scm",(void*)f_4530},
+{"f_4517:expand_scm",(void*)f_4517},
+{"f_4397:expand_scm",(void*)f_4397},
+{"f_4403:expand_scm",(void*)f_4403},
+{"f_4414:expand_scm",(void*)f_4414},
+{"f_4431:expand_scm",(void*)f_4431},
+{"f_4450:expand_scm",(void*)f_4450},
+{"f_4461:expand_scm",(void*)f_4461},
+{"f_4425:expand_scm",(void*)f_4425},
+{"f_4386:expand_scm",(void*)f_4386},
+{"f_4367:expand_scm",(void*)f_4367},
+{"f_4316:expand_scm",(void*)f_4316},
+{"f_4328:expand_scm",(void*)f_4328},
+{"f_4330:expand_scm",(void*)f_4330},
+{"f_4365:expand_scm",(void*)f_4365},
+{"f_4357:expand_scm",(void*)f_4357},
+{"f_4324:expand_scm",(void*)f_4324},
+{"f_4266:expand_scm",(void*)f_4266},
+{"f_4270:expand_scm",(void*)f_4270},
+{"f_4273:expand_scm",(void*)f_4273},
+{"f_4292:expand_scm",(void*)f_4292},
+{"f_4282:expand_scm",(void*)f_4282},
+{"f_4253:expand_scm",(void*)f_4253},
+{"f_4264:expand_scm",(void*)f_4264},
+{"f_4257:expand_scm",(void*)f_4257},
+{"f_4215:expand_scm",(void*)f_4215},
+{"f_4219:expand_scm",(void*)f_4219},
+{"f_4222:expand_scm",(void*)f_4222},
+{"f_4226:expand_scm",(void*)f_4226},
+{"f_4002:expand_scm",(void*)f_4002},
+{"f_4160:expand_scm",(void*)f_4160},
+{"f_4155:expand_scm",(void*)f_4155},
+{"f_4004:expand_scm",(void*)f_4004},
+{"f_4010:expand_scm",(void*)f_4010},
+{"f_4120:expand_scm",(void*)f_4120},
+{"f_4129:expand_scm",(void*)f_4129},
+{"f_4100:expand_scm",(void*)f_4100},
+{"f_4092:expand_scm",(void*)f_4092},
+{"f_4029:expand_scm",(void*)f_4029},
+{"f_4032:expand_scm",(void*)f_4032},
+{"f_4041:expand_scm",(void*)f_4041},
+{"f_3893:expand_scm",(void*)f_3893},
+{"f_3900:expand_scm",(void*)f_3900},
+{"f_3903:expand_scm",(void*)f_3903},
+{"f_3906:expand_scm",(void*)f_3906},
+{"f_3909:expand_scm",(void*)f_3909},
+{"f_3915:expand_scm",(void*)f_3915},
+{"f_3918:expand_scm",(void*)f_3918},
+{"f_3875:expand_scm",(void*)f_3875},
+{"f_3888:expand_scm",(void*)f_3888},
+{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
new file mode 100644
index 00000000..88ffef1c
--- /dev/null
+++ b/bootstrap/extras.c
@@ -0,0 +1,6213 @@
+/* Generated from extras.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: extras.scm -optimize-level 2 -include-path . -include-path ./ -inline -feature debugbuild -scrutinize -types ./types.db -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
new file mode 100644
index 00000000..26efd214
--- /dev/null
+++ b/bootstrap/files.c
@@ -0,0 +1,5341 @@
+/* Generated from files.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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,55,41,0,0};
+static C_char C_TLS li2[] C_aligned={C_lihdr(0,0,18),40,97,57,55,49,32,101,120,118,97,114,49,51,54,49,52,57,41,0,0,0,0,0,0};
+static C_char C_TLS li3[] C_aligned={C_lihdr(0,0,7),40,97,49,48,49,50,41,0};
+static C_char C_TLS li4[] C_aligned={C_lihdr(0,0,7),40,97,49,48,50,52,41,0};
+static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,20),40,97,49,48,49,56,32,46,32,97,114,103,115,49,52,52,49,54,50,41,0,0,0,0};
+static C_char C_TLS li6[] C_aligned={C_lihdr(0,0,7),40,97,49,48,48,54,41,0};
+static C_char C_TLS li7[] C_aligned={C_lihdr(0,0,14),40,97,57,54,53,32,107,49,52,51,49,52,56,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,50,32,108,49,51,51,41};
+static C_char C_TLS li9[] C_aligned={C_lihdr(0,0,7),40,97,49,48,52,50,41,0};
+static C_char C_TLS li10[] C_aligned={C_lihdr(0,0,19),40,97,49,48,51,54,32,101,120,118,97,114,49,48,53,49,49,56,41,0,0,0,0,0};
+static C_char C_TLS li11[] C_aligned={C_lihdr(0,0,7),40,97,49,48,54,55,41,0};
+static C_char C_TLS li12[] C_aligned={C_lihdr(0,0,7),40,97,49,48,55,57,41,0};
+static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,20),40,97,49,48,55,51,32,46,32,97,114,103,115,49,49,51,49,50,57,41,0,0,0,0};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,7),40,97,49,48,54,49,41,0};
+static C_char C_TLS li15[] C_aligned={C_lihdr(0,0,15),40,97,49,48,51,48,32,107,49,49,50,49,49,55,41,0};
+static C_char C_TLS li16[] C_aligned={C_lihdr(0,0,7),40,97,49,48,57,55,41,0};
+static C_char C_TLS li17[] C_aligned={C_lihdr(0,0,17),40,97,49,48,57,49,32,101,120,118,97,114,55,57,57,50,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,50,50,41,0};
+static C_char C_TLS li19[] C_aligned={C_lihdr(0,0,7),40,97,49,49,51,52,41,0};
+static C_char C_TLS li20[] C_aligned={C_lihdr(0,0,19),40,97,49,49,50,56,32,46,32,97,114,103,115,56,55,49,48,51,41,0,0,0,0,0};
+static C_char C_TLS li21[] C_aligned={C_lihdr(0,0,7),40,97,49,49,49,54,41,0};
+static C_char C_TLS li22[] C_aligned={C_lihdr(0,0,13),40,97,49,48,56,53,32,107,56,54,57,49,41,0,0,0};
+static C_char C_TLS li23[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,52,55,32,99,108,111,98,98,101,114,53,54,32,98,108,111,99,107,115,105,122,101,53,55,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,53,48,32,37,99,108,111,98,98,101,114,52,53,49,55,50,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,57,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,57,32,110,101,119,102,105,108,101,52,48,32,46,32,116,109,112,51,56,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li27[] C_aligned={C_lihdr(0,0,7),40,97,49,51,49,51,41,0};
+static C_char C_TLS li28[] C_aligned={C_lihdr(0,0,19),40,97,49,51,48,55,32,101,120,118,97,114,50,56,49,50,57,52,41,0,0,0,0,0};
+static C_char C_TLS li29[] C_aligned={C_lihdr(0,0,7),40,97,49,51,51,56,41,0};
+static C_char C_TLS li30[] C_aligned={C_lihdr(0,0,7),40,97,49,51,53,48,41,0};
+static C_char C_TLS li31[] C_aligned={C_lihdr(0,0,20),40,97,49,51,52,52,32,46,32,97,114,103,115,50,56,57,51,48,53,41,0,0,0,0};
+static C_char C_TLS li32[] C_aligned={C_lihdr(0,0,7),40,97,49,51,51,50,41,0};
+static C_char C_TLS li33[] C_aligned={C_lihdr(0,0,15),40,97,49,51,48,49,32,107,50,56,56,50,57,51,41,0};
+static C_char C_TLS li34[] C_aligned={C_lihdr(0,0,7),40,97,49,51,56,53,41,0};
+static C_char C_TLS li35[] C_aligned={C_lihdr(0,0,19),40,97,49,51,55,57,32,101,120,118,97,114,51,48,57,51,50,50,41,0,0,0,0,0};
+static C_char C_TLS li36[] C_aligned={C_lihdr(0,0,7),40,97,49,52,50,48,41,0};
+static C_char C_TLS li37[] C_aligned={C_lihdr(0,0,7),40,97,49,52,51,50,41,0};
+static C_char C_TLS li38[] C_aligned={C_lihdr(0,0,20),40,97,49,52,50,54,32,46,32,97,114,103,115,51,49,55,51,51,53,41,0,0,0,0};
+static C_char C_TLS li39[] C_aligned={C_lihdr(0,0,7),40,97,49,52,49,52,41,0};
+static C_char C_TLS li40[] C_aligned={C_lihdr(0,0,15),40,97,49,51,55,51,32,107,51,49,54,51,50,49,41,0};
+static C_char C_TLS li41[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,100,50,55,57,32,108,50,56,48,41};
+static C_char C_TLS li42[] C_aligned={C_lihdr(0,0,7),40,97,49,52,53,48,41,0};
+static C_char C_TLS li43[] C_aligned={C_lihdr(0,0,19),40,97,49,52,52,52,32,101,120,118,97,114,50,53,50,50,54,53,41,0,0,0,0,0};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,7),40,97,49,52,55,53,41,0};
+static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,7),40,97,49,52,56,55,41,0};
+static C_char C_TLS li46[] C_aligned={C_lihdr(0,0,20),40,97,49,52,56,49,32,46,32,97,114,103,115,50,54,48,50,55,54,41,0,0,0,0};
+static C_char C_TLS li47[] C_aligned={C_lihdr(0,0,7),40,97,49,52,54,57,41,0};
+static C_char C_TLS li48[] C_aligned={C_lihdr(0,0,15),40,97,49,52,51,56,32,107,50,53,57,50,54,52,41,0};
+static C_char C_TLS li49[] C_aligned={C_lihdr(0,0,7),40,97,49,53,48,53,41,0};
+static C_char C_TLS li50[] C_aligned={C_lihdr(0,0,19),40,97,49,52,57,57,32,101,120,118,97,114,50,50,54,50,51,57,41,0,0,0,0,0};
+static C_char C_TLS li51[] C_aligned={C_lihdr(0,0,7),40,97,49,53,51,48,41,0};
+static C_char C_TLS li52[] C_aligned={C_lihdr(0,0,7),40,97,49,53,52,50,41,0};
+static C_char C_TLS li53[] C_aligned={C_lihdr(0,0,20),40,97,49,53,51,54,32,46,32,97,114,103,115,50,51,52,50,53,48,41,0,0,0,0};
+static C_char C_TLS li54[] C_aligned={C_lihdr(0,0,7),40,97,49,53,50,52,41,0};
+static C_char C_TLS li55[] C_aligned={C_lihdr(0,0,15),40,97,49,52,57,51,32,107,50,51,51,50,51,56,41,0};
+static C_char C_TLS li56[] C_aligned={C_lihdr(0,0,33),40,98,111,100,121,49,57,52,32,99,108,111,98,98,101,114,50,48,51,32,98,108,111,99,107,115,105,122,101,50,48,52,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,55,32,37,99,108,111,98,98,101,114,49,57,50,51,52,53,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,54,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,54,32,110,101,119,102,105,108,101,49,56,55,32,46,32,116,109,112,49,56,53,49,56,56,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,55,49,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,53,32,112,100,115,51,55,54,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,53,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,50,32,112,100,115,51,57,51,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,52,32,112,100,115,52,48,53,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,55,32,100,105,114,52,49,56,32,102,105,108,101,52,49,57,32,101,120,116,52,50,48,32,112,100,115,52,50,49,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,50,32,101,120,116,52,55,49,32,112,100,115,52,55,50,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,53,32,37,101,120,116,52,54,48,52,55,52,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,52,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,52,32,102,105,108,101,52,53,53,32,46,32,116,109,112,52,53,51,52,53,54,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,52,32,101,120,116,53,48,51,32,112,100,115,53,48,52,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,55,32,37,101,120,116,52,57,50,53,49,50,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,54,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,54,32,102,105,108,101,52,56,55,32,46,32,116,109,112,52,56,53,52,56,56,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,57,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,50,41,0,0,0,0,0,0};
+static C_char C_TLS li76[] C_aligned={C_lihdr(0,0,7),40,97,50,49,51,56,41,0};
+static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,47),40,97,50,49,52,52,32,100,105,114,53,52,48,53,52,49,53,52,54,32,102,105,108,101,53,52,50,53,52,51,53,52,55,32,101,120,116,53,52,52,53,52,53,53,52,56,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,55,41,0,0,0,0,0,0};
+static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,7),40,97,50,49,53,51,41,0};
+static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,47),40,97,50,49,53,57,32,100,105,114,53,53,53,53,53,54,53,54,49,32,102,105,108,101,53,53,55,53,53,56,53,54,50,32,101,120,116,53,53,57,53,54,48,53,54,51,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,50,41,0,0,0};
+static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,7),40,97,50,49,54,56,41,0};
+static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,47),40,97,50,49,55,52,32,100,105,114,53,55,48,53,55,49,53,55,54,32,102,105,108,101,53,55,50,53,55,51,53,55,55,32,101,120,116,53,55,52,53,55,53,53,55,56,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,55,41,0,0,0,0,0,0};
+static C_char C_TLS li85[] C_aligned={C_lihdr(0,0,7),40,97,50,49,56,51,41,0};
+static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,47),40,97,50,49,56,57,32,100,105,114,53,56,53,53,56,54,53,57,49,32,102,105,108,101,53,56,55,53,56,56,53,57,50,32,101,120,116,53,56,57,53,57,48,53,57,51,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,50,41};
+static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,7),40,97,50,50,48,49,41,0};
+static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,47),40,97,50,50,48,55,32,100,105,114,54,48,48,54,48,49,54,48,54,32,102,105,108,101,54,48,50,54,48,51,54,48,55,32,101,120,116,54,48,52,54,48,53,54,48,56,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,55,41};
+static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,7),40,97,50,50,49,57,41,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,45),40,97,50,50,50,53,32,95,54,49,54,54,49,55,54,50,50,32,102,105,108,101,54,49,56,54,49,57,54,50,51,32,101,120,116,54,50,48,54,50,49,54,50,52,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,50,32,100,105,114,54,49,51,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,51,55,41,0};
+static C_char C_TLS li95[] C_aligned={C_lihdr(0,0,44),40,97,50,50,52,51,32,100,105,114,54,51,50,54,51,51,54,51,56,32,95,54,51,52,54,51,53,54,51,57,32,101,120,116,54,51,54,54,51,55,54,52,48,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,56,32,102,105,108,101,54,50,57,41,0,0,0};
+static C_char C_TLS li97[] C_aligned={C_lihdr(0,0,7),40,97,50,50,53,53,41,0};
+static C_char C_TLS li98[] C_aligned={C_lihdr(0,0,45),40,97,50,50,54,49,32,100,105,114,54,52,56,54,52,57,54,53,52,32,102,105,108,101,54,53,48,54,53,49,54,53,53,32,95,54,53,50,54,53,51,54,53,54,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,52,32,101,120,116,54,52,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li100[] C_aligned={C_lihdr(0,0,12),40,97,50,51,48,54,32,112,54,57,51,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,55,49,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,52,41,0,0,0,0,0,0};
+static C_char C_TLS li104[] C_aligned={C_lihdr(0,0,11),40,103,55,53,49,32,112,55,53,51,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,52,32,103,55,52,56,55,53,48,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,57,32,112,114,101,118,55,51,48,32,112,97,114,116,115,55,51,49,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,55,32,46,32,116,109,112,55,49,54,55,49,56,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,57,49,32,100,105,114,55,57,50,32,107,101,101,112,63,55,57,51,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,54,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,56,41,0,0,0,0};
+static C_char C_TLS li112[] C_aligned={C_lihdr(0,0,14),40,102,95,50,55,57,54,32,112,110,51,53,51,41,0,0};
+static C_char C_TLS li113[] C_aligned={C_lihdr(0,0,14),40,102,95,50,56,48,50,32,114,116,51,53,52,41,0,0};
+static C_char C_TLS li114[] C_aligned={C_lihdr(0,0,14),40,102,95,50,56,49,49,32,114,116,51,53,55,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,51,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,52,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,53,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_860)
+static void C_ccall f_860(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_866)
+static void C_ccall f_866(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_2832)
+static void C_ccall f_2832(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2829)
+static void C_ccall f_2829(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2823)
+static void C_ccall f_2823(C_word c,C_word t0,C_word t1,C_word t2) 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_2811)
+static void C_ccall f_2811(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2802)
+static void C_ccall f_2802(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2796)
+static void C_ccall f_2796(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1642)
+static void C_fcall f_1642(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2031)
+static void C_ccall f_2031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2034)
+static void C_ccall f_2034(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_2708)
+static void C_ccall f_2708(C_word c,C_word t0,C_word t1,C_word t2) 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_2759)
+static void C_ccall f_2759(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2762)
+static void C_ccall f_2762(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_2749)
+static void C_ccall f_2749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2666)
+static void C_ccall f_2666(C_word c,C_word t0,C_word t1,C_word t2) 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_2676)
+static C_word C_fcall f_2676(C_word t0);
+C_noret_decl(f_2657)
+static void C_fcall f_2657(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2369)
+static void C_ccall f_2369(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2369)
+static void C_ccall f_2369r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_2373)
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2387)
+static void C_fcall f_2387(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2587)
+static void C_fcall f_2587(C_word t0,C_word t1) 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_2535)
+static void C_fcall f_2535(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2571)
+static void C_ccall f_2571(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_2397)
+static void C_fcall f_2397(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_2429)
+static void C_ccall f_2429(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2477)
+static void C_fcall f_2477(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2495)
+static void C_ccall f_2495(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2485)
+static void C_fcall f_2485(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2489)
+static void C_ccall f_2489(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_noret;
+C_noret_decl(f_2435)
+static void C_ccall f_2435(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2438)
+static void C_ccall f_2438(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2441)
+static void C_ccall f_2441(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_2450)
+static void C_fcall f_2450(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_2343)
+static C_word C_fcall f_2343(C_word *a,C_word t0,C_word t1);
+C_noret_decl(f_2268)
+static void C_ccall f_2268(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_2268)
+static void C_ccall f_2268r(C_word t0,C_word t1,C_word t3) 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_2325)
+static void C_ccall f_2325(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2331)
+static void C_ccall f_2331(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_2286)
+static void C_fcall f_2286(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2316)
+static void C_ccall f_2316(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_2293)
+static void C_ccall f_2293(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_2307)
+static void C_ccall f_2307(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2250)
+static void C_ccall f_2250(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2262)
+static void C_ccall f_2262(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2256)
+static void C_ccall f_2256(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2232)
+static void C_ccall f_2232(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2244)
+static void C_ccall f_2244(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2238)
+static void C_ccall f_2238(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_2226)
+static void C_ccall f_2226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2196)
+static void C_ccall f_2196(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2208)
+static void C_ccall f_2208(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2202)
+static void C_ccall f_2202(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2178)
+static void C_ccall f_2178(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2190)
+static void C_ccall f_2190(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2163)
+static void C_ccall f_2163(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2175)
+static void C_ccall f_2175(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2169)
+static void C_ccall f_2169(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2148)
+static void C_ccall f_2148(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2160)
+static void C_ccall f_2160(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_2154)
+static void C_ccall f_2154(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_word t2) 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_word t4) C_noret;
+C_noret_decl(f_2139)
+static void C_ccall f_2139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2049)
+static void C_ccall f_2049(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2065)
+static void C_ccall f_2065(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2094)
+static void C_ccall f_2094(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2119)
+static void C_ccall f_2119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2104)
+static void C_ccall f_2104(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2075)
+static void C_ccall f_2075(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2035)
+static void C_fcall f_2035(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1952)
+static void C_ccall f_1952(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_1952)
+static void C_ccall f_1952r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_1981)
+static void C_fcall f_1981(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_1954)
+static void C_fcall f_1954(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1962)
+static void C_ccall f_1962(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1968)
+static void C_ccall f_1968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1965)
+static void C_ccall f_1965(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1888)
+static void C_ccall f_1888(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_1888)
+static void C_ccall f_1888r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_1904)
+static void C_fcall f_1904(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1899)
+static void C_fcall f_1899(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1890)
+static void C_fcall f_1890(C_word t0,C_word t1,C_word t2,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_1802)
+static void C_fcall f_1802(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_1855)
+static void C_fcall f_1855(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1831)
+static void C_ccall f_1831(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1838)
+static void C_fcall f_1838(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1771)
+static void C_fcall f_1771(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1710)
+static void C_fcall f_1710(C_word t0,C_word t1,C_word t2,C_word t3) 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_1749)
+static void C_ccall f_1749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1757)
+static void C_ccall f_1757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1657)
+static void C_fcall f_1657(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1673)
+static void C_fcall f_1673(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1644)
+static void C_ccall f_1644(C_word c,C_word t0,C_word t1,C_word t2) 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_1230)
+static void C_ccall f_1230(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_1230)
+static void C_ccall f_1230r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) 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_1585)
+static void C_fcall f_1585(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1232)
+static void C_fcall f_1232(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1245)
+static void C_fcall f_1245(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1578)
+static void C_ccall f_1578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1574)
+static void C_ccall f_1574(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1248)
+static void C_ccall f_1248(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1251)
+static void C_ccall f_1251(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1567)
+static void C_ccall f_1567(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1254)
+static void C_ccall f_1254(C_word c,C_word t0,C_word t1) 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_1560)
+static void C_ccall f_1560(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1257)
+static void C_ccall f_1257(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_noret;
+C_noret_decl(f_1525)
+static void C_ccall f_1525(C_word c,C_word t0,C_word t1) 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_1543)
+static void C_ccall f_1543(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_1500)
+static void C_ccall f_1500(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1506)
+static void C_ccall f_1506(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f2989)
+static void C_ccall f2989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1517)
+static void C_ccall f_1517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1260)
+static void C_ccall f_1260(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1263)
+static void C_ccall f_1263(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1439)
+static void C_ccall f_1439(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1470)
+static void C_ccall f_1470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1482)
+static void C_ccall f_1482(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1482)
+static void C_ccall f_1482r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_1488)
+static void C_ccall f_1488(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1476)
+static void C_ccall f_1476(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1445)
+static void C_ccall f_1445(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1451)
+static void C_ccall f_1451(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f2985)
+static void C_ccall f2985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1462)
+static void C_ccall f_1462(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1266)
+static void C_ccall f_1266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1269)
+static void C_ccall f_1269(C_word c,C_word t0,C_word t1) C_noret;
+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_1279)
+static void C_ccall f_1279(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1281)
+static void C_fcall f_1281(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1374)
+static void C_ccall f_1374(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1415)
+static void C_ccall f_1415(C_word c,C_word t0,C_word t1) 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_1421)
+static void C_ccall f_1421(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_word t2) 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_1393)
+static void C_ccall f_1393(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_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_1403)
+static void C_ccall f_1403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1358)
+static void C_ccall f_1358(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_noret;
+C_noret_decl(f_1368)
+static void C_ccall f_1368(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1291)
+static void C_ccall f_1291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1294)
+static void C_ccall f_1294(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1302)
+static void C_ccall f_1302(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1333)
+static void C_ccall f_1333(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1345)
+static void C_ccall f_1345(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1345)
+static void C_ccall f_1345r(C_word t0,C_word t1,C_word t3) 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_1339)
+static void C_ccall f_1339(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1308)
+static void C_ccall f_1308(C_word c,C_word t0,C_word t1,C_word t2) 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(f2979)
+static void C_ccall f2979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1325)
+static void C_ccall f_1325(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_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_883)
+static void C_ccall f_883(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_883)
+static void C_ccall f_883r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_1182)
+static void C_fcall f_1182(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1177)
+static void C_fcall f_1177(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_885)
+static void C_fcall f_885(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_898)
+static void C_fcall f_898(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1170)
+static void C_ccall f_1170(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1166)
+static void C_ccall f_1166(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_901)
+static void C_ccall f_901(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_904)
+static void C_ccall f_904(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1159)
+static void C_ccall f_1159(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_907)
+static void C_ccall f_907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1142)
+static void C_ccall f_1142(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1152)
+static void C_ccall f_1152(C_word c,C_word t0,C_word t1) 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_1086)
+static void C_ccall f_1086(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1117)
+static void C_ccall f_1117(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_1129)
+static void C_ccall f_1129r(C_word t0,C_word t1,C_word t3) 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_1123)
+static void C_ccall f_1123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1092)
+static void C_ccall f_1092(C_word c,C_word t0,C_word t1,C_word t2) 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(f2975)
+static void C_ccall f2975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1109)
+static void C_ccall f_1109(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_913)
+static void C_ccall f_913(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_916)
+static void C_ccall f_916(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1031)
+static void C_ccall f_1031(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1062)
+static void C_ccall f_1062(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1074)
+static void C_ccall f_1074(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_1074)
+static void C_ccall f_1074r(C_word t0,C_word t1,C_word t3) 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_1068)
+static void C_ccall f_1068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1037)
+static void C_ccall f_1037(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1043)
+static void C_ccall f_1043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f2971)
+static void C_ccall f2971(C_word c,C_word t0,C_word t1) 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_919)
+static void C_ccall f_919(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_922)
+static void C_ccall f_922(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_925)
+static void C_ccall f_925(C_word c,C_word t0,C_word t1) 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(f_934)
+static void C_fcall f_934(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_966)
+static void C_ccall f_966(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1007)
+static void C_ccall f_1007(C_word c,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_1019)
+static void C_ccall f_1019r(C_word t0,C_word t1,C_word t3) 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_1013)
+static void C_ccall f_1013(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_word t2) C_noret;
+C_noret_decl(f_978)
+static void C_ccall f_978(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_985)
+static void C_ccall f_985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_988)
+static void C_ccall f_988(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_999)
+static void C_ccall f_999(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_995)
+static void C_ccall f_995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_950)
+static void C_ccall f_950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_953)
+static void C_ccall f_953(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_960)
+static void C_ccall f_960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_944)
+static void C_ccall f_944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_947)
+static void C_ccall f_947(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_868)
+static void C_ccall f_868(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_875)
+static void C_ccall f_875(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(trf_1642)
+static void C_fcall trf_1642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1642(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1642(t0,t1);}
+
+C_noret_decl(trf_2657)
+static void C_fcall trf_2657(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2657(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_2657(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_2387)
+static void C_fcall trf_2387(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2387(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_2387(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_2587)
+static void C_fcall trf_2587(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2587(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2587(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2535(t0,t1);}
+
+C_noret_decl(trf_2397)
+static void C_fcall trf_2397(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2397(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2397(t0,t1);}
+
+C_noret_decl(trf_2477)
+static void C_fcall trf_2477(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2477(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2477(t0,t1,t2);}
+
+C_noret_decl(trf_2485)
+static void C_fcall trf_2485(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2485(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2485(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_2286)
+static void C_fcall trf_2286(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2286(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2286(t0,t1);}
+
+C_noret_decl(trf_2035)
+static void C_fcall trf_2035(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2035(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2035(t0,t1);}
+
+C_noret_decl(trf_1981)
+static void C_fcall trf_1981(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1981(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1981(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 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_1954)
+static void C_fcall trf_1954(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1954(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_1954(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1904)
+static void C_fcall trf_1904(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1904(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1904(t0,t1);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1899(t0,t1,t2);}
+
+C_noret_decl(trf_1890)
+static void C_fcall trf_1890(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1890(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_1890(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1802)
+static void C_fcall trf_1802(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1802(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_1802(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_1855)
+static void C_fcall trf_1855(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1855(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1855(t0,t1);}
+
+C_noret_decl(trf_1838)
+static void C_fcall trf_1838(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1838(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1838(t0,t1);}
+
+C_noret_decl(trf_1771)
+static void C_fcall trf_1771(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1771(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_1771(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1710)
+static void C_fcall trf_1710(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1710(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_1710(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_1657)
+static void C_fcall trf_1657(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1657(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1657(t0,t1,t2);}
+
+C_noret_decl(trf_1673)
+static void C_fcall trf_1673(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1673(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1673(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_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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1585(t0,t1,t2);}
+
+C_noret_decl(trf_1232)
+static void C_fcall trf_1232(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1232(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_1232(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1245)
+static void C_fcall trf_1245(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1245(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1245(t0,t1);}
+
+C_noret_decl(trf_1281)
+static void C_fcall trf_1281(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1281(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_1281(t0,t1,t2,t3);}
+
+C_noret_decl(trf_1182)
+static void C_fcall trf_1182(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1182(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1182(t0,t1);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1177(t0,t1,t2);}
+
+C_noret_decl(trf_885)
+static void C_fcall trf_885(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_885(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_885(t0,t1,t2,t3);}
+
+C_noret_decl(trf_898)
+static void C_fcall trf_898(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_898(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_898(t0,t1);}
+
+C_noret_decl(trf_934)
+static void C_fcall trf_934(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_934(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_934(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(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);}
+
+/* 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! c178 ...) */,lf[1]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_860,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_regex_toplevel(2,C_SCHEME_UNDEFINED,t3);}
+
+/* k858 */
+static void C_ccall f_860(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_863,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_data_structures_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k861 in k858 */
+static void C_ccall f_863(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_866,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]);}
+
+/* k864 in k861 in k858 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word 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_866,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_868,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_883,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_1230,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_1642,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_2794,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_2821,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]);}}
+
+/* k2819 in k864 in k861 in k858 */
+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 t4;
+C_word t5;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2821,2,t0,t1);}
+t2=C_mutate(&lf[32] /* (set! absolute-pathname-root ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2823,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_2829,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_2832,a[2]=((C_word)li117),tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t0)[2];
+f_1642(t5,t4);}
+
+/* root-directory in k2819 in k864 in k861 in k858 */
+static void C_ccall f_2832(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_2832,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?(C_word)C_i_cadr(t2):C_SCHEME_FALSE));}
+
+/* root-origin in k2819 in k864 in k861 in k858 */
+static void C_ccall f_2829(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_2829,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+
+/* absolute-pathname-root in k2819 in k864 in k861 in k858 */
+static void C_ccall f_2823(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_2823,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);}
+
+/* k2792 in k864 in k861 in k858 */
+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 t4;
+C_word t5;
+C_word ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2794,2,t0,t1);}
+t2=C_mutate(&lf[32] /* (set! absolute-pathname-root ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2796,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_2802,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_2811,a[2]=((C_word)li114),tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t0)[2];
+f_1642(t5,t4);}
+
+/* f_2811 in k2792 in k864 in k861 in k858 */
+static void C_ccall f_2811(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_2811,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?(C_word)C_i_caddr(t2):C_SCHEME_FALSE));}
+
+/* f_2802 in k2792 in k864 in k861 in k858 */
+static void C_ccall f_2802(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_2802,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_truep(t2)?(C_word)C_i_cadr(t2):C_SCHEME_FALSE));}
+
+/* f_2796 in k2792 in k864 in k861 in k858 */
+static void C_ccall f_2796(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_2796,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);}
+
+/* k1640 in k864 in k861 in k858 */
+static void C_fcall f_1642(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_1642,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_1644,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_1657,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_1710,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_1771,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_1802,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_1888,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_1952,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_2031,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]);}
+
+/* k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2031(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_2031,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2034,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]);}
+
+/* k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2034(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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[56],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2034,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2035,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_2049,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_set_block_item(lf[54] /* pathname-directory */,0,C_SCHEME_UNDEFINED);
+t5=C_set_block_item(lf[55] /* pathname-file */,0,C_SCHEME_UNDEFINED);
+t6=C_set_block_item(lf[56] /* pathname-extension */,0,C_SCHEME_UNDEFINED);
+t7=C_set_block_item(lf[57] /* pathname-strip-directory */,0,C_SCHEME_UNDEFINED);
+t8=C_set_block_item(lf[58] /* pathname-strip-extension */,0,C_SCHEME_UNDEFINED);
+t9=C_set_block_item(lf[59] /* pathname-replace-directory */,0,C_SCHEME_UNDEFINED);
+t10=C_set_block_item(lf[60] /* pathname-replace-file */,0,C_SCHEME_UNDEFINED);
+t11=C_set_block_item(lf[61] /* pathname-replace-extension */,0,C_SCHEME_UNDEFINED);
+t12=*((C_word*)lf[53]+1);
+t13=C_mutate((C_word*)lf[54]+1 /* (set! pathname-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2133,a[2]=t12,a[3]=((C_word)li78),tmp=(C_word)a,a+=4,tmp));
+t14=C_mutate((C_word*)lf[55]+1 /* (set! pathname-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2148,a[2]=t12,a[3]=((C_word)li81),tmp=(C_word)a,a+=4,tmp));
+t15=C_mutate((C_word*)lf[56]+1 /* (set! pathname-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2163,a[2]=t12,a[3]=((C_word)li84),tmp=(C_word)a,a+=4,tmp));
+t16=C_mutate((C_word*)lf[57]+1 /* (set! pathname-strip-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2178,a[2]=t12,a[3]=((C_word)li87),tmp=(C_word)a,a+=4,tmp));
+t17=C_mutate((C_word*)lf[58]+1 /* (set! pathname-strip-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2196,a[2]=t12,a[3]=((C_word)li90),tmp=(C_word)a,a+=4,tmp));
+t18=C_mutate((C_word*)lf[59]+1 /* (set! pathname-replace-directory ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2214,a[2]=t12,a[3]=((C_word)li93),tmp=(C_word)a,a+=4,tmp));
+t19=C_mutate((C_word*)lf[60]+1 /* (set! pathname-replace-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2232,a[2]=t12,a[3]=((C_word)li96),tmp=(C_word)a,a+=4,tmp));
+t20=C_mutate((C_word*)lf[61]+1 /* (set! pathname-replace-extension ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2250,a[2]=t12,a[3]=((C_word)li99),tmp=(C_word)a,a+=4,tmp));
+t21=*((C_word*)lf[62]+1);
+t22=*((C_word*)lf[40]+1);
+t23=*((C_word*)lf[2]+1);
+t24=*((C_word*)lf[63]+1);
+t25=C_mutate((C_word*)lf[64]+1 /* (set! create-temporary-file ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2268,a[2]=t21,a[3]=t22,a[4]=t23,a[5]=t24,a[6]=((C_word)li102),tmp=(C_word)a,a+=7,tmp));
+t26=*((C_word*)lf[71]+1);
+t27=*((C_word*)lf[72]+1);
+t28=*((C_word*)lf[62]+1);
+t29=*((C_word*)lf[73]+1);
+t30=*((C_word*)lf[74]+1);
+t31=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2791,a[2]=((C_word*)t0)[2],a[3]=t26,a[4]=t29,a[5]=t30,a[6]=t27,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),t31);}
+
+/* k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 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_2791,2,t0,t1);}
+t2=(C_word)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_2343,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_2369,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_2657,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_2666,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_2708,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 k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2708(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_2708,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2756,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* files.scm: 456 split-directory */
+t4=lf[87];
+f_2657(t4,t3,lf[92],t2,C_SCHEME_FALSE);}
+
+/* k2754 in decompose-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2756,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2759,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]);}
+
+/* k2757 in k2754 in decompose-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2759(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_2759,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2762,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);}
+
+/* k2760 in k2757 in k2754 in decompose-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2762(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_2762,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2769,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]);}
+
+/* k2767 in k2760 in k2757 in k2754 in decompose-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 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_2769,2,t0,t1);}
+t2=(C_word)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_word)C_i_car(t3);
+t6=(C_word)C_block_size(t4);
+if(C_truep((C_word)C_substring_compare(t4,t5,C_fix(0),C_fix(0),t6))){
+t7=(C_word)C_i_cdr(t3);
+t8=(C_word)C_block_size(t5);
+t9=(C_word)C_block_size(t8);
+t10=(C_word)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_2749,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);}}
+
+/* k2747 in k2767 in k2760 in k2757 in k2754 in decompose-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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=(C_word)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 k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2666(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_2666,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2674,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_listp(t2))){
+t4=t3;
+f_2674(2,t4,t2);}
+else{
+/* files.scm: 430 split-directory */
+t4=lf[87];
+f_2657(t4,t3,lf[89],t2,C_SCHEME_TRUE);}}
+
+/* k2672 in directory-null? in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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_2676,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_2676(t1));}
+
+/* loop in k2672 in directory-null? in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static C_word C_fcall f_2676(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_word)C_i_nullp(t1);
+if(C_truep(t2)){
+return(t2);}
+else{
+t3=(C_word)C_i_car(t1);
+if(C_truep((C_truep((C_word)C_i_equalp(t3,lf[90]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(t3,lf[91]))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t4=(C_word)C_i_cdr(t1);
+t6=t4;
+t1=t6;
+goto loop;}
+else{
+return(C_SCHEME_FALSE);}}}
+
+/* split-directory in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2657(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_2657,NULL,5,t0,t1,t2,t3,t4);}
+t5=(C_word)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 k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2369(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_2369r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2369r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2369r(C_word 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_2373,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_word)C_i_nullp(t3))){
+t5=t4;
+f_2373(2,t5,((C_word*)t0)[2]);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_2373(2,t6,(C_word)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);}}}
+
+/* k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2373(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_2373,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[76]);
+t3=(C_truep(t2)?C_make_character(92):C_make_character(47));
+t4=(C_word)C_i_check_string_2(((C_word*)t0)[8],lf[81]);
+t5=(C_word)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_2387,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_2387(t13,((C_word*)t0)[2],C_fix(0),C_fix(0),C_SCHEME_END_OF_LIST);}
+
+/* loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2387(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_2387,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_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[13]))){
+t6=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_2397,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_word)C_fixnum_greaterp(t2,t3))){
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2521,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_2397(t7,C_SCHEME_UNDEFINED);}}
+else{
+t6=(C_word)C_i_string_ref(((C_word*)t0)[4],t2);
+if(C_truep((C_truep((C_word)C_eqp(t6,C_make_character(92)))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t6,C_make_character(47)))?C_SCHEME_TRUE:C_SCHEME_FALSE)))){
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2535,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_word)C_i_nullp(((C_word*)t5)[1]))){
+t8=(C_word)C_eqp(t2,t3);
+if(C_truep(t8)){
+t9=C_set_block_item(((C_word*)t0)[12],0,C_SCHEME_TRUE);
+t10=t7;
+f_2535(t10,t9);}
+else{
+t9=t7;
+f_2535(t9,C_SCHEME_UNDEFINED);}}
+else{
+t8=t7;
+f_2535(t8,C_SCHEME_UNDEFINED);}}
+else{
+t7=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2587,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_word)C_i_nullp(((C_word*)t5)[1]))){
+t8=(C_word)C_i_string_ref(((C_word*)t0)[4],t2);
+t9=(C_word)C_eqp(t8,C_make_character(58));
+t10=t7;
+f_2587(t10,(C_truep(t9)?(C_word)C_eqp(lf[76],((C_word*)t0)[2]):C_SCHEME_FALSE));}
+else{
+t8=t7;
+f_2587(t8,C_SCHEME_FALSE);}}}}
+
+/* k2585 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2587(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_2587,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2591,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_word)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_word)C_fixnum_plus(((C_word*)t0)[7],C_fix(1));
+/* files.scm: 414 loop */
+t3=((C_word*)((C_word*)t0)[6])[1];
+f_2387(t3,((C_word*)t0)[5],t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}}
+
+/* k2589 in k2585 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 t5;
+C_word *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[5])+1,t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+/* files.scm: 413 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_2387(t5,((C_word*)t0)[2],t3,t4,C_SCHEME_END_OF_LIST);}
+
+/* k2533 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2535(C_word t0,C_word t1){
+C_word 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_2535,NULL,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[8],((C_word*)t0)[7]);
+if(C_truep(t2)){
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
+/* files.scm: 405 loop */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_2387(t5,((C_word*)t0)[5],t3,t4,((C_word*)((C_word*)t0)[4])[1]);}
+else{
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[8],C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2571,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]);}}
+
+/* k2569 in k2533 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2571(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2571,2,t0,t1);}
+t2=f_2343(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_2387(t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k2519 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2521,2,t0,t1);}
+t2=f_2343(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_2397(t4,t3);}
+
+/* k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2397(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_2397,NULL,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(((C_word*)((C_word*)t0)[12])[1]))){
+if(C_truep(((C_word*)((C_word*)t0)[11])[1])){
+t2=(C_word)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_word)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_2423,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);}}
+
+/* k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2423,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_2426,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]);}
+
+/* k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2426,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_2429,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_word)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]);}
+
+/* k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 t6;
+C_word t7;
+C_word ab[19],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2429,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2432,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_word)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_2477,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_2477(t7,t2,t3);}
+
+/* loop744 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2477(C_word t0,C_word 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_2477,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_2485,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_2495,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));
+/* g751752 */
+t6=t3;
+f_2485(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k2493 in loop744 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2495(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_2477(t3,((C_word*)t0)[2],t2);}
+
+/* g751 in loop744 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2485(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_2485,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2489,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]);}
+
+/* k2487 in g751 in loop744 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2489(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]);}
+
+/* k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2432(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_2432,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2435,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_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_2435(2,t4,C_SCHEME_UNDEFINED);}}
+
+/* k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2435(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_2435,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2438,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]);}
+
+/* k2436 in k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2438(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_2438,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2441,a[2]=((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);}
+
+/* k2439 in k2436 in k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2441(C_word c,C_word t0,C_word 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_2441,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_word)C_i_string_equal_p(((C_word*)t0)[6],((C_word*)t3)[1]))){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2450,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_2461,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)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_2450(t5,C_SCHEME_UNDEFINED);}}
+else{
+t4=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,((C_word*)t3)[1]);}}
+
+/* k2459 in k2439 in k2436 in k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_2450(t3,t2);}
+
+/* k2448 in k2439 in k2436 in k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2450(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_2450,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_2457,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]);}}
+
+/* k2455 in k2448 in k2439 in k2436 in k2433 in k2430 in k2427 in k2424 in k2421 in k2395 in loop in k2371 in normalize-pathname in k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 *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 k2789 in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static C_word C_fcall f_2343(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_word)C_i_string_equal_p(lf[78],t1))){
+t3=t2;
+return(t3);}
+else{
+if(C_truep((C_word)C_i_string_equal_p(lf[79],t1))){
+t3=(C_word)C_i_nullp(t2);
+return((C_truep(t3)?lf[80]:(C_word)C_i_cdr(t2)));}
+else{
+return((C_word)C_a_i_cons(&a,2,t1,t2));}}}
+
+/* create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2268(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*)tr2rv,(void*)f_2268r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_2268r(t0,t1,t2);}}
+
+static void C_ccall f_2268r(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_2272,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]);}
+
+/* k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2272,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2275,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_2275(2,t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2325,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]);}}
+
+/* k2323 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2325(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_2325,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=((C_word*)t0)[4];
+f_2275(2,t3,t2);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2331,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]);}}
+
+/* k2329 in k2323 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2331(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_2275(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]);}}
+
+/* k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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 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_2275,2,t0,t1);}
+t2=(C_word)C_notvemptyp(((C_word*)t0)[6]);
+t3=(C_truep(t2)?(C_word)C_i_vector_ref(((C_word*)t0)[6],C_fix(0)):lf[65]);
+t4=(C_word)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_2286,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_2286(t8,((C_word*)t0)[2]);}
+
+/* loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2286(C_word t0,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_2286,NULL,2,t0,t1);}
+t2=(C_word)C_fudge(C_fix(16));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2293,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_2312,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_2316,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));}
+
+/* k2314 in loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2316(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);}
+
+/* k2310 in loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2312(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]);}
+
+/* k2291 in loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2293,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2299,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);}
+
+/* k2297 in k2291 in loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2299,2,t0,t1);}
+if(C_truep(t1)){
+/* files.scm: 353 loop */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_2286(t2,((C_word*)t0)[4]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2307,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);}}
+
+/* a2306 in k2297 in k2291 in loop in k2273 in k2270 in create-temporary-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2307(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_2307,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+
+/* pathname-replace-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2250(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_2250,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2256,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_2262,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);}
+
+/* a2261 in pathname-replace-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2262(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_2262,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]);}
+
+/* a2255 in pathname-replace-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2256(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_2256,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2232(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_2232,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2238,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_2244,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);}
+
+/* a2243 in pathname-replace-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2244(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_2244,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);}
+
+/* a2237 in pathname-replace-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2238(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_2238,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2214(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_2214,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2220,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_2226,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);}
+
+/* a2225 in pathname-replace-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2226(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_2226,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);}
+
+/* a2219 in pathname-replace-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2220(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_2220,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2196(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_2196,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2202,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_2208,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);}
+
+/* a2207 in pathname-strip-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2208(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_2208,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);}
+
+/* a2201 in pathname-strip-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2202(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_2202,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2178(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_2178,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2184,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_2190,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);}
+
+/* a2189 in pathname-strip-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2190(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_2190,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);}
+
+/* a2183 in pathname-strip-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2184(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_2184,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2163(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_2163,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2169,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_2175,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);}
+
+/* a2174 in pathname-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2175(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_2175,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* a2168 in pathname-extension in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2169(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_2169,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2148(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_2148,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2154,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_2160,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);}
+
+/* a2159 in pathname-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2160(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_2160,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t3);}
+
+/* a2153 in pathname-file in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2154(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_2154,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2133(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_2133,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2139,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_2145,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);}
+
+/* a2144 in pathname-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2145(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_2145,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t2);}
+
+/* a2138 in pathname-directory in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2139(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_2139,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 k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2049(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_2049,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[53]);
+t4=(C_word)C_block_size(t2);
+t5=(C_word)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_2065,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);}}
+
+/* k2063 in decompose-pathname in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2065(C_word c,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_2065,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2075,a[2]=((C_word*)t0)[6],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(t1);
+/* files.scm: 281 strip-pds */
+f_2035(t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2094,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]);}}
+
+/* k2092 in k2063 in decompose-pathname in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2094(C_word c,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_2094,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2104,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_cadr(t1);
+/* files.scm: 284 strip-pds */
+f_2035(t2,t3);}
+else{
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2119,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* files.scm: 285 strip-pds */
+f_2035(t2,((C_word*)t0)[2]);}}
+
+/* k2117 in k2092 in k2063 in decompose-pathname in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2119(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);}
+
+/* k2102 in k2092 in k2063 in decompose-pathname in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2104(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_caddr(((C_word*)t0)[3]);
+/* files.scm: 284 values */
+C_values(5,0,((C_word*)t0)[2],t1,t2,C_SCHEME_FALSE);}
+
+/* k2073 in k2063 in decompose-pathname in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_ccall f_2075(C_word 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_caddr(((C_word*)t0)[3]);
+t3=(C_word)C_i_cddddr(((C_word*)t0)[3]);
+t4=(C_word)C_i_car(t3);
+/* files.scm: 281 values */
+C_values(5,0,((C_word*)t0)[2],t1,t2,t4);}
+
+/* strip-pds in k2032 in k2029 in k1640 in k864 in k861 in k858 */
+static void C_fcall f_2035(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_2035,NULL,2,t1,t2);}
+if(C_truep(t2)){
+t3=t2;
+if(C_truep((C_truep((C_word)C_i_equalp(t3,lf[51]))?C_SCHEME_TRUE:(C_truep((C_word)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_1657(t1,t2,C_SCHEME_FALSE);}}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1952(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_1952r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_1952r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_1952r(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_1954,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_1976,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_1981,a[2]=t6,a[3]=((C_word)li72),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-ext496513 */
+t8=t7;
+f_1981(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-pds497511 */
+t10=t6;
+f_1976(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))){
+/* body494502 */
+t12=t5;
+f_1954(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-ext496 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1981(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_1981,NULL,2,t0,t1);}
+/* def-pds497511 */
+t2=((C_word*)t0)[2];
+f_1976(t2,t1,C_SCHEME_FALSE);}
+
+/* def-pds497 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+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);}
+/* body494502 */
+t3=((C_word*)t0)[2];
+f_1954(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body494 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1954(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_1954,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1962,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_1771(t5,t4,((C_word*)t0)[2],t3);}
+
+/* k1960 in body494 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1962(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_1962,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1965,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_1968,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);}
+
+/* k1966 in k1960 in body494 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1968(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_1802(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]);}}}
+
+/* k1963 in k1960 in body494 in make-absolute-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1965(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_1802(t2,((C_word*)t0)[5],lf[41],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* make-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1888(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_1888r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_1888r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_1888r(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_1890,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_1899,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_1904,a[2]=t6,a[3]=((C_word)li68),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-ext464475 */
+t8=t7;
+f_1904(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-pds465473 */
+t10=t6;
+f_1899(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))){
+/* body462470 */
+t12=t5;
+f_1890(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-ext464 in make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1904(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_1904,NULL,2,t0,t1);}
+/* def-pds465473 */
+t2=((C_word*)t0)[2];
+f_1899(t2,t1,C_SCHEME_FALSE);}
+
+/* def-pds465 in make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1899(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_1899,NULL,3,t0,t1,t2);}
+/* body462470 */
+t3=((C_word*)t0)[2];
+f_1890(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body462 in make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1890(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_1890,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1898,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_1771(t5,t4,((C_word*)t0)[2],t3);}
+
+/* k1896 in body462 in make-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1898(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_1802(t2,((C_word*)t0)[5],lf[40],t1,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* _make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1802(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_1802,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_word)C_block_size(t6):C_fix(1));
+t10=(C_word)C_i_check_string_2(t3,t2);
+t11=(C_word)C_i_check_string_2(t8,t2);
+t12=(C_word)C_i_check_string_2(t7,t2);
+t13=(C_truep(t6)?(C_word)C_i_check_string_2(t6,t2):C_SCHEME_UNDEFINED);
+t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1831,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_1855,a[2]=t9,a[3]=t14,a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+t16=(C_word)C_block_size(t8);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t16,t9))){
+if(C_truep(t6)){
+t17=(C_word)C_substring_compare(t6,t8,C_fix(0),C_fix(0),t9);
+t18=t15;
+f_1855(t18,t17);}
+else{
+t17=(C_word)C_subchar(t8,C_fix(0));
+t18=t15;
+f_1855(t18,(C_word)C_i_memq(t17,lf[49]));}}
+else{
+t17=t15;
+f_1855(t17,C_SCHEME_FALSE);}}
+
+/* k1853 in _make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1855(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_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_1831(2,t2,((C_word*)t0)[4]);}}
+
+/* k1829 in _make-pathname in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1831(C_word c,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_1831,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1838,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_word)C_block_size(((C_word*)t0)[2]);
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(0)))){
+t4=(C_word)C_eqp((C_word)C_subchar(((C_word*)t0)[2],C_fix(0)),C_make_character(46));
+t5=t2;
+f_1838(t5,(C_word)C_i_not(t4));}
+else{
+t4=t2;
+f_1838(t4,C_SCHEME_FALSE);}}
+
+/* k1836 in k1829 in _make-pathname in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1838(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 k1640 in k864 in k861 in k858 */
+static void C_fcall f_1771(C_word t0,C_word 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_1771,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_not(t2);
+t5=(C_truep(t4)?t4:(C_word)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_word)C_i_stringp(t2))){
+t6=(C_word)C_a_i_list(&a,1,t2);
+/* files.scm: 224 conc-dirs */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_1710(t7,t1,t6,t3);}
+else{
+/* files.scm: 225 conc-dirs */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1710(t6,t1,t2,t3);}}}
+
+/* conc-dirs in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1710(C_word t0,C_word 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_1710,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_1719,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_1719(t8,t1,t2);}
+
+/* loop in conc-dirs in k1640 in k864 in k861 in k858 */
+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 t10;
+C_word t11;
+C_word *a;
+loop:
+a=C_alloc(8);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_1719,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[43]);}
+else{
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_string_length(t3);
+t5=(C_word)C_eqp(t4,C_fix(0));
+if(C_truep(t5)){
+t6=(C_word)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_1749,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_word)C_i_car(t2);
+/* files.scm: 218 chop-pds */
+f_1657(t6,t7,((C_word*)t0)[4]);}}}
+
+/* k1747 in loop in conc-dirs in k1640 in k864 in k861 in k858 */
+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 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_1749,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_1757,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_word)C_i_cdr(((C_word*)t0)[3]);
+/* files.scm: 220 loop */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1719(t6,t4,t5);}
+
+/* k1755 in k1747 in loop in conc-dirs in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1757(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 k1640 in k864 in k861 in k858 */
+static void C_fcall f_1657(C_word 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_1657,NULL,3,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_block_size(t2);
+t5=(C_truep(t3)?(C_word)C_block_size(t3):C_fix(1));
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1673,a[2]=t2,a[3]=t1,a[4]=t5,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,C_fix(1)))){
+if(C_truep(t3)){
+t7=(C_word)C_fixnum_difference(t4,t5);
+t8=(C_word)C_substring_compare(t2,t3,t7,C_fix(0),t5);
+t9=t6;
+f_1673(t9,t8);}
+else{
+t7=(C_word)C_fixnum_difference(t4,t5);
+t8=(C_word)C_subchar(t2,t7);
+t9=t6;
+f_1673(t9,(C_word)C_i_memq(t8,lf[39]));}}
+else{
+t7=t6;
+f_1673(t7,C_SCHEME_FALSE);}}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* k1671 in chop-pds in k1640 in k864 in k861 in k858 */
+static void C_fcall f_1673(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_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 k1640 in k864 in k861 in k858 */
+static void C_ccall f_1644(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_1644,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[36]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1655,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);}
+
+/* k1653 in absolute-pathname? in k1640 in k864 in k861 in k858 */
+static void C_ccall f_1655(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_pairp(t1));}
+
+/* file-move in k864 in k861 in k858 */
+static void C_ccall f_1230(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_1230r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_1230r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_1230r(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_1232,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_1585,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_1590,a[2]=t6,a[3]=((C_word)li58),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-clobber196346 */
+t8=t7;
+f_1590(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-blocksize197344 */
+t10=t6;
+f_1585(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))){
+/* body194202 */
+t12=t5;
+f_1232(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-clobber196 in file-move in k864 in k861 in k858 */
+static void C_fcall f_1590(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_1590,NULL,2,t0,t1);}
+/* def-blocksize197344 */
+t2=((C_word*)t0)[2];
+f_1585(t2,t1,C_SCHEME_FALSE);}
+
+/* def-blocksize197 in file-move in k864 in k861 in k858 */
+static void C_fcall f_1585(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_1585,NULL,3,t0,t1,t2);}
+/* body194202 */
+t3=((C_word*)t0)[2];
+f_1232(t3,t1,t2,C_fix(1024));}
+
+/* body194 in file-move in k864 in k861 in k858 */
+static void C_fcall f_1232(C_word t0,C_word 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_1232,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(((C_word*)t0)[3],lf[24]);
+t5=(C_word)C_i_check_string_2(((C_word*)t0)[2],lf[24]);
+t6=(C_word)C_i_check_number_2(t3,lf[24]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1245,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_word)C_i_integerp(t3))){
+t8=t3;
+t9=t7;
+f_1245(t9,(C_word)C_fixnum_greaterp(t8,C_fix(0)));}
+else{
+t8=t7;
+f_1245(t8,C_SCHEME_FALSE);}}
+
+/* k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_fcall f_1245(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_1245,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1248,a[2]=((C_word*)t0)[2],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_1248(2,t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1574,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1578,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]);}}
+
+/* k1576 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1578(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);}
+
+/* k1572 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1574(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);}
+
+/* k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1248(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_1248,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1251,a[2]=((C_word*)t0)[2],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]);}
+
+/* k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1251(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_1251,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1254,a[2]=((C_word*)t0)[2],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_1254(2,t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1567,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]);}}
+
+/* k1565 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1567(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);}
+
+/* k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1254(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_1254,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1257,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_1550,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]);}
+
+/* k1548 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1550(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_1550,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+f_1257(2,t3,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1560,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_1257(2,t2,C_SCHEME_FALSE);}}
+
+/* k1558 in k1548 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1560(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);}
+
+/* k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1257(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_1257,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1260,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_1494,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);}
+
+/* a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1494(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_1494,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1500,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_1525,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);}
+
+/* a1524 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1525(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_1525,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1531,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_1537,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);}
+
+/* a1536 in a1524 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+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);
+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 *a=C_alloc(4);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1543,a[2]=t2,a[3]=((C_word)li52),tmp=(C_word)a,a+=4,tmp);
+/* k233238 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1542 in a1536 in a1524 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1543(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_1543,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1530 in a1524 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1531(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_1531,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]);}
+
+/* a1499 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1500(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_1500,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1506,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li49),tmp=(C_word)a,a+=5,tmp);
+/* k233238 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1505 in a1499 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1506(C_word c,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_1506,2,t0,t1);}
+if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[9]))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1517,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)f2989,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]);}}
+
+/* f2989 in a1505 in a1499 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f2989(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);}
+
+/* k1515 in a1505 in a1499 in a1493 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1517(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);}
+
+/* k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1260(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_1260,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1263,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);
+/* g236237 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1263(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_1263,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1266,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_1439,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);}
+
+/* a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1439(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_1439,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1445,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_1470,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);}
+
+/* a1469 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1470(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_1470,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1476,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_1482,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);}
+
+/* a1481 in a1469 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1482(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_1482r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1482r(t0,t1,t2);}}
+
+static void C_ccall f_1482r(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_1488,a[2]=t2,a[3]=((C_word)li45),tmp=(C_word)a,a+=4,tmp);
+/* k259264 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1487 in a1481 in a1469 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1488(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_1488,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1475 in a1469 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1476(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_1476,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]);}
+
+/* a1444 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1445(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_1445,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1451,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li42),tmp=(C_word)a,a+=5,tmp);
+/* k259264 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1450 in a1444 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1451(C_word c,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_1451,2,t0,t1);}
+if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[9]))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1462,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)f2985,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]);}}
+
+/* f2985 in a1450 in a1444 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f2985(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);}
+
+/* k1460 in a1450 in a1444 in a1438 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1462(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);}
+
+/* k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1266(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_1266,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1269,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);
+/* g262263 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1269(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_1269,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1272,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]);}
+
+/* k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+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_1279,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]);}
+
+/* k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1279(C_word c,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_1279,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_1281,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_1281(t5,((C_word*)t0)[2],t1,C_fix(0));}
+
+/* loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_fcall f_1281(C_word t0,C_word 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_1281,NULL,4,t0,t1,t2,t3);}
+t4=t2;
+t5=(C_word)C_eqp(C_fix(0),t4);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1291,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_1358,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_1374,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);}}
+
+/* a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1374(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_1374,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1380,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_1415,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);}
+
+/* a1414 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1415(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_1415,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1421,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_1427,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);}
+
+/* a1426 in a1414 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+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);
+if(!C_demand(c*C_SIZEOF_PAIR+4)){
+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(4);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1433,a[2]=t2,a[3]=((C_word)li37),tmp=(C_word)a,a+=4,tmp);
+/* k316321 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1432 in a1426 in a1414 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1433(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_1433,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1420 in a1414 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1421(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_1421,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]);}
+
+/* a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1380(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_1380,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1386,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);
+/* k316321 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1385 in a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1386(C_word c,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_1386,2,t0,t1);}
+t2=(C_word)C_i_structurep(((C_word*)t0)[5],lf[9]);
+t3=(C_truep(t2)?(C_word)C_slot(((C_word*)t0)[5],C_fix(1)):C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1393,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]);}
+
+/* k1391 in a1385 in a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1393(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_1393,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1396,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]);}
+
+/* k1394 in k1391 in a1385 in a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1396(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_1396,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1403,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1407,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]);}
+
+/* k1405 in k1394 in k1391 in a1385 in a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1407(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);}
+
+/* k1401 in k1394 in k1391 in a1385 in a1379 in a1373 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1403(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);}
+
+/* k1356 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1358(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_1358,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_1361,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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);
+/* g319320 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k1359 in k1356 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1361(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_1361,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1368,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]);}
+
+/* k1366 in k1359 in k1356 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1368(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_plus(((C_word*)t0)[5],((C_word*)t0)[4]);
+/* files.scm: 163 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_1281(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1291(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_1291,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1294,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]);}
+
+/* k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1294(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_1294,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1297,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_1302,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);}
+
+/* a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1302(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_1302,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1308,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_1333,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);}
+
+/* a1332 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1333(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_1333,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1339,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_1345,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);}
+
+/* a1344 in a1332 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1345(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_1345r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1345r(t0,t1,t2);}}
+
+static void C_ccall f_1345r(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_1351,a[2]=t2,a[3]=((C_word)li30),tmp=(C_word)a,a+=4,tmp);
+/* k288293 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1350 in a1344 in a1332 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1351(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_1351,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1338 in a1332 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1339(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_1339,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]);}
+
+/* a1307 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1308(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_1308,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1314,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li27),tmp=(C_word)a,a+=5,tmp);
+/* k288293 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1313 in a1307 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+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 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_1314,2,t0,t1);}
+if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[9]))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1325,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)f2979,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]);}}
+
+/* f2979 in a1313 in a1307 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f2979(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);}
+
+/* k1323 in a1313 in a1307 in a1301 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1325(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);}
+
+/* k1295 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+static void C_ccall f_1297(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_1297,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1300,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* g291292 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k1298 in k1295 in k1292 in k1289 in loop in k1277 in k1270 in k1267 in k1264 in k1261 in k1258 in k1255 in k1252 in k1249 in k1246 in k1243 in body194 in file-move in k864 in k861 in k858 */
+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 *a;
+t2=((C_word*)t0)[3];
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* file-copy in k864 in k861 in k858 */
+static void C_ccall f_883(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_883r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_883r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_883r(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_885,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_1177,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_1182,a[2]=t6,a[3]=((C_word)li25),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-clobber49173 */
+t8=t7;
+f_1182(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-blocksize50171 */
+t10=t6;
+f_1177(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))){
+/* body4755 */
+t12=t5;
+f_885(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-clobber49 in file-copy in k864 in k861 in k858 */
+static void C_fcall f_1182(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_1182,NULL,2,t0,t1);}
+/* def-blocksize50171 */
+t2=((C_word*)t0)[2];
+f_1177(t2,t1,C_SCHEME_FALSE);}
+
+/* def-blocksize50 in file-copy in k864 in k861 in k858 */
+static void C_fcall f_1177(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_1177,NULL,3,t0,t1,t2);}
+/* body4755 */
+t3=((C_word*)t0)[2];
+f_885(t3,t1,t2,C_fix(1024));}
+
+/* body47 in file-copy in k864 in k861 in k858 */
+static void C_fcall f_885(C_word t0,C_word 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_885,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(((C_word*)t0)[3],lf[5]);
+t5=(C_word)C_i_check_string_2(((C_word*)t0)[2],lf[5]);
+t6=(C_word)C_i_check_number_2(t3,lf[5]);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_898,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_word)C_i_integerp(t3))){
+t8=t3;
+t9=t7;
+f_898(t9,(C_word)C_fixnum_greaterp(t8,C_fix(0)));}
+else{
+t8=t7;
+f_898(t8,C_SCHEME_FALSE);}}
+
+/* k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_fcall f_898(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_898,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_901,a[2]=((C_word*)t0)[2],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_901(2,t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1166,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1170,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]);}}
+
+/* k1168 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1170(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);}
+
+/* k1164 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1166(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);}
+
+/* k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_901(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_901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_904,a[2]=((C_word*)t0)[2],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]);}
+
+/* k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_904(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_904,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_907,a[2]=((C_word*)t0)[2],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_907(2,t3,t1);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1159,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]);}}
+
+/* k1157 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1159(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);}
+
+/* k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_907(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_907,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_910,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_1142,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]);}
+
+/* k1140 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1142(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_1142,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+if(C_truep(t2)){
+t3=((C_word*)t0)[3];
+f_910(2,t3,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1152,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_910(2,t2,C_SCHEME_FALSE);}}
+
+/* k1150 in k1140 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1152(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);}
+
+/* k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_913,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_1086,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);}
+
+/* a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1086(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_1086,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1092,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_1117,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);}
+
+/* a1116 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1117(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_1117,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1123,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_1129,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);}
+
+/* a1128 in a1116 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1129(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_1129r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1129r(t0,t1,t2);}}
+
+static void C_ccall f_1129r(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_1135,a[2]=t2,a[3]=((C_word)li19),tmp=(C_word)a,a+=4,tmp);
+/* k8691 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1134 in a1128 in a1116 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1135(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_1135,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1122 in a1116 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1123(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_1123,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]);}
+
+/* a1091 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1092(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_1092,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1098,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li16),tmp=(C_word)a,a+=5,tmp);
+/* k8691 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1097 in a1091 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+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 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_1098,2,t0,t1);}
+if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[9]))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1109,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)f2975,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]);}}
+
+/* f2975 in a1097 in a1091 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f2975(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);}
+
+/* k1107 in a1097 in a1091 in a1085 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1109(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);}
+
+/* k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_913(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_913,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_916,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);
+/* g8990 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_916(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_916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_919,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_1031,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);}
+
+/* a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1031(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_1031,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1037,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_1062,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);}
+
+/* a1061 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1062(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_1062,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1068,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_1074,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);}
+
+/* a1073 in a1061 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1074(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_1074r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1074r(t0,t1,t2);}}
+
+static void C_ccall f_1074r(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_1080,a[2]=t2,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp);
+/* k112117 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1079 in a1073 in a1061 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1080(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_1080,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1067 in a1061 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1068(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_1068,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]);}
+
+/* a1036 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1037(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_1037,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1043,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li9),tmp=(C_word)a,a+=5,tmp);
+/* k112117 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1042 in a1036 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1043(C_word c,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_1043,2,t0,t1);}
+if(C_truep((C_word)C_i_structurep(((C_word*)t0)[3],lf[9]))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1054,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)f2971,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]);}}
+
+/* f2971 in a1042 in a1036 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f2971(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);}
+
+/* k1052 in a1042 in a1036 in a1030 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1054(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);}
+
+/* k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_919(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_919,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_922,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);
+/* g115116 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_922(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_922,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_925,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]);}
+
+/* k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_925(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_925,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_932,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]);}
+
+/* k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+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 t5;
+C_word ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_932,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_934,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_934(t5,((C_word*)t0)[2],t1,C_fix(0));}
+
+/* loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_fcall f_934(C_word t0,C_word 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_934,NULL,4,t0,t1,t2,t3);}
+t4=t2;
+t5=(C_word)C_eqp(C_fix(0),t4);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_944,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_950,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_966,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);}}
+
+/* a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_966(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_966,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_972,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_1007,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);}
+
+/* a1006 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1007(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_1007,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1013,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_1019,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);}
+
+/* a1018 in a1006 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1019(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_1019r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_1019r(t0,t1,t2);}}
+
+static void C_ccall f_1019r(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_1025,a[2]=t2,a[3]=((C_word)li4),tmp=(C_word)a,a+=4,tmp);
+/* k143148 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a1024 in a1018 in a1006 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1025(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_1025,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* a1012 in a1006 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_1013(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_1013,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]);}
+
+/* a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_972(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_972,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_978,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);
+/* k143148 */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a977 in a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_978(C_word c,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_978,2,t0,t1);}
+t2=(C_word)C_i_structurep(((C_word*)t0)[5],lf[9]);
+t3=(C_truep(t2)?(C_word)C_slot(((C_word*)t0)[5],C_fix(1)):C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_985,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]);}
+
+/* k983 in a977 in a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_985(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_985,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_988,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]);}
+
+/* k986 in k983 in a977 in a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_988(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_988,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_995,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_999,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]);}
+
+/* k997 in k986 in k983 in a977 in a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_999(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);}
+
+/* k993 in k986 in k983 in a977 in a971 in a965 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_995(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);}
+
+/* k948 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_950(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_950,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_953,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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);
+/* g146147 */
+t3=t1;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k951 in k948 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_953(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_953,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_960,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]);}
+
+/* k958 in k951 in k948 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_960(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_plus(((C_word*)t0)[5],((C_word*)t0)[4]);
+/* files.scm: 115 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_934(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k942 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_944(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_944,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_947,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]);}
+
+/* k945 in k942 in loop in k930 in k923 in k920 in k917 in k914 in k911 in k908 in k905 in k902 in k899 in k896 in body47 in file-copy in k864 in k861 in k858 */
+static void C_ccall f_947(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 k864 in k861 in k858 */
+static void C_ccall f_868(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_868,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_875,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,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);}
+
+/* k873 in delete-file* in k864 in k861 in k858 */
+static void C_ccall f_875(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_875,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_881,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* files.scm: 71 delete-file */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k879 in k873 in delete-file* in k864 in k861 in k858 */
+static void C_ccall f_881(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));}
+
+#ifdef C_ENABLE_PTABLES
+static C_PTABLE_ENTRY ptable[242] = {
+{"toplevel:files_scm",(void*)C_files_toplevel},
+{"f_860:files_scm",(void*)f_860},
+{"f_863:files_scm",(void*)f_863},
+{"f_866:files_scm",(void*)f_866},
+{"f_2821:files_scm",(void*)f_2821},
+{"f_2832:files_scm",(void*)f_2832},
+{"f_2829:files_scm",(void*)f_2829},
+{"f_2823:files_scm",(void*)f_2823},
+{"f_2794:files_scm",(void*)f_2794},
+{"f_2811:files_scm",(void*)f_2811},
+{"f_2802:files_scm",(void*)f_2802},
+{"f_2796:files_scm",(void*)f_2796},
+{"f_1642:files_scm",(void*)f_1642},
+{"f_2031:files_scm",(void*)f_2031},
+{"f_2034:files_scm",(void*)f_2034},
+{"f_2791:files_scm",(void*)f_2791},
+{"f_2708:files_scm",(void*)f_2708},
+{"f_2756:files_scm",(void*)f_2756},
+{"f_2759:files_scm",(void*)f_2759},
+{"f_2762:files_scm",(void*)f_2762},
+{"f_2769:files_scm",(void*)f_2769},
+{"f_2749:files_scm",(void*)f_2749},
+{"f_2666:files_scm",(void*)f_2666},
+{"f_2674:files_scm",(void*)f_2674},
+{"f_2676:files_scm",(void*)f_2676},
+{"f_2657:files_scm",(void*)f_2657},
+{"f_2369:files_scm",(void*)f_2369},
+{"f_2373:files_scm",(void*)f_2373},
+{"f_2387:files_scm",(void*)f_2387},
+{"f_2587:files_scm",(void*)f_2587},
+{"f_2591:files_scm",(void*)f_2591},
+{"f_2535:files_scm",(void*)f_2535},
+{"f_2571:files_scm",(void*)f_2571},
+{"f_2521:files_scm",(void*)f_2521},
+{"f_2397:files_scm",(void*)f_2397},
+{"f_2423:files_scm",(void*)f_2423},
+{"f_2426:files_scm",(void*)f_2426},
+{"f_2429:files_scm",(void*)f_2429},
+{"f_2477:files_scm",(void*)f_2477},
+{"f_2495:files_scm",(void*)f_2495},
+{"f_2485:files_scm",(void*)f_2485},
+{"f_2489:files_scm",(void*)f_2489},
+{"f_2432:files_scm",(void*)f_2432},
+{"f_2435:files_scm",(void*)f_2435},
+{"f_2438:files_scm",(void*)f_2438},
+{"f_2441:files_scm",(void*)f_2441},
+{"f_2461:files_scm",(void*)f_2461},
+{"f_2450:files_scm",(void*)f_2450},
+{"f_2457:files_scm",(void*)f_2457},
+{"f_2343:files_scm",(void*)f_2343},
+{"f_2268:files_scm",(void*)f_2268},
+{"f_2272:files_scm",(void*)f_2272},
+{"f_2325:files_scm",(void*)f_2325},
+{"f_2331:files_scm",(void*)f_2331},
+{"f_2275:files_scm",(void*)f_2275},
+{"f_2286:files_scm",(void*)f_2286},
+{"f_2316:files_scm",(void*)f_2316},
+{"f_2312:files_scm",(void*)f_2312},
+{"f_2293:files_scm",(void*)f_2293},
+{"f_2299:files_scm",(void*)f_2299},
+{"f_2307:files_scm",(void*)f_2307},
+{"f_2250:files_scm",(void*)f_2250},
+{"f_2262:files_scm",(void*)f_2262},
+{"f_2256:files_scm",(void*)f_2256},
+{"f_2232:files_scm",(void*)f_2232},
+{"f_2244:files_scm",(void*)f_2244},
+{"f_2238:files_scm",(void*)f_2238},
+{"f_2214:files_scm",(void*)f_2214},
+{"f_2226:files_scm",(void*)f_2226},
+{"f_2220:files_scm",(void*)f_2220},
+{"f_2196:files_scm",(void*)f_2196},
+{"f_2208:files_scm",(void*)f_2208},
+{"f_2202:files_scm",(void*)f_2202},
+{"f_2178:files_scm",(void*)f_2178},
+{"f_2190:files_scm",(void*)f_2190},
+{"f_2184:files_scm",(void*)f_2184},
+{"f_2163:files_scm",(void*)f_2163},
+{"f_2175:files_scm",(void*)f_2175},
+{"f_2169:files_scm",(void*)f_2169},
+{"f_2148:files_scm",(void*)f_2148},
+{"f_2160:files_scm",(void*)f_2160},
+{"f_2154:files_scm",(void*)f_2154},
+{"f_2133:files_scm",(void*)f_2133},
+{"f_2145:files_scm",(void*)f_2145},
+{"f_2139:files_scm",(void*)f_2139},
+{"f_2049:files_scm",(void*)f_2049},
+{"f_2065:files_scm",(void*)f_2065},
+{"f_2094:files_scm",(void*)f_2094},
+{"f_2119:files_scm",(void*)f_2119},
+{"f_2104:files_scm",(void*)f_2104},
+{"f_2075:files_scm",(void*)f_2075},
+{"f_2035:files_scm",(void*)f_2035},
+{"f_1952:files_scm",(void*)f_1952},
+{"f_1981:files_scm",(void*)f_1981},
+{"f_1976:files_scm",(void*)f_1976},
+{"f_1954:files_scm",(void*)f_1954},
+{"f_1962:files_scm",(void*)f_1962},
+{"f_1968:files_scm",(void*)f_1968},
+{"f_1965:files_scm",(void*)f_1965},
+{"f_1888:files_scm",(void*)f_1888},
+{"f_1904:files_scm",(void*)f_1904},
+{"f_1899:files_scm",(void*)f_1899},
+{"f_1890:files_scm",(void*)f_1890},
+{"f_1898:files_scm",(void*)f_1898},
+{"f_1802:files_scm",(void*)f_1802},
+{"f_1855:files_scm",(void*)f_1855},
+{"f_1831:files_scm",(void*)f_1831},
+{"f_1838:files_scm",(void*)f_1838},
+{"f_1771:files_scm",(void*)f_1771},
+{"f_1710:files_scm",(void*)f_1710},
+{"f_1719:files_scm",(void*)f_1719},
+{"f_1749:files_scm",(void*)f_1749},
+{"f_1757:files_scm",(void*)f_1757},
+{"f_1657:files_scm",(void*)f_1657},
+{"f_1673:files_scm",(void*)f_1673},
+{"f_1644:files_scm",(void*)f_1644},
+{"f_1655:files_scm",(void*)f_1655},
+{"f_1230:files_scm",(void*)f_1230},
+{"f_1590:files_scm",(void*)f_1590},
+{"f_1585:files_scm",(void*)f_1585},
+{"f_1232:files_scm",(void*)f_1232},
+{"f_1245:files_scm",(void*)f_1245},
+{"f_1578:files_scm",(void*)f_1578},
+{"f_1574:files_scm",(void*)f_1574},
+{"f_1248:files_scm",(void*)f_1248},
+{"f_1251:files_scm",(void*)f_1251},
+{"f_1567:files_scm",(void*)f_1567},
+{"f_1254:files_scm",(void*)f_1254},
+{"f_1550:files_scm",(void*)f_1550},
+{"f_1560:files_scm",(void*)f_1560},
+{"f_1257:files_scm",(void*)f_1257},
+{"f_1494:files_scm",(void*)f_1494},
+{"f_1525:files_scm",(void*)f_1525},
+{"f_1537:files_scm",(void*)f_1537},
+{"f_1543:files_scm",(void*)f_1543},
+{"f_1531:files_scm",(void*)f_1531},
+{"f_1500:files_scm",(void*)f_1500},
+{"f_1506:files_scm",(void*)f_1506},
+{"f2989:files_scm",(void*)f2989},
+{"f_1517:files_scm",(void*)f_1517},
+{"f_1260:files_scm",(void*)f_1260},
+{"f_1263:files_scm",(void*)f_1263},
+{"f_1439:files_scm",(void*)f_1439},
+{"f_1470:files_scm",(void*)f_1470},
+{"f_1482:files_scm",(void*)f_1482},
+{"f_1488:files_scm",(void*)f_1488},
+{"f_1476:files_scm",(void*)f_1476},
+{"f_1445:files_scm",(void*)f_1445},
+{"f_1451:files_scm",(void*)f_1451},
+{"f2985:files_scm",(void*)f2985},
+{"f_1462:files_scm",(void*)f_1462},
+{"f_1266:files_scm",(void*)f_1266},
+{"f_1269:files_scm",(void*)f_1269},
+{"f_1272:files_scm",(void*)f_1272},
+{"f_1279:files_scm",(void*)f_1279},
+{"f_1281:files_scm",(void*)f_1281},
+{"f_1374:files_scm",(void*)f_1374},
+{"f_1415:files_scm",(void*)f_1415},
+{"f_1427:files_scm",(void*)f_1427},
+{"f_1433:files_scm",(void*)f_1433},
+{"f_1421:files_scm",(void*)f_1421},
+{"f_1380:files_scm",(void*)f_1380},
+{"f_1386:files_scm",(void*)f_1386},
+{"f_1393:files_scm",(void*)f_1393},
+{"f_1396:files_scm",(void*)f_1396},
+{"f_1407:files_scm",(void*)f_1407},
+{"f_1403:files_scm",(void*)f_1403},
+{"f_1358:files_scm",(void*)f_1358},
+{"f_1361:files_scm",(void*)f_1361},
+{"f_1368:files_scm",(void*)f_1368},
+{"f_1291:files_scm",(void*)f_1291},
+{"f_1294:files_scm",(void*)f_1294},
+{"f_1302:files_scm",(void*)f_1302},
+{"f_1333:files_scm",(void*)f_1333},
+{"f_1345:files_scm",(void*)f_1345},
+{"f_1351:files_scm",(void*)f_1351},
+{"f_1339:files_scm",(void*)f_1339},
+{"f_1308:files_scm",(void*)f_1308},
+{"f_1314:files_scm",(void*)f_1314},
+{"f2979:files_scm",(void*)f2979},
+{"f_1325:files_scm",(void*)f_1325},
+{"f_1297:files_scm",(void*)f_1297},
+{"f_1300:files_scm",(void*)f_1300},
+{"f_883:files_scm",(void*)f_883},
+{"f_1182:files_scm",(void*)f_1182},
+{"f_1177:files_scm",(void*)f_1177},
+{"f_885:files_scm",(void*)f_885},
+{"f_898:files_scm",(void*)f_898},
+{"f_1170:files_scm",(void*)f_1170},
+{"f_1166:files_scm",(void*)f_1166},
+{"f_901:files_scm",(void*)f_901},
+{"f_904:files_scm",(void*)f_904},
+{"f_1159:files_scm",(void*)f_1159},
+{"f_907:files_scm",(void*)f_907},
+{"f_1142:files_scm",(void*)f_1142},
+{"f_1152:files_scm",(void*)f_1152},
+{"f_910:files_scm",(void*)f_910},
+{"f_1086:files_scm",(void*)f_1086},
+{"f_1117:files_scm",(void*)f_1117},
+{"f_1129:files_scm",(void*)f_1129},
+{"f_1135:files_scm",(void*)f_1135},
+{"f_1123:files_scm",(void*)f_1123},
+{"f_1092:files_scm",(void*)f_1092},
+{"f_1098:files_scm",(void*)f_1098},
+{"f2975:files_scm",(void*)f2975},
+{"f_1109:files_scm",(void*)f_1109},
+{"f_913:files_scm",(void*)f_913},
+{"f_916:files_scm",(void*)f_916},
+{"f_1031:files_scm",(void*)f_1031},
+{"f_1062:files_scm",(void*)f_1062},
+{"f_1074:files_scm",(void*)f_1074},
+{"f_1080:files_scm",(void*)f_1080},
+{"f_1068:files_scm",(void*)f_1068},
+{"f_1037:files_scm",(void*)f_1037},
+{"f_1043:files_scm",(void*)f_1043},
+{"f2971:files_scm",(void*)f2971},
+{"f_1054:files_scm",(void*)f_1054},
+{"f_919:files_scm",(void*)f_919},
+{"f_922:files_scm",(void*)f_922},
+{"f_925:files_scm",(void*)f_925},
+{"f_932:files_scm",(void*)f_932},
+{"f_934:files_scm",(void*)f_934},
+{"f_966:files_scm",(void*)f_966},
+{"f_1007:files_scm",(void*)f_1007},
+{"f_1019:files_scm",(void*)f_1019},
+{"f_1025:files_scm",(void*)f_1025},
+{"f_1013:files_scm",(void*)f_1013},
+{"f_972:files_scm",(void*)f_972},
+{"f_978:files_scm",(void*)f_978},
+{"f_985:files_scm",(void*)f_985},
+{"f_988:files_scm",(void*)f_988},
+{"f_999:files_scm",(void*)f_999},
+{"f_995:files_scm",(void*)f_995},
+{"f_950:files_scm",(void*)f_950},
+{"f_953:files_scm",(void*)f_953},
+{"f_960:files_scm",(void*)f_960},
+{"f_944:files_scm",(void*)f_944},
+{"f_947:files_scm",(void*)f_947},
+{"f_868:files_scm",(void*)f_868},
+{"f_875:files_scm",(void*)f_875},
+{"f_881:files_scm",(void*)f_881},
+{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
new file mode 100644
index 00000000..35f66644
--- /dev/null
+++ b/bootstrap/library.c
@@ -0,0 +1,38011 @@
+/* Generated from library.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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
+
+#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[1042];
+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,49,32,102,114,111,109,49,51,50,32,116,111,49,51,51,32,46,32,108,111,99,49,51,52,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,54,32,46,32,108,111,99,49,52,55,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,53,32,46,32,108,111,99,49,53,54,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,51,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,55,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,56,41,0};
+static C_char C_TLS li59[] C_aligned={C_lihdr(0,0,10),40,110,111,116,32,120,49,56,53,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,55,41,0};
+static C_char C_TLS li61[] C_aligned={C_lihdr(0,0,15),40,101,113,63,32,120,49,56,57,32,121,49,57,48,41,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,16),40,101,113,118,63,32,120,49,57,50,32,121,49,57,51,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,53,32,121,49,57,54,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,56,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,50,48,48,32,121,50,48,49,41};
+static C_char C_TLS li66[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,56,54,32,120,50,48,51,41,0,0,0};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,56,57,32,120,50,48,53,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,55,32,121,50,48,56,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,49,48,32,121,50,49,49,41,0,0,0,0};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,13),40,102,95,54,53,57,56,32,120,50,49,51,41,0,0,0};
+static C_char C_TLS li71[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,48,49,32,120,50,49,53,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,55,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,57,41,0,0,0};
+static C_char C_TLS li74[] 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 li75[] 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 li76[] 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 li77[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,52,48,32,120,50,50,55,41,0,0,0};
+static C_char C_TLS li78[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,53,52,32,120,50,50,57,41,0,0,0};
+static C_char C_TLS li79[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,54,48,32,120,50,51,49,41,0,0,0};
+static C_char C_TLS li80[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,54,55,32,120,50,51,51,41,0,0,0};
+static C_char C_TLS li81[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,56,49,32,120,50,51,53,41,0,0,0};
+static C_char C_TLS li82[] C_aligned={C_lihdr(0,0,13),40,102,95,54,54,56,55,32,120,50,51,55,41,0,0,0};
+static C_char C_TLS li83[] C_aligned={C_lihdr(0,0,13),40,102,95,54,55,48,49,32,120,50,51,57,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,52,49,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,51,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,53,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,55,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,57,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,53,49,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,51,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,53,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,55,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,57,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,54,49,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,51,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,53,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,55,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,57,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,55,49,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,51,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,53,32,105,50,55,54,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,56,32,105,50,55,57,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,52,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,56,49,32,108,115,116,50,56,50,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,51,32,46,32,108,111,99,50,57,52,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,53,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,51,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,51,48,49,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,50,49,32,114,101,115,116,51,50,50,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,57,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,53,32,108,115,116,51,51,54,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,56,32,108,115,116,51,51,57,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,52,49,32,108,115,116,51,52,50,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,52,32,108,115,116,51,52,53,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,55,32,108,115,116,51,52,56,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,53,48,32,108,115,116,51,53,49,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,51,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,53,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,55,41,0,0,0,0};
+static C_char C_TLS li120[] C_aligned={C_lihdr(0,0,18),40,102,95,55,48,57,53,32,115,51,53,57,32,105,51,54,48,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,54,50,32,105,51,54,51,32,99,51,54,52,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,51,32,46,32,116,109,112,51,55,50,51,55,52,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,54,32,46,32,102,105,108,108,51,56,55,41,0};
+static C_char C_TLS li124[] C_aligned={C_lihdr(0,0,11),40,108,111,111,112,32,105,52,48,53,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,52,48,50,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,55,32,108,115,116,52,50,50,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,57,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,56,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,56,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,53,49,32,99,52,53,50,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,54,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,51,32,115,116,97,114,116,52,54,52,32,46,32,101,110,100,52,54,53,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,52,32,115,116,97,114,116,52,56,53,32,101,110,100,52,56,54,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,57,48,32,121,52,57,49,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,55,32,121,52,57,56,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,53,48,48,32,115,50,53,48,49,32,108,111,99,53,48,50,32,107,53,48,51,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,50,49,32,108,101,110,49,53,49,48,32,108,101,110,50,53,49,49,32,99,109,112,53,49,50,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,56,32,115,50,53,48,57,41,0,0};
+static C_char C_TLS li139[] C_aligned={C_lihdr(0,0,30),40,97,55,52,52,53,32,108,101,110,49,53,50,50,32,108,101,110,50,53,50,51,32,99,109,112,53,50,52,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,50,48,32,115,50,53,50,49,41,0,0};
+static C_char C_TLS li141[] C_aligned={C_lihdr(0,0,30),40,97,55,52,54,57,32,108,101,110,49,53,51,52,32,108,101,110,50,53,51,53,32,99,109,112,53,51,54,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,51,50,32,115,50,53,51,51,41,0};
+static C_char C_TLS li143[] C_aligned={C_lihdr(0,0,30),40,97,55,52,57,48,32,108,101,110,49,53,51,57,32,108,101,110,50,53,52,48,32,99,109,112,53,52,49,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,55,32,115,50,53,51,56,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,55,32,115,50,53,52,56,32,108,111,99,53,52,57,32,107,53,53,48,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,51,49,32,108,101,110,49,53,53,55,32,108,101,110,50,53,53,56,32,99,109,112,53,53,57,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,53,32,115,50,53,53,54,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,53,53,32,108,101,110,49,53,54,57,32,108,101,110,50,53,55,48,32,99,109,112,53,55,49,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,55,32,115,50,53,54,56,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,55,57,32,108,101,110,49,53,56,49,32,108,101,110,50,53,56,50,32,99,109,112,53,56,51,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,57,32,115,50,53,56,48,41,0,0,0,0,0,0};
+static C_char C_TLS li152[] C_aligned={C_lihdr(0,0,30),40,97,55,54,48,48,32,108,101,110,49,53,56,54,32,108,101,110,50,53,56,55,32,99,109,112,53,56,56,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,52,32,115,50,53,56,53,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,52,32,121,53,57,53,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,54,32,110,54,48,55,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,54,48,51,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,53,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,50,50,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,55,32,102,115,54,49,56,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,52,49,41,0,0};
+static C_char C_TLS li161[] C_aligned={C_lihdr(0,0,15),40,102,120,43,32,120,54,52,51,32,121,54,52,52,41,0};
+static C_char C_TLS li162[] C_aligned={C_lihdr(0,0,15),40,102,120,45,32,120,54,52,54,32,121,54,52,55,41,0};
+static C_char C_TLS li163[] C_aligned={C_lihdr(0,0,15),40,102,120,42,32,120,54,52,57,32,121,54,53,48,41,0};
+static C_char C_TLS li164[] C_aligned={C_lihdr(0,0,15),40,102,120,61,32,120,54,53,50,32,121,54,53,51,41,0};
+static C_char C_TLS li165[] C_aligned={C_lihdr(0,0,15),40,102,120,62,32,120,54,53,53,32,121,54,53,54,41,0};
+static C_char C_TLS li166[] C_aligned={C_lihdr(0,0,15),40,102,120,60,32,120,54,53,56,32,121,54,53,57,41,0};
+static C_char C_TLS li167[] C_aligned={C_lihdr(0,0,16),40,102,120,62,61,32,120,54,54,49,32,121,54,54,50,41};
+static C_char C_TLS li168[] C_aligned={C_lihdr(0,0,16),40,102,120,60,61,32,120,54,54,52,32,121,54,54,53,41};
+static C_char C_TLS li169[] C_aligned={C_lihdr(0,0,17),40,102,120,109,105,110,32,120,54,54,55,32,121,54,54,56,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,55,48,32,121,54,55,49,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,55,51,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,55,53,32,121,54,55,54,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,56,32,121,54,55,57,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,56,49,32,121,54,56,50,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,56,52,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,56,54,32,121,54,56,55,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,57,32,121,54,57,48,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,57,51,32,121,54,57,52,41,0};
+static C_char C_TLS li179[] C_aligned={C_lihdr(0,0,17),40,102,120,109,111,100,32,120,55,49,49,32,121,55,49,50,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,53,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,54,49,41,0,0};
+static C_char C_TLS li182[] C_aligned={C_lihdr(0,0,15),40,102,112,43,32,120,55,54,54,32,121,55,54,55,41,0};
+static C_char C_TLS li183[] C_aligned={C_lihdr(0,0,15),40,102,112,45,32,120,55,56,54,32,121,55,56,55,41,0};
+static C_char C_TLS li184[] C_aligned={C_lihdr(0,0,15),40,102,112,42,32,120,56,48,54,32,121,56,48,55,41,0};
+static C_char C_TLS li185[] C_aligned={C_lihdr(0,0,15),40,102,112,47,32,120,56,50,54,32,121,56,50,55,41,0};
+static C_char C_TLS li186[] C_aligned={C_lihdr(0,0,15),40,102,112,61,32,120,56,52,54,32,121,56,52,55,41,0};
+static C_char C_TLS li187[] C_aligned={C_lihdr(0,0,15),40,102,112,62,32,120,56,54,54,32,121,56,54,55,41,0};
+static C_char C_TLS li188[] C_aligned={C_lihdr(0,0,15),40,102,112,60,32,120,56,56,54,32,121,56,56,55,41,0};
+static C_char C_TLS li189[] C_aligned={C_lihdr(0,0,16),40,102,112,62,61,32,120,57,48,54,32,121,57,48,55,41};
+static C_char C_TLS li190[] C_aligned={C_lihdr(0,0,16),40,102,112,60,61,32,120,57,50,54,32,121,57,50,55,41};
+static C_char C_TLS li191[] C_aligned={C_lihdr(0,0,12),40,102,112,110,101,103,32,120,57,52,54,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,54,50,32,121,57,54,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,56,50,32,121,57,56,51,41,0,0,0,0,0,0,0};
+static C_char C_TLS li194[] C_aligned={C_lihdr(0,0,15),40,102,112,102,108,111,111,114,32,120,49,48,48,50,41,0};
+static C_char C_TLS li195[] C_aligned={C_lihdr(0,0,18),40,102,112,116,114,117,110,99,97,116,101,32,120,49,48,49,56,41,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,51,52,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,53,48,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,54,54,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,56,50,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,57,56,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,49,49,52,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,49,51,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,52,54,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,54,50,32,121,49,49,54,51,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,56,50,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,57,56,32,121,49,49,57,57,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,50,49,56,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,50,51,52,41,0,0};
+static C_char C_TLS li209[] C_aligned={C_lihdr(0,0,7),67,95,116,105,109,101,115,0};
+static C_char C_TLS li210[] C_aligned={C_lihdr(0,0,7),67,95,109,105,110,117,115,0};
+static C_char C_TLS li211[] C_aligned={C_lihdr(0,0,6),67,95,112,108,117,115,0,0};
+static C_char C_TLS li212[] C_aligned={C_lihdr(0,0,8),67,95,100,105,118,105,100,101};
+static C_char C_TLS li213[] 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 li214[] 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 li215[] C_aligned={C_lihdr(0,0,7),67,95,108,101,115,115,112,0};
+static C_char C_TLS li216[] 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 li217[] 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 li218[] C_aligned={C_lihdr(0,0,12),40,97,100,100,49,32,110,49,50,52,57,41,0,0,0,0};
+static C_char C_TLS li219[] C_aligned={C_lihdr(0,0,12),40,115,117,98,49,32,110,49,50,53,48,41,0,0,0,0};
+static C_char C_TLS li220[] 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 li221[] 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,53,50,41,0,0,0};
+static C_char C_TLS li222[] C_aligned={C_lihdr(0,0,17),40,114,97,116,105,111,110,97,108,63,32,110,49,50,53,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li223[] 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 li224[] 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,53,54,41,0,0};
+static C_char C_TLS li225[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,101,120,97,99,116,63,32,120,49,50,53,56,41,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,101,120,97,99,116,63,32,120,49,50,54,48,41,0,0};
+static C_char C_TLS li227[] C_aligned={C_lihdr(0,0,6),67,95,101,120,112,116,0,0};
+static C_char C_TLS li228[] 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,54,50,41,0,0,0,0,0,0};
+static C_char C_TLS li229[] 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,54,52,41,0,0,0,0,0};
+static C_char C_TLS li230[] 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,54,54,41,0,0,0};
+static C_char C_TLS li231[] 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,54,56,41,0,0,0,0};
+static C_char C_TLS li232[] C_aligned={C_lihdr(0,0,13),40,122,101,114,111,63,32,110,49,50,55,48,41,0,0,0};
+static C_char C_TLS li233[] C_aligned={C_lihdr(0,0,17),40,112,111,115,105,116,105,118,101,63,32,110,49,50,55,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li234[] C_aligned={C_lihdr(0,0,17),40,110,101,103,97,116,105,118,101,63,32,110,49,50,55,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li235[] C_aligned={C_lihdr(0,0,11),40,97,98,115,32,110,49,50,55,54,41,0,0,0,0,0};
+static C_char C_TLS li236[] C_aligned={C_lihdr(0,0,13),40,97,110,103,108,101,32,110,49,50,55,56,41,0,0,0};
+static C_char C_TLS li237[] C_aligned={C_lihdr(0,0,17),40,114,101,97,108,45,112,97,114,116,32,110,49,50,56,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li238[] C_aligned={C_lihdr(0,0,17),40,105,109,97,103,45,112,97,114,116,32,110,49,50,56,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li239[] C_aligned={C_lihdr(0,0,17),40,110,117,109,101,114,97,116,111,114,32,110,49,50,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li240[] C_aligned={C_lihdr(0,0,19),40,100,101,110,111,109,105,110,97,116,111,114,32,110,49,50,57,48,41,0,0,0,0,0};
+static C_char C_TLS li241[] C_aligned={C_lihdr(0,0,14),40,115,105,103,110,117,109,32,110,49,50,57,51,41,0,0};
+static C_char C_TLS li242[] 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 li243[] 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,51,48,49,41,0,0,0,0};
+static C_char C_TLS li244[] C_aligned={C_lihdr(0,0,13),40,102,108,111,111,114,32,120,49,51,48,51,41,0,0,0};
+static C_char C_TLS li245[] C_aligned={C_lihdr(0,0,15),40,99,101,105,108,105,110,103,32,120,49,51,48,54,41,0};
+static C_char C_TLS li246[] C_aligned={C_lihdr(0,0,16),40,116,114,117,110,99,97,116,101,32,120,49,51,48,57,41};
+static C_char C_TLS li247[] C_aligned={C_lihdr(0,0,13),40,114,111,117,110,100,32,120,49,51,49,50,41,0,0,0};
+static C_char C_TLS li248[] C_aligned={C_lihdr(0,0,23),40,114,101,109,97,105,110,100,101,114,32,120,49,51,49,52,32,121,49,51,49,53,41,0};
+static C_char C_TLS li249[] C_aligned={C_lihdr(0,0,20),40,109,111,100,117,108,111,32,120,49,51,49,55,32,121,49,51,49,56,41,0,0,0,0};
+static C_char C_TLS li250[] C_aligned={C_lihdr(0,0,13),40,101,118,101,110,63,32,110,49,51,50,52,41,0,0,0};
+static C_char C_TLS li251[] C_aligned={C_lihdr(0,0,12),40,111,100,100,63,32,110,49,51,50,54,41,0,0,0,0};
+static C_char C_TLS li252[] C_aligned={C_lihdr(0,0,23),40,108,111,111,112,32,110,98,101,115,116,49,51,51,52,32,110,115,49,51,51,53,41,0};
+static C_char C_TLS li253[] C_aligned={C_lihdr(0,0,31),40,109,97,120,109,105,110,32,110,49,49,51,51,48,32,110,115,49,51,51,49,32,112,114,101,100,49,51,51,50,41,0};
+static C_char C_TLS li254[] C_aligned={C_lihdr(0,0,21),40,109,97,120,32,110,49,49,51,52,50,32,46,32,110,115,49,51,52,51,41,0,0,0};
+static C_char C_TLS li255[] C_aligned={C_lihdr(0,0,21),40,109,105,110,32,110,49,49,51,52,52,32,46,32,110,115,49,51,52,53,41,0,0,0};
+static C_char C_TLS li256[] C_aligned={C_lihdr(0,0,11),40,101,120,112,32,110,49,51,52,57,41,0,0,0,0,0};
+static C_char C_TLS li257[] C_aligned={C_lihdr(0,0,11),40,108,111,103,32,110,49,51,53,49,41,0,0,0,0,0};
+static C_char C_TLS li258[] C_aligned={C_lihdr(0,0,11),40,115,105,110,32,110,49,51,53,51,41,0,0,0,0,0};
+static C_char C_TLS li259[] C_aligned={C_lihdr(0,0,11),40,99,111,115,32,110,49,51,53,53,41,0,0,0,0,0};
+static C_char C_TLS li260[] C_aligned={C_lihdr(0,0,11),40,116,97,110,32,110,49,51,53,55,41,0,0,0,0,0};
+static C_char C_TLS li261[] C_aligned={C_lihdr(0,0,12),40,97,115,105,110,32,110,49,51,53,57,41,0,0,0,0};
+static C_char C_TLS li262[] C_aligned={C_lihdr(0,0,12),40,97,99,111,115,32,110,49,51,54,49,41,0,0,0,0};
+static C_char C_TLS li263[] C_aligned={C_lihdr(0,0,12),40,115,113,114,116,32,110,49,51,54,51,41,0,0,0,0};
+static C_char C_TLS li264[] C_aligned={C_lihdr(0,0,22),40,97,116,97,110,32,110,49,49,51,54,53,32,46,32,110,50,49,51,54,54,41,0,0};
+static C_char C_TLS li265[] C_aligned={C_lihdr(0,0,18),40,108,111,111,112,32,120,49,51,55,50,32,121,49,51,55,51,41,0,0,0,0,0,0};
+static C_char C_TLS li266[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,103,99,100,32,120,49,51,54,57,32,121,49,51,55,48,41,0};
+static C_char C_TLS li267[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,110,115,49,51,55,56,32,102,49,51,55,57,41,0,0,0,0,0};
+static C_char C_TLS li268[] C_aligned={C_lihdr(0,0,14),40,103,99,100,32,46,32,110,115,49,51,55,54,41,0,0};
+static C_char C_TLS li269[] C_aligned={C_lihdr(0,0,23),40,35,35,115,121,115,35,108,99,109,32,120,49,51,57,55,32,121,49,51,57,56,41,0};
+static C_char C_TLS li270[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,110,115,49,52,48,50,32,102,49,52,48,51,41,0,0,0,0,0};
+static C_char C_TLS li271[] C_aligned={C_lihdr(0,0,14),40,108,99,109,32,46,32,110,115,49,52,48,48,41,0,0};
+static C_char C_TLS li272[] 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 li273[] 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 li274[] 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,50,54,49,52,50,55,41,0,0};
+static C_char C_TLS li275[] 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 li276[] C_aligned={C_lihdr(0,0,15),40,115,121,109,98,111,108,63,32,120,49,52,51,57,41,0};
+static C_char C_TLS li277[] 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 li278[] 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,52,49,41,0,0};
+static C_char C_TLS li279[] 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,52,51,41,0,0};
+static C_char C_TLS li280[] C_aligned={C_lihdr(0,0,15),40,115,112,108,105,116,32,108,101,110,49,52,52,57,41,0};
+static C_char C_TLS li281[] 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,53,53,41,0,0,0,0};
+static C_char C_TLS li282[] 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,54,48,41,0,0};
+static C_char C_TLS li283[] 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,54,53,41,0,0,0};
+static C_char C_TLS li284[] 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,55,54,41,0};
+static C_char C_TLS li285[] 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,56,48,32,115,116,114,49,52,56,49,41,0,0,0,0,0};
+static C_char C_TLS li286[] 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,56,51,41,0,0};
+static C_char C_TLS li287[] 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,56,54,41};
+static C_char C_TLS li288[] 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,56,57,41,0,0,0,0,0};
+static C_char C_TLS li289[] 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,57,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li290[] C_aligned={C_lihdr(0,0,16),40,107,101,121,119,111,114,100,63,32,120,49,53,49,49,41};
+static C_char C_TLS li291[] 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,53,49,53,41,0};
+static C_char C_TLS li292[] 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,49,56,41};
+static C_char C_TLS li293[] 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,50,48,32,97,114,103,115,48,49,53,50,49,32,46,32,100,101,102,97,117,108,116,49,53,50,50,41,0,0,0,0,0};
+static C_char C_TLS li294[] 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,51,49,41,0,0,0,0,0,0};
+static C_char C_TLS li295[] C_aligned={C_lihdr(0,0,20),40,109,97,107,101,45,98,108,111,98,32,115,105,122,101,49,53,51,53,41,0,0,0,0};
+static C_char C_TLS li296[] C_aligned={C_lihdr(0,0,13),40,98,108,111,98,63,32,120,49,53,51,56,41,0,0,0};
+static C_char C_TLS li297[] C_aligned={C_lihdr(0,0,18),40,98,108,111,98,45,115,105,122,101,32,98,118,49,53,52,50,41,0,0,0,0,0,0};
+static C_char C_TLS li298[] C_aligned={C_lihdr(0,0,20),40,115,116,114,105,110,103,45,62,98,108,111,98,32,115,49,53,52,53,41,0,0,0,0};
+static C_char C_TLS li299[] 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,53,50,41,0,0,0};
+static C_char C_TLS li300[] C_aligned={C_lihdr(0,0,22),40,98,108,111,98,61,63,32,98,49,49,53,53,57,32,98,50,49,53,54,48,41,0,0};
+static C_char C_TLS li301[] C_aligned={C_lihdr(0,0,15),40,118,101,99,116,111,114,63,32,120,49,53,54,55,41,0};
+static C_char C_TLS li302[] 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,54,57,41,0,0,0};
+static C_char C_TLS li303[] C_aligned={C_lihdr(0,0,20),40,102,95,57,51,51,48,32,118,49,53,55,49,32,105,49,53,55,50,41,0,0,0,0};
+static C_char C_TLS li304[] C_aligned={C_lihdr(0,0,31),40,118,101,99,116,111,114,45,115,101,116,33,32,118,49,53,55,52,32,105,49,53,55,53,32,120,49,53,55,54,41,0};
+static C_char C_TLS li305[] 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,55,56,32,46,32,102,105,108,108,49,53,55,57,41,0};
+static C_char C_TLS li306[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,53,57,57,41,0,0,0,0};
+static C_char C_TLS li307[] 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,56,57,41,0};
+static C_char C_TLS li308[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,49,54,48,54,41,0,0,0,0};
+static C_char C_TLS li309[] C_aligned={C_lihdr(0,0,20),40,118,101,99,116,111,114,45,62,108,105,115,116,32,118,49,54,48,51,41,0,0,0,0};
+static C_char C_TLS li310[] C_aligned={C_lihdr(0,0,17),40,118,101,99,116,111,114,32,46,32,120,115,49,54,49,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li311[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,54,49,53,41,0,0,0,0};
+static C_char C_TLS li312[] C_aligned={C_lihdr(0,0,26),40,118,101,99,116,111,114,45,102,105,108,108,33,32,118,49,54,49,50,32,120,49,54,49,51,41,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,54,52,50,41,0,0,0,0};
+static C_char C_TLS li314[] 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,50,52,32,116,111,49,54,50,53,32,46,32,110,49,54,50,54,41,0,0};
+static C_char C_TLS li315[] 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,54,48,32,110,49,54,54,49,32,46,32,116,109,112,49,54,53,57,49,54,54,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li316[] C_aligned={C_lihdr(0,0,12),40,100,111,108,111,111,112,49,54,55,54,41,0,0,0,0};
+static C_char C_TLS li317[] 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,55,49,32,110,49,54,55,50,32,105,110,105,116,49,54,55,51,41};
+static C_char C_TLS li318[] C_aligned={C_lihdr(0,0,13),40,99,104,97,114,63,32,120,49,54,56,52,41,0,0,0};
+static C_char C_TLS li319[] 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,56,54,41,0,0,0};
+static C_char C_TLS li320[] 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,56,57,41,0,0,0};
+static C_char C_TLS li321[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,61,63,32,99,49,49,54,57,50,32,99,50,49,54,57,51,41,0,0};
+static C_char C_TLS li322[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,62,63,32,99,49,49,54,57,55,32,99,50,49,54,57,56,41,0,0};
+static C_char C_TLS li323[] C_aligned={C_lihdr(0,0,22),40,99,104,97,114,60,63,32,99,49,49,55,48,50,32,99,50,49,55,48,51,41,0,0};
+static C_char C_TLS li324[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,62,61,63,32,99,49,49,55,48,55,32,99,50,49,55,48,56,41,0};
+static C_char C_TLS li325[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,60,61,63,32,99,49,49,55,49,50,32,99,50,49,55,49,51,41,0};
+static C_char C_TLS li326[] C_aligned={C_lihdr(0,0,19),40,99,104,97,114,45,117,112,99,97,115,101,32,99,49,55,49,55,41,0,0,0,0,0};
+static C_char C_TLS li327[] 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,50,48,41,0,0,0};
+static C_char C_TLS li328[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,61,63,32,120,49,55,50,51,32,121,49,55,50,52,41,0};
+static C_char C_TLS li329[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,62,63,32,120,49,55,50,53,32,121,49,55,50,54,41,0};
+static C_char C_TLS li330[] C_aligned={C_lihdr(0,0,23),40,99,104,97,114,45,99,105,60,63,32,120,49,55,50,55,32,121,49,55,50,56,41,0};
+static C_char C_TLS li331[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,99,105,62,61,63,32,120,49,55,50,57,32,121,49,55,51,48,41};
+static C_char C_TLS li332[] C_aligned={C_lihdr(0,0,24),40,99,104,97,114,45,99,105,60,61,63,32,120,49,55,51,49,32,121,49,55,51,50,41};
+static C_char C_TLS li333[] 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,51,56,41};
+static C_char C_TLS li334[] 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,52,49,41};
+static C_char C_TLS li335[] 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,52,52,41,0,0,0};
+static C_char C_TLS li336[] 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,52,55,41};
+static C_char C_TLS li337[] 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,53,48,41};
+static C_char C_TLS li338[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li339[] C_aligned={C_lihdr(0,0,19),40,108,111,111,107,117,112,45,99,104,97,114,32,99,49,55,53,53,41,0,0,0,0,0};
+static C_char C_TLS li340[] C_aligned={C_lihdr(0,0,25),40,99,104,97,114,45,110,97,109,101,32,120,49,55,54,53,32,46,32,121,49,55,54,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li341[] C_aligned={C_lihdr(0,0,18),40,112,114,111,99,101,100,117,114,101,63,32,120,49,55,57,53,41,0,0,0,0,0,0};
+static C_char C_TLS li342[] C_aligned={C_lihdr(0,0,7),67,95,97,112,112,108,121,0};
+static C_char C_TLS li343[] 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 li344[] 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,57,55,41,0,0,0,0,0};
+static C_char C_TLS li345[] 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 li346[] 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,57,57,32,120,49,56,48,48,41,0,0,0,0,0,0};
+static C_char C_TLS li347[] C_aligned={C_lihdr(0,0,8),67,95,118,97,108,117,101,115};
+static C_char C_TLS li348[] 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 li349[] 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 li350[] 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,56,48,50,32,108,115,116,48,49,56,48,51,41,0};
+static C_char C_TLS li351[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,49,56,50,50,41,0,0};
+static C_char C_TLS li352[] C_aligned={C_lihdr(0,0,26),40,35,35,115,121,115,35,109,97,112,32,112,49,56,49,57,32,108,115,116,48,49,56,50,48,41,0,0,0,0,0,0};
+static C_char C_TLS li353[] C_aligned={C_lihdr(0,0,42),40,109,97,112,115,97,102,101,32,112,49,56,51,56,32,108,115,116,115,49,56,51,57,32,115,116,97,114,116,49,56,52,48,32,108,111,99,49,56,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li354[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li355[] C_aligned={C_lihdr(0,0,34),40,99,104,101,99,107,32,108,115,116,115,49,56,53,51,32,115,116,97,114,116,49,56,53,52,32,108,111,99,49,56,53,53,41,0,0,0,0,0,0};
+static C_char C_TLS li356[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,56,55,51,32,103,49,56,55,55,49,56,55,57,41,0,0,0,0};
+static C_char C_TLS li357[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,97,108,108,49,56,56,53,41,0,0};
+static C_char C_TLS li358[] C_aligned={C_lihdr(0,0,37),40,102,111,114,45,101,97,99,104,32,102,110,49,56,54,56,32,108,115,116,49,49,56,54,57,32,46,32,108,115,116,115,49,56,55,48,41,0,0,0};
+static C_char C_TLS li359[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,49,57,48,48,32,103,49,57,49,48,49,57,49,52,41,0,0,0,0};
+static C_char C_TLS li360[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,97,108,108,49,57,50,50,41,0,0};
+static C_char C_TLS li361[] C_aligned={C_lihdr(0,0,32),40,109,97,112,32,102,110,49,56,57,53,32,108,115,116,49,49,56,57,54,32,46,32,108,115,116,115,49,56,57,55,41};
+static C_char C_TLS li362[] C_aligned={C_lihdr(0,0,22),40,97,49,48,51,56,53,32,46,32,114,101,115,117,108,116,115,49,57,51,57,41,0,0};
+static C_char C_TLS li363[] 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,51,54,32,116,104,117,110,107,49,57,51,55,32,97,102,116,101,114,49,57,51,56,41,0,0,0};
+static C_char C_TLS li364[] C_aligned={C_lihdr(0,0,22),40,97,49,48,52,49,53,32,46,32,114,101,115,117,108,116,115,49,57,52,56,41,0,0};
+static C_char C_TLS li365[] C_aligned={C_lihdr(0,0,17),40,97,49,48,52,48,57,32,99,111,110,116,49,57,52,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li366[] 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,52,53,41,0,0,0,0,0,0,0};
+static C_char C_TLS li367[] 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,53,51,32,110,49,57,53,52,41,0,0};
+static C_char C_TLS li368[] 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,55,52,41,0};
+static C_char C_TLS li369[] 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,55,56,41,0,0,0};
+static C_char C_TLS li370[] 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 li371[] 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,56,48,32,116,104,117,110,107,49,57,56,49,41,0,0,0,0};
+static C_char C_TLS li372[] C_aligned={C_lihdr(0,0,8),40,97,49,48,53,54,48,41};
+static C_char C_TLS li373[] 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,56,56,32,46,32,118,97,108,115,49,57,56,57,41,0,0};
+static C_char C_TLS li374[] C_aligned={C_lihdr(0,0,13),40,112,111,114,116,63,32,120,49,57,57,50,41,0,0,0};
+static C_char C_TLS li375[] C_aligned={C_lihdr(0,0,19),40,105,110,112,117,116,45,112,111,114,116,63,32,120,49,57,57,53,41,0,0,0,0,0};
+static C_char C_TLS li376[] C_aligned={C_lihdr(0,0,20),40,111,117,116,112,117,116,45,112,111,114,116,63,32,120,50,48,48,52,41,0,0,0,0};
+static C_char C_TLS li377[] 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,50,48,49,51,32,99,108,97,115,115,50,48,49,52,32,110,97,109,101,50,48,49,53,32,116,121,112,101,50,48,49,54,41,0,0,0};
+static C_char C_TLS li378[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,55,51,32,112,50,48,50,52,41,0,0};
+static C_char C_TLS li379[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,55,54,32,112,50,48,50,53,41,0,0};
+static C_char C_TLS li380[] C_aligned={C_lihdr(0,0,20),40,97,50,49,57,55,57,32,112,50,48,50,54,32,99,50,48,50,55,41,0,0,0,0};
+static C_char C_TLS li381[] C_aligned={C_lihdr(0,0,20),40,97,50,49,57,56,50,32,112,50,48,50,56,32,115,50,48,50,57,41,0,0,0,0};
+static C_char C_TLS li382[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,56,53,32,112,50,48,51,48,41,0,0};
+static C_char C_TLS li383[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,57,49,32,112,50,48,51,50,41,0,0};
+static C_char C_TLS li384[] C_aligned={C_lihdr(0,0,14),40,97,50,49,57,57,52,32,112,50,48,51,51,41,0,0};
+static C_char C_TLS li385[] C_aligned={C_lihdr(0,0,24),40,108,111,111,112,32,97,99,116,50,48,52,48,32,115,116,97,114,116,50,48,52,49,41};
+static C_char C_TLS li386[] C_aligned={C_lihdr(0,0,39),40,97,50,49,57,57,55,32,112,50,48,51,52,32,110,50,48,51,53,32,100,101,115,116,50,48,51,54,32,115,116,97,114,116,50,48,51,55,41,0};
+static C_char C_TLS li387[] C_aligned={C_lihdr(0,0,52),40,108,111,111,112,32,108,101,110,50,48,54,54,32,108,105,109,105,116,50,48,54,55,32,98,117,102,102,101,114,50,48,54,56,32,114,101,115,117,108,116,50,48,54,57,32,102,50,48,55,48,41,0,0,0,0};
+static C_char C_TLS li388[] C_aligned={C_lihdr(0,0,24),40,97,50,50,48,53,51,32,112,50,48,54,48,32,108,105,109,105,116,50,48,54,49,41};
+static C_char C_TLS li389[] 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 li390[] 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,56,57,32,46,32,108,111,99,50,48,57,48,41,0,0,0,0,0,0};
+static C_char C_TLS li391[] 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,49,48,49,32,109,111,100,101,50,49,48,50,32,46,32,108,111,99,50,49,48,51,41,0,0,0,0,0};
+static C_char C_TLS li392[] 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,49,48,57,32,108,111,99,50,49,49,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li393[] 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,49,49,54,41,0,0};
+static C_char C_TLS li394[] 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,50,48,41,0};
+static C_char C_TLS li395[] 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,50,52,41,0,0};
+static C_char C_TLS li396[] 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,50,56,41,0,0,0,0,0,0};
+static C_char C_TLS li397[] 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,51,50,41,0,0,0,0,0,0};
+static C_char C_TLS li398[] 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,51,52,32,100,97,116,97,50,49,51,53,41};
+static C_char C_TLS li399[] 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,52,49,41};
+static C_char C_TLS li400[] 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,53,48,32,116,104,117,110,107,50,49,53,49,32,46,32,95,50,49,53,50,41,0,0};
+static C_char C_TLS li401[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,50,49,54,56,41,0,0,0,0};
+static C_char C_TLS li402[] 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,53,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li403[] C_aligned={C_lihdr(0,0,22),40,100,111,108,111,111,112,50,49,57,48,32,109,111,100,101,115,50,49,57,52,41,0,0};
+static C_char C_TLS li404[] C_aligned={C_lihdr(0,0,17),40,97,49,48,57,53,50,32,110,97,109,101,50,49,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li405[] C_aligned={C_lihdr(0,0,41),40,111,112,101,110,32,110,97,109,101,50,49,56,51,32,105,110,112,50,49,56,52,32,109,111,100,101,115,50,49,56,53,32,108,111,99,50,49,56,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li406[] C_aligned={C_lihdr(0,0,24),40,99,108,111,115,101,32,112,111,114,116,50,50,49,48,32,108,111,99,50,50,49,49,41};
+static C_char C_TLS li407[] 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,49,57,32,46,32,109,111,100,101,50,50,50,48,41,0,0,0};
+static C_char C_TLS li408[] 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,50,49,32,46,32,109,111,100,101,50,50,50,50,41,0,0};
+static C_char C_TLS li409[] 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,50,51,41,0,0,0,0,0};
+static C_char C_TLS li410[] 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,50,52,41,0,0,0,0};
+static C_char C_TLS li411[] C_aligned={C_lihdr(0,0,8),40,97,49,49,48,57,57,41};
+static C_char C_TLS li412[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,48,53,32,46,32,114,101,115,117,108,116,115,50,50,51,54,41,0,0};
+static C_char C_TLS li413[] 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,51,50,32,112,50,50,51,51,32,46,32,109,111,100,101,50,50,51,52,41};
+static C_char C_TLS li414[] C_aligned={C_lihdr(0,0,8),40,97,49,49,49,50,51,41};
+static C_char C_TLS li415[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,50,57,32,46,32,114,101,115,117,108,116,115,50,50,52,52,41,0,0};
+static C_char C_TLS li416[] 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,52,48,32,112,50,50,52,49,32,46,32,109,111,100,101,50,50,52,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li417[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,52,56,32,46,32,114,101,115,117,108,116,115,50,50,53,51,41,0,0};
+static C_char C_TLS li418[] 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,52,56,32,116,104,117,110,107,50,50,52,57,32,46,32,109,111,100,101,50,50,53,48,41,0,0,0,0,0};
+static C_char C_TLS li419[] C_aligned={C_lihdr(0,0,22),40,97,49,49,49,54,56,32,46,32,114,101,115,117,108,116,115,50,50,54,52,41,0,0};
+static C_char C_TLS li420[] 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,53,57,32,116,104,117,110,107,50,50,54,48,32,46,32,109,111,100,101,50,50,54,49,41,0,0,0,0,0,0};
+static C_char C_TLS li421[] C_aligned={C_lihdr(0,0,17),40,97,49,49,49,56,55,32,110,97,109,101,50,50,55,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li422[] 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,54,57,41,0};
+static C_char C_TLS li423[] C_aligned={C_lihdr(0,0,17),40,97,49,49,50,48,57,32,110,97,109,101,50,50,55,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li424[] 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,55,53,41,0,0,0,0};
+static C_char C_TLS li425[] 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,56,52,41,0,0,0};
+static C_char C_TLS li426[] 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,57,52,50,50,57,53,41,0,0,0,0};
+static C_char C_TLS li427[] C_aligned={C_lihdr(0,0,25),40,112,111,114,116,45,110,97,109,101,32,46,32,116,109,112,50,51,48,57,50,51,49,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li428[] 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,49,56,32,110,97,109,101,50,51,49,57,41,0,0,0,0,0,0};
+static C_char C_TLS li429[] 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,50,51,41,0,0,0,0,0,0};
+static C_char C_TLS li430[] 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,51,50,50,51,51,51,41,0,0,0};
+static C_char C_TLS li431[] C_aligned={C_lihdr(0,0,21),40,97,49,49,51,56,56,32,102,105,108,101,110,97,109,101,50,51,52,50,41,0,0,0};
+static C_char C_TLS li432[] 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,52,49,41,0,0,0,0,0,0};
+static C_char C_TLS li433[] C_aligned={C_lihdr(0,0,16),40,97,49,49,52,51,52,32,110,101,119,50,51,53,49,41};
+static C_char C_TLS li434[] C_aligned={C_lihdr(0,0,16),40,97,49,49,52,50,56,32,111,108,100,50,51,53,48,41};
+static C_char C_TLS li435[] 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,52,56,32,110,101,119,50,51,52,57,41,0,0,0};
+static C_char C_TLS li436[] C_aligned={C_lihdr(0,0,15),40,102,95,49,49,53,54,56,32,120,50,51,54,50,41,0};
+static C_char C_TLS li437[] C_aligned={C_lihdr(0,0,19),40,102,95,49,49,52,57,48,32,46,32,97,114,103,50,51,54,55,41,0,0,0,0,0};
+static C_char C_TLS li438[] 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,53,56,32,46,32,103,117,97,114,100,50,51,53,57,41,0,0,0};
+static C_char C_TLS li439[] C_aligned={C_lihdr(0,0,19),40,101,111,102,45,111,98,106,101,99,116,63,32,120,50,51,56,52,41,0,0,0,0,0};
+static C_char C_TLS li440[] 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,57,49,50,51,57,50,41,0,0,0,0,0};
+static C_char C_TLS li441[] C_aligned={C_lihdr(0,0,25),40,114,101,97,100,45,99,104,97,114,32,46,32,116,109,112,50,52,48,56,50,52,48,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li442[] 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,49,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li443[] 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,51,48,41,0};
+static C_char C_TLS li444[] 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,51,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li445[] 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,52,55,50,52,52,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li446[] C_aligned={C_lihdr(0,0,20),40,114,101,97,100,32,46,32,116,109,112,50,52,54,50,50,52,54,51,41,0,0,0,0};
+static C_char C_TLS li447[] 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 li448[] 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,55,51,41,0};
+static C_char C_TLS li449[] 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,55,53,32,110,50,52,55,54,41};
+static C_char C_TLS li450[] 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,55,56,32,109,115,103,50,52,55,57,32,46,32,97,114,103,115,50,52,56,48,41};
+static C_char C_TLS li451[] 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,56,53,32,109,115,103,50,52,56,54,32,46,32,97,114,103,115,50,52,56,55,41,0,0};
+static C_char C_TLS li452[] C_aligned={C_lihdr(0,0,15),40,102,95,49,49,57,48,57,32,99,50,53,49,56,41,0};
+static C_char C_TLS li453[] C_aligned={C_lihdr(0,0,33),40,105,110,102,111,32,99,108,97,115,115,50,53,49,57,32,100,97,116,97,50,53,50,48,32,118,97,108,50,53,50,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li454[] C_aligned={C_lihdr(0,0,12),40,115,107,105,112,32,99,50,53,50,51,41,0,0,0,0};
+static C_char C_TLS li455[] 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 li456[] 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,50,55,41,0,0,0,0,0,0};
+static C_char C_TLS li457[] 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,50,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li458[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,99,50,53,53,50,41,0,0,0,0};
+static C_char C_TLS li459[] 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 li460[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,115,101,113,50,53,55,48,32,110,50,53,55,49,41,0,0,0,0};
+static C_char C_TLS li461[] C_aligned={C_lihdr(0,0,25),40,114,45,117,115,101,113,117,101,110,99,101,32,117,50,53,54,55,32,110,50,53,54,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li462[] C_aligned={C_lihdr(0,0,18),40,108,112,32,105,50,53,57,51,32,108,115,116,50,53,57,52,41,0,0,0,0,0,0};
+static C_char C_TLS li463[] 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,56,55,32,108,115,116,50,53,56,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li464[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,53,57,56,32,108,115,116,50,53,57,57,41,0,0,0,0};
+static C_char C_TLS li465[] C_aligned={C_lihdr(0,0,19),40,114,45,115,116,114,105,110,103,32,116,101,114,109,50,53,57,54,41,0,0,0,0,0};
+static C_char C_TLS li466[] C_aligned={C_lihdr(0,0,15),40,102,95,49,50,53,51,48,32,99,50,54,51,56,41,0};
+static C_char C_TLS li467[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,108,97,115,116,50,54,52,48,41,0};
+static C_char C_TLS li468[] C_aligned={C_lihdr(0,0,19),40,97,49,50,53,50,54,32,114,101,116,117,114,110,50,54,51,55,41,0,0,0,0,0};
+static C_char C_TLS li469[] C_aligned={C_lihdr(0,0,26),40,114,45,108,105,115,116,32,115,116,97,114,116,50,54,51,50,32,101,110,100,50,54,51,51,41,0,0,0,0,0,0};
+static C_char C_TLS li470[] 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 li471[] C_aligned={C_lihdr(0,0,20),40,114,45,110,117,109,98,101,114,32,114,97,100,105,120,50,55,48,56,41,0,0,0,0};
+static C_char C_TLS li472[] 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,50,56,41,0,0,0,0,0};
+static C_char C_TLS li473[] 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 li474[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,55,53,56,32,108,115,116,50,55,53,57,41,0,0,0,0};
+static C_char C_TLS li475[] 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 li476[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,55,56,50,32,108,115,116,50,55,56,51,41,0,0,0,0};
+static C_char C_TLS li477[] 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 li478[] 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 li479[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,32,99,50,56,48,48,32,108,115,116,50,56,48,49,41,0,0,0,0};
+static C_char C_TLS li480[] 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 li481[] C_aligned={C_lihdr(0,0,8),40,114,45,99,104,97,114,41};
+static C_char C_TLS li482[] 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 li483[] 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 li484[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,50,56,56,52,41,0,0,0,0};
+static C_char C_TLS li485[] 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 li486[] 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,57,55,41};
+static C_char C_TLS li487[] 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,50,51,41,0};
+static C_char C_TLS li488[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,54,51,41};
+static C_char C_TLS li489[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,54,56,41};
+static C_char C_TLS li490[] C_aligned={C_lihdr(0,0,8),40,97,49,51,56,55,52,41};
+static C_char C_TLS li491[] 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 li492[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,114,101,97,100,32,112,111,114,116,50,53,48,50,32,105,110,102,111,104,97,110,100,108,101,114,50,53,48,51,41,0,0,0};
+static C_char C_TLS li493[] 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,56,56,41,0};
+static C_char C_TLS li494[] 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,57,55,41};
+static C_char C_TLS li495[] 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,49,48,49,32,108,111,51,49,48,50,41,0,0,0,0,0};
+static C_char C_TLS li496[] C_aligned={C_lihdr(0,0,27),40,102,95,49,52,53,50,51,32,99,104,97,114,51,49,49,50,32,112,111,114,116,51,49,49,51,41,0,0,0,0,0};
+static C_char C_TLS li497[] 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,51,50,32,112,114,111,99,51,49,51,51,41,0};
+static C_char C_TLS li498[] C_aligned={C_lihdr(0,0,26),40,102,95,49,52,53,56,53,32,99,104,114,51,49,52,49,32,112,114,111,99,51,49,52,50,41,0,0,0,0,0,0};
+static C_char C_TLS li499[] 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,51,56,32,115,108,111,116,51,49,51,57,32,119,114,97,112,51,49,52,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li500[] 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,55,51,41};
+static C_char C_TLS li501[] 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,56,53,32,112,51,49,56,54,41};
+static C_char C_TLS li502[] 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,57,48,32,112,111,114,116,51,49,57,49,41,0,0};
+static C_char C_TLS li503[] C_aligned={C_lihdr(0,0,32),40,119,114,105,116,101,45,99,104,97,114,32,99,51,50,48,49,32,46,32,116,109,112,51,50,48,48,51,50,48,50,41};
+static C_char C_TLS li504[] C_aligned={C_lihdr(0,0,23),40,110,101,119,108,105,110,101,32,46,32,116,109,112,51,50,49,55,51,50,49,56,41,0};
+static C_char C_TLS li505[] C_aligned={C_lihdr(0,0,27),40,119,114,105,116,101,32,120,51,50,51,49,32,46,32,116,109,112,51,50,51,48,51,50,51,50,41,0,0,0,0,0};
+static C_char C_TLS li506[] C_aligned={C_lihdr(0,0,29),40,100,105,115,112,108,97,121,32,120,51,50,52,54,32,46,32,116,109,112,51,50,52,53,51,50,52,55,41,0,0,0};
+static C_char C_TLS li507[] C_aligned={C_lihdr(0,0,22),40,97,49,52,56,53,53,32,103,51,50,55,54,51,50,55,55,51,50,55,56,41,0,0};
+static C_char C_TLS li508[] C_aligned={C_lihdr(0,0,18),40,112,114,105,110,116,32,46,32,97,114,103,115,51,50,53,54,41,0,0,0,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,51,48,52,51,51,48,53,51,51,48,54,41,0,0};
+static C_char C_TLS li510[] C_aligned={C_lihdr(0,0,19),40,112,114,105,110,116,42,32,46,32,97,114,103,115,51,50,56,52,41,0,0,0,0,0};
+static C_char C_TLS li511[] C_aligned={C_lihdr(0,0,25),40,111,117,116,115,116,114,32,112,111,114,116,51,51,50,57,32,115,116,114,51,51,51,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li512[] C_aligned={C_lihdr(0,0,25),40,111,117,116,99,104,114,32,112,111,114,116,51,51,53,48,32,99,104,114,51,51,53,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li513[] 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 li514[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,51,56,48,41,0,0,0,0};
+static C_char C_TLS li515[] 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,55,54,32,115,116,114,51,51,55,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li516[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,52,49,50,41,0,0,0,0};
+static C_char C_TLS li517[] 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,57,51,41,0,0,0,0,0,0};
+static C_char C_TLS li518[] C_aligned={C_lihdr(0,0,14),40,103,51,52,54,57,32,99,110,51,52,55,49,41,0,0};
+static C_char C_TLS li519[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,51,53,48,50,32,105,51,53,48,54,32,99,51,53,48,55,41};
+static C_char C_TLS li520[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,51,53,51,51,32,120,51,53,51,55,41,0,0,0,0,0,0};
+static C_char C_TLS li521[] C_aligned={C_lihdr(0,0,24),40,100,111,108,111,111,112,51,53,54,51,32,105,51,53,54,55,32,99,51,53,54,56,41};
+static C_char C_TLS li522[] C_aligned={C_lihdr(0,0,11),40,111,117,116,32,120,51,52,52,55,41,0,0,0,0,0};
+static C_char C_TLS li523[] C_aligned={C_lihdr(0,0,41),40,35,35,115,121,115,35,112,114,105,110,116,32,120,51,51,49,54,32,114,101,97,100,97,98,108,101,51,51,49,55,32,112,111,114,116,51,51,49,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li524[] 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,56,51,41,0};
+static C_char C_TLS li525[] 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,56,54,32,112,114,111,99,51,53,56,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li526[] 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,57,49,32,114,101,97,100,97,98,108,101,51,53,57,50,32,112,111,114,116,51,53,57,51,41,0,0,0,0,0};
+static C_char C_TLS li527[] C_aligned={C_lihdr(0,0,10),40,115,119,97,112,51,54,49,57,41,0,0,0,0,0,0};
+static C_char C_TLS li528[] C_aligned={C_lihdr(0,0,8),40,97,49,53,57,56,54,41};
+static C_char C_TLS li529[] C_aligned={C_lihdr(0,0,19),40,97,49,53,57,53,55,32,114,101,116,117,114,110,51,54,49,56,41,0,0,0,0,0};
+static C_char C_TLS li530[] 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,49,54,32,116,104,117,110,107,51,54,49,55,41,0,0,0,0,0};
+static C_char C_TLS li531[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,120,51,54,53,50,32,120,115,51,54,53,51,41,0,0,0,0,0};
+static C_char C_TLS li532[] 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,53,48,41,0,0};
+static C_char C_TLS li533[] C_aligned={C_lihdr(0,0,19),40,108,111,111,112,32,120,51,54,53,56,32,120,115,51,54,53,57,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,105,111,114,32,46,32,120,115,51,54,53,54,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,54,52,32,120,115,51,54,54,53,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,120,111,114,32,46,32,120,115,51,54,54,50,41,0,0};
+static C_char C_TLS li537[] C_aligned={C_lihdr(0,0,19),40,98,105,116,119,105,115,101,45,110,111,116,32,120,51,54,54,56,41,0,0,0,0,0};
+static C_char C_TLS li538[] 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,55,48,32,121,51,54,55,49,41,0,0};
+static C_char C_TLS li539[] C_aligned={C_lihdr(0,0,22),40,98,105,116,45,115,101,116,63,32,110,51,54,55,51,32,105,51,54,55,52,41,0,0};
+static C_char C_TLS li540[] C_aligned={C_lihdr(0,0,19),40,99,104,101,99,107,32,112,51,54,55,54,32,110,51,54,55,55,41,0,0,0,0,0};
+static C_char C_TLS li541[] C_aligned={C_lihdr(0,0,14),40,97,50,49,55,49,49,32,112,51,54,57,52,41,0,0};
+static C_char C_TLS li542[] C_aligned={C_lihdr(0,0,14),40,97,50,49,55,51,54,32,112,51,55,48,48,41,0,0};
+static C_char C_TLS li543[] C_aligned={C_lihdr(0,0,20),40,97,50,49,55,53,52,32,112,51,55,48,52,32,99,51,55,48,53,41,0,0,0,0};
+static C_char C_TLS li544[] C_aligned={C_lihdr(0,0,22),40,97,50,49,55,55,51,32,112,51,55,49,48,32,115,116,114,51,55,49,49,41,0,0};
+static C_char C_TLS li545[] C_aligned={C_lihdr(0,0,14),40,97,50,49,55,57,50,32,112,51,55,49,55,41,0,0};
+static C_char C_TLS li546[] C_aligned={C_lihdr(0,0,14),40,97,50,49,56,48,50,32,112,51,55,49,56,41,0,0};
+static C_char C_TLS li547[] C_aligned={C_lihdr(0,0,14),40,97,50,49,56,48,53,32,112,51,55,49,57,41,0,0};
+static C_char C_TLS li548[] C_aligned={C_lihdr(0,0,39),40,97,50,49,56,49,57,32,112,51,55,50,48,32,110,51,55,50,49,32,100,101,115,116,51,55,50,50,32,115,116,97,114,116,51,55,50,51,41,0};
+static C_char C_TLS li549[] C_aligned={C_lihdr(0,0,26),40,97,50,49,56,56,56,32,112,111,115,50,51,55,52,52,32,110,101,120,116,51,55,52,53,41,0,0,0,0,0,0};
+static C_char C_TLS li550[] C_aligned={C_lihdr(0,0,24),40,97,50,49,56,54,48,32,112,51,55,51,55,32,108,105,109,105,116,51,55,51,56,41};
+static C_char C_TLS li551[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,112,111,115,50,51,55,53,57,41,0};
+static C_char C_TLS li552[] 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,53,52,32,108,105,109,105,116,51,55,53,53,32,112,111,115,51,55,53,54,32,107,51,55,53,55,41};
+static C_char C_TLS li553[] 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,55,51,41,0,0};
+static C_char C_TLS li554[] 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 li555[] 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,56,53,41,0,0,0,0};
+static C_char C_TLS li556[] C_aligned={C_lihdr(0,0,13),40,103,51,56,48,49,32,120,51,56,48,51,41,0,0,0};
+static C_char C_TLS li557[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,55,57,52,32,103,51,55,57,56,51,56,48,48,41,0,0,0,0};
+static C_char C_TLS li558[] 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,57,48,41,0,0};
+static C_char C_TLS li559[] 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,56,48,56,41,0,0,0};
+static C_char C_TLS li560[] 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 li561[] 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 li562[] 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 li563[] 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 li564[] 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 li565[] 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 li566[] C_aligned={C_lihdr(0,0,11),40,115,116,114,32,120,51,56,53,53,41,0,0,0,0,0};
+static C_char C_TLS li567[] 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,52,50,51,56,52,51,41,0};
+static C_char C_TLS li568[] 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,54,54,41,0,0,0,0,0,0};
+static C_char C_TLS li569[] C_aligned={C_lihdr(0,0,13),40,99,104,101,99,107,32,102,51,56,55,54,41,0,0,0};
+static C_char C_TLS li570[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,56,57,53,32,103,51,56,57,57,51,57,48,49,41,0,0,0,0};
+static C_char C_TLS li571[] 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,57,50,41,0,0,0,0};
+static C_char C_TLS li572[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,102,102,115,51,57,51,56,41,0,0};
+static C_char C_TLS li573[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,51,57,49,54,32,103,51,57,50,54,51,57,51,48,41,0,0,0,0};
+static C_char C_TLS li574[] 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,57,49,50,41,0,0};
+static C_char C_TLS li575[] 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 li576[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,105,100,115,51,57,52,55,41,0,0};
+static C_char C_TLS li577[] 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,52,53,41,0,0,0,0,0,0};
+static C_char C_TLS li578[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,51,57,57,52,41,0,0,0,0};
+static C_char C_TLS li579[] C_aligned={C_lihdr(0,0,31),40,98,111,100,121,51,57,55,52,32,115,116,97,114,116,51,57,56,51,32,116,104,114,101,97,100,51,57,56,52,41,0};
+static C_char C_TLS li580[] C_aligned={C_lihdr(0,0,31),40,100,101,102,45,116,104,114,101,97,100,51,57,55,55,32,37,115,116,97,114,116,51,57,55,50,52,48,48,56,41,0};
+static C_char C_TLS li581[] C_aligned={C_lihdr(0,0,15),40,100,101,102,45,115,116,97,114,116,51,57,55,54,41,0};
+static C_char C_TLS li582[] 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,54,55,51,57,54,56,41,0,0,0,0};
+static C_char C_TLS li583[] C_aligned={C_lihdr(0,0,8),40,97,49,55,48,53,54,41};
+static C_char C_TLS li584[] C_aligned={C_lihdr(0,0,16),40,103,52,48,50,57,32,105,110,102,111,52,48,51,49,41};
+static C_char C_TLS li585[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,48,50,50,32,103,52,48,50,54,52,48,50,56,41,0,0,0,0};
+static C_char C_TLS li586[] 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,52,48,49,53,32,99,104,97,105,110,52,48,49,54,32,104,101,97,100,101,114,52,48,49,55,41,0,0,0};
+static C_char C_TLS li587[] C_aligned={C_lihdr(0,0,51),40,98,111,100,121,52,48,54,52,32,112,111,114,116,52,48,55,53,32,115,116,97,114,116,52,48,55,54,32,116,104,114,101,97,100,52,48,55,55,32,104,101,97,100,101,114,52,48,55,56,41,0,0,0,0,0};
+static C_char C_TLS li588[] C_aligned={C_lihdr(0,0,61),40,100,101,102,45,104,101,97,100,101,114,52,48,54,57,32,37,112,111,114,116,52,48,54,48,52,48,56,51,32,37,115,116,97,114,116,52,48,54,49,52,48,56,52,32,37,116,104,114,101,97,100,52,48,54,50,52,48,56,53,41,0,0,0};
+static C_char C_TLS li589[] C_aligned={C_lihdr(0,0,45),40,100,101,102,45,116,104,114,101,97,100,52,48,54,56,32,37,112,111,114,116,52,48,54,48,52,48,56,55,32,37,115,116,97,114,116,52,48,54,49,52,48,56,56,41,0,0,0};
+static C_char C_TLS li590[] C_aligned={C_lihdr(0,0,29),40,100,101,102,45,115,116,97,114,116,52,48,54,55,32,37,112,111,114,116,52,48,54,48,52,48,57,48,41,0,0,0};
+static C_char C_TLS li591[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,112,111,114,116,52,48,54,54,41,0,0};
+static C_char C_TLS li592[] 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,53,53,52,48,53,54,41};
+static C_char C_TLS li593[] C_aligned={C_lihdr(0,0,7),40,98,114,101,97,107,41,0};
+static C_char C_TLS li594[] 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 li595[] C_aligned={C_lihdr(0,0,9),40,102,95,49,55,50,53,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li596[] 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 li597[] C_aligned={C_lihdr(0,0,19),40,111,110,45,101,120,105,116,32,116,104,117,110,107,52,49,56,56,41,0,0,0,0,0};
+static C_char C_TLS li598[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,50,48,55,32,103,52,50,49,49,52,50,49,51,41,0,0,0,0};
+static C_char C_TLS li599[] 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,57,50,32,109,115,103,52,49,57,51,32,46,32,97,114,103,115,52,49,57,52,41,0};
+static C_char C_TLS li600[] C_aligned={C_lihdr(0,0,19),40,35,35,115,121,115,35,97,98,111,114,116,32,120,52,50,53,48,41,0,0,0,0,0};
+static C_char C_TLS li601[] C_aligned={C_lihdr(0,0,20),40,35,35,115,121,115,35,115,105,103,110,97,108,32,120,52,50,53,51,41,0,0,0,0};
+static C_char C_TLS li602[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,53,51,52,32,99,52,50,53,53,41,0};
+static C_char C_TLS li603[] C_aligned={C_lihdr(0,0,8),40,97,49,55,54,57,57,41};
+static C_char C_TLS li604[] C_aligned={C_lihdr(0,0,8),40,97,49,55,55,48,51,41};
+static C_char C_TLS li605[] 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,57,54,32,116,104,117,110,107,52,50,57,55,41,0,0};
+static C_char C_TLS li606[] 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 li607[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,114,111,112,115,52,51,48,52,41};
+static C_char C_TLS li608[] 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,51,48,49,32,46,32,112,114,111,112,115,52,51,48,50,41,0,0};
+static C_char C_TLS li609[] C_aligned={C_lihdr(0,0,10),40,108,111,111,112,52,51,49,50,41,0,0,0,0,0,0};
+static C_char C_TLS li610[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,51,53,48,32,103,52,51,54,48,52,51,54,52,41,0,0,0,0};
+static C_char C_TLS li611[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,51,50,54,32,103,52,51,51,54,52,51,52,48,41,0,0,0,0};
+static C_char C_TLS li612[] 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,51,48,55,32,46,32,99,111,110,100,115,52,51,48,56,41,0,0,0};
+static C_char C_TLS li613[] C_aligned={C_lihdr(0,0,18),40,99,111,110,100,105,116,105,111,110,63,32,120,52,51,55,52,41,0,0,0,0,0,0};
+static C_char C_TLS li614[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,57,48,53,32,99,52,51,55,55,41,0};
+static C_char C_TLS li615[] 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,55,54,41,0,0};
+static C_char C_TLS li616[] C_aligned={C_lihdr(0,0,15),40,102,95,49,55,57,50,57,32,99,52,51,56,53,41,0};
+static C_char C_TLS li617[] 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,56,48,32,112,114,111,112,52,51,56,49,32,46,32,101,114,114,45,100,101,102,52,51,56,50,41,0,0,0};
+static C_char C_TLS li618[] 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,57,55,32,107,105,110,100,52,51,57,56,32,112,114,111,112,52,51,57,57,32,46,32,101,114,114,45,100,101,102,52,52,48,48,41,0,0};
+static C_char C_TLS li619[] 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,52,48,52,32,108,111,99,52,52,48,53,32,46,32,97,114,103,115,52,52,48,54,41,0,0};
+static C_char C_TLS li620[] 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,49,57,32,115,52,52,50,48,41,0,0};
+static C_char C_TLS li621[] 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,50,50,41};
+static C_char C_TLS li622[] C_aligned={C_lihdr(0,0,24),40,35,35,115,121,115,35,115,108,111,116,32,120,52,52,50,52,32,105,52,52,50,53,41};
+static C_char C_TLS li623[] C_aligned={C_lihdr(0,0,18),40,35,35,115,121,115,35,115,105,122,101,32,120,52,52,50,55,41,0,0,0,0,0,0};
+static C_char C_TLS li624[] 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 li625[] 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 li626[] 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,50,57,41,0,0};
+static C_char C_TLS li627[] 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,51,49,32,97,100,100,114,52,52,51,50,41,0,0,0};
+static C_char C_TLS li628[] 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,51,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li629[] 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,51,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li630[] 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,51,56,41};
+static C_char C_TLS li631[] 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,52,48,41,0,0,0,0,0};
+static C_char C_TLS li632[] 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,52,50,41,0};
+static C_char C_TLS li633[] 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 li634[] 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,52,55,41,0,0,0,0,0};
+static C_char C_TLS li635[] 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,52,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li636[] 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,53,51,41};
+static C_char C_TLS li637[] 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,53,53,41,0,0,0};
+static C_char C_TLS li638[] 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 li639[] 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 li640[] 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,53,55,32,105,52,52,53,56,41,0};
+static C_char C_TLS li641[] 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,54,48,32,105,52,52,54,49,41,0};
+static C_char C_TLS li642[] 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,54,51,41,0,0,0,0,0,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,100,111,117,98,108,101,32,98,52,52,54,53,32,105,52,52,54,54,41,0};
+static C_char C_TLS li644[] 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,54,56,32,105,52,52,54,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li645[] 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,55,55,32,105,52,52,55,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li646[] 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,56,52,32,105,52,52,56,53,41,0,0,0,0,0,0};
+static C_char C_TLS li647[] 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,57,52,32,105,52,52,57,53,41,0,0,0,0,0,0};
+static C_char C_TLS li648[] 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,53,48,50,32,105,52,53,48,51,32,115,52,53,48,52,41,0};
+static C_char C_TLS li649[] 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,53,48,54,32,105,52,53,48,55,32,110,52,53,48,56,41,0,0};
+static C_char C_TLS li650[] 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,53,49,48,32,105,52,53,49,49,32,110,52,53,49,50,41,0,0,0};
+static C_char C_TLS li651[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,52,53,50,54,41,0,0,0,0};
+static C_char C_TLS li652[] 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,50,51,32,110,52,53,50,52,41};
+static C_char C_TLS li653[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,52,53,53,50,41,0,0,0,0};
+static C_char C_TLS li654[] 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,52,56,32,110,52,53,52,57,41,0,0,0,0,0,0,0};
+static C_char C_TLS li655[] 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,54,54,32,97,100,100,114,52,53,54,55,41,0,0,0,0,0,0,0};
+static C_char C_TLS li656[] 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,55,48,41,0,0,0,0,0,0};
+static C_char C_TLS li657[] 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,55,50,32,116,111,52,53,55,51,32,111,102,102,115,101,116,49,52,53,55,52,32,111,102,102,115,101,116,50,52,53,55,53,32,98,121,116,101,115,52,53,55,54,41,0,0,0,0};
+static C_char C_TLS li658[] 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,55,56,32,116,111,52,53,55,57,32,111,102,102,115,101,116,49,52,53,56,48,32,111,102,102,115,101,116,50,52,53,56,49,32,119,111,114,100,115,52,53,56,50,41,0,0,0,0};
+static C_char C_TLS li659[] 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,56,52,32,116,111,52,53,56,53,32,111,102,102,115,101,116,49,52,53,56,54,32,111,102,102,115,101,116,50,52,53,56,55,32,98,121,116,101,115,52,53,56,56,41,0};
+static C_char C_TLS li660[] 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,56,57,52,53,57,50,41,0,0,0};
+static C_char C_TLS li661[] 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,57,52,41,0,0,0,0,0};
+static C_char C_TLS li662[] 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,57,56,41,0,0,0,0,0};
+static C_char C_TLS li663[] 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,54,48,48,41,0,0,0};
+static C_char C_TLS li664[] 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,54,48,50,41,0,0,0};
+static C_char C_TLS li665[] 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,54,48,52,41,0,0,0,0};
+static C_char C_TLS li666[] 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,54,48,54,32,120,52,54,48,55,41,0,0,0,0,0,0};
+static C_char C_TLS li667[] 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,54,48,57,41,0,0,0};
+static C_char C_TLS li668[] 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,54,49,49,41,0,0,0};
+static C_char C_TLS li669[] 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,54,49,51,41,0,0};
+static C_char C_TLS li670[] 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,54,49,53,32,116,120,52,54,49,54,41,0,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,105,110,116,101,103,101,114,45,97,114,103,117,109,101,110,116,32,120,52,54,49,56,41,0,0};
+static C_char C_TLS li672[] 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,50,48,41,0};
+static C_char C_TLS li673[] 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,50,50,41,0,0,0,0,0,0,0};
+static C_char C_TLS li674[] 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,50,52,32,115,116,97,116,101,52,54,50,53,32,110,97,109,101,52,54,50,54,32,113,52,54,50,55,41,0,0};
+static C_char C_TLS li675[] 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,50,57,32,111,119,110,101,114,52,54,51,48,41,0,0,0,0,0};
+static C_char C_TLS li676[] C_aligned={C_lihdr(0,0,10),40,108,111,111,112,52,54,51,56,41,0,0,0,0,0,0};
+static C_char C_TLS li677[] 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,51,50,41,0,0,0,0,0,0};
+static C_char C_TLS li678[] 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 li679[] C_aligned={C_lihdr(0,0,8),40,97,49,56,56,49,49,41};
+static C_char C_TLS li680[] C_aligned={C_lihdr(0,0,19),40,97,49,56,56,48,50,32,114,101,116,117,114,110,52,54,53,55,41,0,0,0,0,0};
+static C_char C_TLS li681[] 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 li682[] 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 li683[] 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,54,49,32,115,116,97,116,101,52,54,54,50,41,0,0,0,0,0};
+static C_char C_TLS li684[] 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 li685[] C_aligned={C_lihdr(0,0,7),40,101,114,114,110,111,41,0};
+static C_char C_TLS li686[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,52,54,56,56,32,99,52,54,57,50,41,0,0,0,0,0,0};
+static C_char C_TLS li687[] C_aligned={C_lihdr(0,0,17),40,114,101,97,100,108,110,32,112,111,114,116,52,54,56,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li688[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li689[] 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,55,48,54,32,115,107,105,112,45,98,114,97,99,101,63,52,55,48,55,41,0,0,0,0};
+static C_char C_TLS li690[] C_aligned={C_lihdr(0,0,19),40,100,111,108,111,111,112,52,55,53,51,32,108,110,52,55,53,55,41,0,0,0,0,0};
+static C_char C_TLS li691[] 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 li692[] C_aligned={C_lihdr(0,0,39),40,108,111,111,112,50,32,108,115,116,52,56,50,48,32,110,101,120,116,45,115,116,114,105,110,103,52,56,50,49,32,97,99,99,52,56,50,50,41,0};
+static C_char C_TLS li693[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,108,115,116,52,55,56,57,41,0,0};
+static C_char C_TLS li694[] 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,50,53,32,112,111,114,116,52,55,50,54,41};
+static C_char C_TLS li695[] 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 li696[] 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,55,52,32,121,52,56,55,53,41,0,0,0,0};
+static C_char C_TLS li697[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,52,56,57,54,32,105,52,57,48,48,41,0,0,0,0,0,0};
+static C_char C_TLS li698[] 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,56,56,41};
+static C_char C_TLS li699[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li700[] 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 li701[] C_aligned={C_lihdr(0,0,14),40,103,99,32,46,32,97,114,103,52,57,50,48,41,0,0};
+static C_char C_TLS li702[] C_aligned={C_lihdr(0,0,17),40,97,49,57,54,54,53,32,46,32,120,115,52,57,50,56,41,0,0,0,0,0,0,0};
+static C_char C_TLS li703[] C_aligned={C_lihdr(0,0,8),40,97,49,57,54,53,51,41};
+static C_char C_TLS li704[] 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,50,53,41,0,0,0};
+static C_char C_TLS li705[] C_aligned={C_lihdr(0,0,16),40,112,114,111,109,105,115,101,63,32,120,52,57,51,50,41};
+static C_char C_TLS li706[] 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,51,52,41,0,0};
+static C_char C_TLS li707[] C_aligned={C_lihdr(0,0,8),40,97,49,57,55,50,54,41};
+static C_char C_TLS li708[] C_aligned={C_lihdr(0,0,13),40,103,52,57,53,54,32,120,52,57,53,56,41,0,0,0};
+static C_char C_TLS li709[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,57,52,57,32,103,52,57,53,51,52,57,53,53,41,0,0,0,0};
+static C_char C_TLS li710[] C_aligned={C_lihdr(0,0,29),40,119,114,105,116,101,97,114,103,115,32,97,114,103,115,52,57,52,53,32,112,111,114,116,52,57,52,54,41,0,0,0};
+static C_char C_TLS li711[] C_aligned={C_lihdr(0,0,15),40,103,52,57,57,54,32,109,115,103,52,57,57,56,41,0};
+static C_char C_TLS li712[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,52,57,54,57,32,112,111,114,116,52,57,55,56,32,104,101,97,100,101,114,52,57,55,57,41,0,0};
+static C_char C_TLS li713[] C_aligned={C_lihdr(0,0,30),40,100,101,102,45,104,101,97,100,101,114,52,57,55,50,32,37,112,111,114,116,52,57,54,55,53,48,50,49,41,0,0};
+static C_char C_TLS li714[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,112,111,114,116,52,57,55,49,41,0,0};
+static C_char C_TLS li715[] 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,54,50,32,46,32,97,114,103,115,52,57,54,51,41,0};
+static C_char C_TLS li716[] 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,50,56,32,105,110,100,101,120,53,48,50,57,32,119,101,97,107,63,53,48,51,48,32,108,111,99,53,48,51,49,41,0,0,0,0,0,0,0};
+static C_char C_TLS li717[] 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,55,56,53,48,56,50,41,0,0,0,0,0};
+static C_char C_TLS li718[] C_aligned={C_lihdr(0,0,20),40,99,111,112,121,32,115,53,49,50,53,32,115,116,114,53,49,50,54,41,0,0,0,0};
+static C_char C_TLS li719[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li720[] C_aligned={C_lihdr(0,0,14),40,103,53,49,52,52,32,115,115,53,49,52,54,41,0,0};
+static C_char C_TLS li721[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,53,49,51,55,32,103,53,49,52,49,53,49,52,51,41,0,0,0,0};
+static C_char C_TLS li722[] C_aligned={C_lihdr(0,0,30),40,98,111,100,121,53,49,48,49,32,115,121,109,115,53,49,49,48,32,112,114,101,102,105,120,53,49,49,49,41,0,0};
+static C_char C_TLS li723[] C_aligned={C_lihdr(0,0,30),40,100,101,102,45,112,114,101,102,105,120,53,49,48,52,32,37,115,121,109,115,53,48,57,57,53,49,54,53,41,0,0};
+static C_char C_TLS li724[] C_aligned={C_lihdr(0,0,14),40,100,101,102,45,115,121,109,115,53,49,48,51,41,0,0};
+static C_char C_TLS li725[] 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,57,52,32,46,32,109,111,114,101,53,48,57,53,41};
+static C_char C_TLS li726[] 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,55,50,32,115,121,109,53,49,55,51,32,46,32,100,101,102,97,117,108,116,53,49,55,52,41,0,0,0,0,0,0};
+static C_char C_TLS li727[] C_aligned={C_lihdr(0,0,6),40,108,111,111,112,41,0,0};
+static C_char C_TLS li728[] 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,56,57,32,46,32,97,114,103,115,53,49,57,48,41,0,0,0,0,0,0};
+static C_char C_TLS li729[] 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 li730[] C_aligned={C_lihdr(0,0,18),40,100,111,108,111,111,112,53,50,51,49,32,105,53,50,51,53,41,0,0,0,0,0,0};
+static C_char C_TLS li731[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,53,50,50,51,41,0,0,0,0};
+static C_char C_TLS li732[] 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,49,56,32,112,114,101,100,53,50,49,57,32,100,101,99,111,114,97,116,111,114,53,50,50,48,41,0};
+static C_char C_TLS li733[] C_aligned={C_lihdr(0,0,12),40,108,111,111,112,32,105,53,50,52,54,41,0,0,0,0};
+static C_char C_TLS li734[] 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,52,51,32,112,114,101,100,53,50,52,52,41,0,0,0,0,0};
+static C_char C_TLS li735[] C_aligned={C_lihdr(0,0,14),40,97,50,48,54,53,57,32,120,53,50,53,51,41,0,0};
+static C_char C_TLS li736[] 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,53,50,41,0,0,0,0};
+static C_char C_TLS li737[] 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,53,55,41,0,0,0,0};
+static C_char C_TLS li738[] 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,54,51,41,0,0,0};
+static C_char C_TLS li739[] C_aligned={C_lihdr(0,0,14),40,97,50,48,55,49,57,32,120,53,51,48,49,41,0,0};
+static C_char C_TLS li740[] C_aligned={C_lihdr(0,0,23),40,97,50,48,55,51,53,32,112,114,111,99,53,51,48,52,32,105,53,51,48,53,41,0};
+static C_char C_TLS li741[] 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,57,57,32,115,101,116,53,51,48,48,41,0,0,0,0};
+static C_char C_TLS li742[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,108,105,115,116,53,51,51,54,41};
+static C_char C_TLS li743[] C_aligned={C_lihdr(0,0,37),40,35,35,115,121,115,35,112,117,116,33,32,115,121,109,53,51,51,50,32,112,114,111,112,53,51,51,51,32,118,97,108,53,51,51,52,41,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,53,49,41};
+static C_char C_TLS li745[] C_aligned={C_lihdr(0,0,42),40,35,35,115,121,115,35,103,101,116,32,115,121,109,53,51,52,55,32,112,114,111,112,53,51,52,56,32,46,32,100,101,102,97,117,108,116,53,51,52,57,41,0,0,0,0,0,0};
+static C_char C_TLS li746[] C_aligned={C_lihdr(0,0,14),40,108,111,111,112,32,112,116,108,53,51,54,57,41,0,0};
+static C_char C_TLS li747[] C_aligned={C_lihdr(0,0,27),40,114,101,109,112,114,111,112,33,32,115,121,109,53,51,54,53,32,112,114,111,112,53,51,54,54,41,0,0,0,0,0};
+static C_char C_TLS li748[] C_aligned={C_lihdr(0,0,16),40,108,111,111,112,32,112,108,105,115,116,53,51,57,55,41};
+static C_char C_TLS li749[] 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,57,50,32,112,114,111,112,115,53,51,57,51,41,0,0,0,0,0,0};
+static C_char C_TLS li750[] C_aligned={C_lihdr(0,0,16),40,97,50,49,48,55,53,32,115,121,109,53,51,56,53,41};
+static C_char C_TLS li751[] C_aligned={C_lihdr(0,0,24),40,97,50,49,48,56,52,32,115,121,109,53,51,56,55,32,108,115,116,53,51,56,56,41};
+static C_char C_TLS li752[] C_aligned={C_lihdr(0,0,20),40,97,50,49,48,57,54,32,120,53,51,50,57,32,121,53,51,51,48,41,0,0,0,0};
+static C_char C_TLS li753[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,48,54,32,120,53,51,50,55,32,121,53,51,50,56,41,0,0,0,0};
+static C_char C_TLS li754[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,49,54,32,120,53,51,50,53,32,121,53,51,50,54,41,0,0,0,0};
+static C_char C_TLS li755[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,50,54,32,120,53,51,50,51,32,121,53,51,50,52,41,0,0,0,0};
+static C_char C_TLS li756[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,51,54,32,120,53,51,50,49,32,121,53,51,50,50,41,0,0,0,0};
+static C_char C_TLS li757[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,52,54,32,120,53,51,49,57,32,121,53,51,50,48,41,0,0,0,0};
+static C_char C_TLS li758[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,53,54,32,120,53,51,49,55,32,121,53,51,49,56,41,0,0,0,0};
+static C_char C_TLS li759[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,54,54,32,120,53,51,49,53,32,121,53,51,49,54,41,0,0,0,0};
+static C_char C_TLS li760[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,55,54,32,120,53,51,49,51,32,121,53,51,49,52,41,0,0,0,0};
+static C_char C_TLS li761[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,56,54,32,120,53,51,49,49,32,121,53,51,49,50,41,0,0,0,0};
+static C_char C_TLS li762[] C_aligned={C_lihdr(0,0,20),40,97,50,49,49,57,54,32,120,53,51,48,57,32,121,53,51,49,48,41,0,0,0,0};
+static C_char C_TLS li763[] C_aligned={C_lihdr(0,0,20),40,97,50,49,50,48,54,32,120,53,51,48,55,32,121,53,51,48,56,41,0,0,0,0};
+static C_char C_TLS li764[] C_aligned={C_lihdr(0,0,14),40,97,50,49,50,52,48,32,120,53,50,56,48,41,0,0};
+static C_char C_TLS li765[] C_aligned={C_lihdr(0,0,17),40,97,50,49,50,49,54,32,112,114,111,99,53,50,55,48,41,0,0,0,0,0,0,0};
+static C_char C_TLS li766[] C_aligned={C_lihdr(0,0,14),40,97,50,49,50,53,54,32,120,53,50,56,51,41,0,0};
+static C_char C_TLS li767[] C_aligned={C_lihdr(0,0,14),40,97,50,49,51,49,49,32,120,53,50,57,49,41,0,0};
+static C_char C_TLS li768[] C_aligned={C_lihdr(0,0,23),40,97,50,49,51,50,55,32,112,114,111,99,53,50,57,52,32,105,53,50,57,53,41,0};
+static C_char C_TLS li769[] C_aligned={C_lihdr(0,0,24),40,97,50,49,50,56,50,32,103,101,116,53,50,56,56,32,115,101,116,53,50,56,57,41};
+static C_char C_TLS li770[] C_aligned={C_lihdr(0,0,23),40,97,50,49,50,55,50,32,112,114,111,99,53,50,56,54,32,105,53,50,56,55,41,0};
+static C_char C_TLS li771[] C_aligned={C_lihdr(0,0,14),40,97,50,49,51,53,53,32,120,52,56,55,49,41,0,0};
+static C_char C_TLS li772[] C_aligned={C_lihdr(0,0,15),40,108,111,111,112,32,97,114,103,115,52,56,54,53,41,0};
+static C_char C_TLS li773[] C_aligned={C_lihdr(0,0,19),40,102,50,53,52,49,54,32,120,52,56,55,49,50,53,52,49,53,41,0,0,0,0,0};
+static C_char C_TLS li774[] C_aligned={C_lihdr(0,0,14),40,97,50,49,52,50,51,32,120,52,56,54,49,41,0,0};
+static C_char C_TLS li775[] C_aligned={C_lihdr(0,0,8),40,97,50,49,52,51,53,41};
+static C_char C_TLS li776[] C_aligned={C_lihdr(0,0,19),40,97,50,49,52,52,49,32,46,32,99,111,100,101,52,49,55,55,41,0,0,0,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,20),40,108,111,111,112,52,49,50,56,32,103,52,49,51,50,52,49,51,52,41,0,0,0,0};
+static C_char C_TLS li779[] C_aligned={C_lihdr(0,0,13),40,103,52,49,54,53,32,120,52,49,54,55,41,0,0,0};
+static C_char C_TLS li780[] C_aligned={C_lihdr(0,0,20),40,108,111,111,112,52,49,53,56,32,103,52,49,54,50,52,49,54,52,41,0,0,0,0};
+static C_char C_TLS li781[] C_aligned={C_lihdr(0,0,19),40,97,50,49,54,49,56,32,46,32,97,114,103,115,52,49,48,57,41,0,0,0,0,0};
+static C_char C_TLS li782[] C_aligned={C_lihdr(0,0,27),40,97,50,49,52,54,57,32,109,115,103,52,49,48,55,32,46,32,97,114,103,115,52,49,48,56,41,0,0,0,0,0};
+static C_char C_TLS li783[] 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 li784[] 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 li785[] 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 li786[] 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 li787[] 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 li788[] 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 li789[] C_aligned={C_lihdr(0,0,32),40,102,95,50,49,57,51,49,32,95,51,49,54,53,32,112,111,114,116,51,49,54,54,32,110,117,109,51,49,54,55,41};
+static C_char C_TLS li790[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,50,56,32,112,114,111,99,51,49,54,52,41,0,0,0,0,0,0,0};
+static C_char C_TLS li791[] C_aligned={C_lihdr(0,0,24),40,102,95,50,49,57,52,50,32,95,51,49,54,49,32,112,111,114,116,51,49,54,50,41};
+static C_char C_TLS li792[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,51,57,32,112,114,111,99,51,49,54,48,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,53,51,32,95,51,49,53,55,32,112,111,114,116,51,49,53,56,41};
+static C_char C_TLS li794[] C_aligned={C_lihdr(0,0,17),40,97,50,49,57,53,48,32,112,114,111,99,51,49,53,54,41,0,0,0,0,0,0,0};
+static C_char C_TLS li795[] 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 li796[] C_aligned={C_lihdr(0,0,10),40,116,111,112,108,101,118,101,108,41,0,0,0,0,0,0};
+
+
+/* from k20475 */
+static C_word C_fcall stub5197(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub5197(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 k20183 */
+static C_word C_fcall stub5088(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub5088(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 k20169 in ##sys#find-symbol-table in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall stub5079(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub5079(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 k20159 */
+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;
+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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall stub4590(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub4590(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 k18579 */
+static C_word C_fcall stub4543(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub4543(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 k18570 */
+static C_word C_fcall stub4535(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub4535(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 k18518 */
+static C_word C_fcall stub4516(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub4516(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 extract */
+#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub3958(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub3958(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_9818)
+static void C_ccall f_9818(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9980)
+static void C_ccall f_9980(C_word c,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_9986)
+static void C_ccall f_9986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9989)
+static void C_ccall f_9989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9992)
+static void C_ccall f_9992(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9995)
+static void C_ccall f_9995(C_word c,C_word t0,C_word t1) 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_10004)
+static void C_ccall f_10004(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10007)
+static void C_ccall f_10007(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_10013)
+static void C_ccall f_10013(C_word c,C_word t0,C_word t1) 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_10640)
+static void C_ccall f_10640(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10644)
+static void C_ccall f_10644(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_noret;
+C_noret_decl(f_10650)
+static void C_ccall f_10650(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10653)
+static void C_ccall f_10653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21972)
+static void C_ccall f_21972(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10806)
+static void C_ccall f_10806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11824)
+static void C_ccall f_11824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11828)
+static void C_ccall f_11828(C_word c,C_word t0,C_word t1) 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_11836)
+static void C_ccall f_11836(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_21951)
+static void C_ccall f_21951(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21953)
+static void C_ccall f_21953(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21957)
+static void C_ccall f_21957(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14635)
+static void C_ccall f_14635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21940)
+static void C_ccall f_21940(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21942)
+static void C_ccall f_21942(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21946)
+static void C_ccall f_21946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14639)
+static void C_ccall f_14639(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21929)
+static void C_ccall f_21929(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21931)
+static void C_ccall f_21931(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_21935)
+static void C_ccall f_21935(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14643)
+static void C_ccall f_14643(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14896)
+static void C_ccall f_14896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14900)
+static void C_ccall f_14900(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_21710)
+static void C_ccall f_21710(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16390)
+static void C_ccall f_16390(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21706)
+static void C_ccall f_21706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16396)
+static void C_ccall f_16396(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21702)
+static void C_ccall f_21702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16402)
+static void C_ccall f_16402(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21698)
+static void C_ccall f_21698(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16408)
+static void C_ccall f_16408(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21694)
+static void C_ccall f_21694(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_21690)
+static void C_ccall f_21690(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_21686)
+static void C_ccall f_21686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21682)
+static void C_ccall f_21682(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16426)
+static void C_fcall f_16426(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21668)
+static void C_ccall f_21668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16654)
+static void C_ccall f_16654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21664)
+static void C_ccall f_21664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16657)
+static void C_ccall f_16657(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21660)
+static void C_ccall f_21660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16660)
+static void C_ccall f_16660(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21656)
+static void C_ccall f_21656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16663)
+static void C_ccall f_16663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21652)
+static void C_ccall f_21652(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16666)
+static void C_ccall f_16666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16669)
+static void C_fcall f_16669(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16672)
+static void C_fcall f_16672(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16675)
+static void C_fcall f_16675(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16678)
+static void C_fcall f_16678(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21470)
+static void C_ccall f_21470(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_21470)
+static void C_ccall f_21470r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_21619)
+static void C_ccall f_21619(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_21474)
+static void C_ccall f_21474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21570)
+static void C_ccall f_21570(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21573)
+static void C_ccall f_21573(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21576)
+static void C_ccall f_21576(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21585)
+static void C_fcall f_21585(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21603)
+static void C_ccall f_21603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21593)
+static void C_fcall f_21593(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21597)
+static void C_ccall f_21597(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21579)
+static void C_ccall f_21579(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21583)
+static void C_ccall f_21583(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21483)
+static void C_ccall f_21483(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21564)
+static void C_ccall f_21564(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_21528)
+static void C_fcall f_21528(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21540)
+static void C_ccall f_21540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21546)
+static void C_ccall f_21546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21516)
+static void C_ccall f_21516(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21489)
+static void C_ccall f_21489(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21492)
+static void C_ccall f_21492(C_word c,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_noret;
+C_noret_decl(f_21501)
+static void C_ccall f_21501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21504)
+static void C_ccall f_21504(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21507)
+static void C_ccall f_21507(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_21461)
+static void C_ccall f_21461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21465)
+static void C_ccall f_21465(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17235)
+static void C_ccall f_17235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21442)
+static void C_ccall f_21442(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_21442)
+static void C_ccall f_21442r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_21446)
+static void C_ccall f_21446(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17239)
+static void C_ccall f_17239(C_word c,C_word t0,C_word t1) 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_17243)
+static void C_ccall f_17243(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17250)
+static void C_ccall f_17250(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18727)
+static void C_ccall f_18727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21419)
+static void C_ccall f_21419(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21424)
+static void C_ccall f_21424(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19414)
+static void C_ccall f_19414(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21351)
+static void C_ccall f_21351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f25416)
+static void C_ccall f25416(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21372)
+static void C_fcall f_21372(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21411)
+static void C_ccall f_21411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21391)
+static void C_fcall f_21391(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21401)
+static void C_ccall f_21401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21354)
+static void C_ccall f_21354(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21356)
+static void C_ccall f_21356(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19418)
+static void C_ccall f_19418(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19422)
+static void C_ccall f_19422(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19697)
+static void C_ccall f_19697(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19700)
+static void C_ccall f_19700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19703)
+static void C_ccall f_19703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21273)
+static void C_ccall f_21273(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21283)
+static void C_ccall f_21283(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21328)
+static void C_ccall f_21328(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21312)
+static void C_ccall f_21312(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21293)
+static void C_ccall f_21293(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21257)
+static void C_ccall f_21257(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21217)
+static void C_ccall f_21217(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21241)
+static void C_ccall f_21241(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21233)
+static void C_ccall f_21233(C_word c,C_word t0,C_word t1) 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_20748)
+static void C_ccall f_20748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20752)
+static void C_ccall f_20752(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21207)
+static void C_ccall f_21207(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20756)
+static void C_ccall f_20756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21197)
+static void C_ccall f_21197(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20760)
+static void C_ccall f_20760(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21187)
+static void C_ccall f_21187(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20764)
+static void C_ccall f_20764(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21177)
+static void C_ccall f_21177(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20768)
+static void C_ccall f_20768(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21167)
+static void C_ccall f_21167(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21175)
+static void C_ccall f_21175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20772)
+static void C_ccall f_20772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21157)
+static void C_ccall f_21157(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20776)
+static void C_ccall f_20776(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21147)
+static void C_ccall f_21147(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21155)
+static void C_ccall f_21155(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20780)
+static void C_ccall f_20780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21137)
+static void C_ccall f_21137(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20784)
+static void C_ccall f_20784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21127)
+static void C_ccall f_21127(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21135)
+static void C_ccall f_21135(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20788)
+static void C_ccall f_20788(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21117)
+static void C_ccall f_21117(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20792)
+static void C_ccall f_20792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21107)
+static void C_ccall f_21107(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21115)
+static void C_ccall f_21115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20796)
+static void C_ccall f_20796(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21097)
+static void C_ccall f_21097(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20800)
+static void C_ccall f_20800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20804)
+static void C_ccall f_20804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20808)
+static void C_ccall f_20808(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20950)
+static void C_ccall f_20950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21085)
+static void C_ccall f_21085(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21076)
+static void C_ccall f_21076(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21011)
+static void C_ccall f_21011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21013)
+static void C_ccall f_21013(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21020)
+static void C_fcall f_21020(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21032)
+static void C_fcall f_21032(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20952)
+static void C_ccall f_20952(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20965)
+static C_word C_fcall f_20965(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_20876)
+static void C_ccall f_20876(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_20876)
+static void C_ccall f_20876r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_20889)
+static void C_fcall f_20889(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20810)
+static void C_ccall f_20810(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_20823)
+static void C_fcall f_20823(C_word t0,C_word t1,C_word t2) 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_20714)
+static void C_ccall f_20714(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20736)
+static void C_ccall f_20736(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20720)
+static void C_ccall f_20720(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20682)
+static void C_ccall f_20682(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20686)
+static void C_ccall f_20686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20689)
+static void C_ccall f_20689(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20703)
+static void C_ccall f_20703(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20699)
+static void C_ccall f_20699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20673)
+static void C_ccall f_20673(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20680)
+static void C_ccall f_20680(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20654)
+static void C_ccall f_20654(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20660)
+static void C_ccall f_20660(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20615)
+static void C_ccall f_20615(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20625)
+static void C_fcall f_20625(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20641)
+static void C_ccall f_20641(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20538)
+static void C_ccall f_20538(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_20551)
+static void C_fcall f_20551(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20603)
+static void C_ccall f_20603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20561)
+static void C_ccall f_20561(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20566)
+static void C_fcall f_20566(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20515)
+static void C_ccall f_20515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20519)
+static void C_ccall f_20519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20522)
+static void C_ccall f_20522(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_word t2,...) C_noret;
+C_noret_decl(f_20464)
+static void C_ccall f_20464r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_20471)
+static void C_ccall f_20471(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20486)
+static void C_ccall f_20486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20491)
+static void C_fcall f_20491(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20495)
+static void C_fcall f_20495(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20501)
+static void C_ccall f_20501(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20412)
+static void C_ccall f_20412(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_20412)
+static void C_ccall f_20412r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_20435)
+static void C_ccall f_20435(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20443)
+static void C_ccall f_20443(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20439)
+static void C_ccall f_20439(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20416)
+static void C_fcall f_20416(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20189)
+static void C_ccall f_20189(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_20189)
+static void C_ccall f_20189r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_20364)
+static void C_fcall f_20364(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20359)
+static void C_fcall f_20359(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20191)
+static void C_fcall f_20191(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20195)
+static void C_ccall f_20195(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20336)
+static void C_ccall f_20336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20198)
+static void C_ccall f_20198(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20221)
+static void C_ccall f_20221(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20257)
+static void C_fcall f_20257(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20318)
+static void C_ccall f_20318(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20265)
+static void C_fcall f_20265(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20291)
+static void C_fcall f_20291(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20269)
+static void C_fcall f_20269(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20275)
+static void C_fcall f_20275(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20278)
+static void C_ccall f_20278(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20235)
+static void C_fcall f_20235(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20239)
+static void C_fcall f_20239(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20245)
+static void C_ccall f_20245(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20200)
+static void C_fcall f_20200(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_20215)
+static void C_ccall f_20215(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20204)
+static void C_ccall f_20204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20166)
+static void C_ccall f_20166(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_20171)
+static void C_ccall f_20171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19944)
+static void C_ccall f_19944(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_20144)
+static void C_ccall f_20144(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20123)
+static void C_ccall f_20123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20116)
+static void C_ccall f_20116(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20100)
+static void C_ccall f_20100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20084)
+static void C_ccall f_20084(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20068)
+static void C_ccall f_20068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20052)
+static void C_ccall f_20052(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20036)
+static void C_ccall f_20036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_20020)
+static void C_ccall f_20020(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_19979)
+static void C_ccall f_19979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19966)
+static void C_ccall f_19966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19746)
+static void C_ccall f_19746(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_19746)
+static void C_ccall f_19746r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_19896)
+static void C_fcall f_19896(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19891)
+static void C_fcall f_19891(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19748)
+static void C_fcall f_19748(C_word t0,C_word t1,C_word t2,C_word t3) 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_19755)
+static void C_ccall f_19755(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19761)
+static void C_fcall f_19761(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_19860)
+static void C_ccall f_19860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19863)
+static void C_ccall f_19863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19764)
+static void C_ccall f_19764(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_19796)
+static void C_fcall f_19796(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19800)
+static void C_ccall f_19800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19803)
+static void C_ccall f_19803(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19823)
+static void C_ccall f_19823(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19819)
+static void C_ccall f_19819(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19806)
+static void C_ccall f_19806(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19767)
+static void C_ccall f_19767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19770)
+static void C_ccall f_19770(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19788)
+static void C_ccall f_19788(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19782)
+static void C_ccall f_19782(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19704)
+static void C_fcall f_19704(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_19710)
+static void C_fcall f_19710(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19734)
+static void C_ccall f_19734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19718)
+static void C_fcall f_19718(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19727)
+static void C_ccall f_19727(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_19686)
+static void C_ccall f_19686(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19690)
+static void C_ccall f_19690(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19680)
+static void C_ccall f_19680(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19648)
+static void C_ccall f_19648(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19654)
+static void C_ccall f_19654(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19666)
+static void C_ccall f_19666(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_19666)
+static void C_ccall f_19666r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_19603)
+static void C_ccall f_19603(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_19603)
+static void C_ccall f_19603r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_19575)
+static void C_ccall f_19575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19581)
+static void C_fcall f_19581(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19585)
+static void C_ccall f_19585(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19594)
+static void C_ccall f_19594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19492)
+static void C_ccall f_19492(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19512)
+static void C_ccall f_19512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19524)
+static void C_fcall f_19524(C_word t0,C_word t1,C_word t2) 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_19515)
+static void C_ccall f_19515(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19518)
+static void C_ccall f_19518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19428)
+static void C_ccall f_19428(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_19473)
+static void C_ccall f_19473(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19449)
+static void C_ccall f_19449(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19432)
+static void C_ccall f_19432(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18958)
+static void C_ccall f_18958(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18971)
+static void C_ccall f_18971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18974)
+static void C_ccall f_18974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19096)
+static void C_ccall f_19096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19099)
+static void C_ccall f_19099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19102)
+static void C_ccall f_19102(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19118)
+static void C_ccall f_19118(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19123)
+static void C_fcall f_19123(C_word t0,C_word t1,C_word t2) 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_19360)
+static void C_ccall f_19360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19297)
+static void C_ccall f_19297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19349)
+static void C_ccall f_19349(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19357)
+static void C_ccall f_19357(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19330)
+static void C_ccall f_19330(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_19313)
+static void C_ccall f_19313(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19306)
+static void C_ccall f_19306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19139)
+static void C_ccall f_19139(C_word c,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_19151)
+static void C_ccall f_19151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19168)
+static void C_fcall f_19168(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_19199)
+static void C_fcall f_19199(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19249)
+static void C_ccall f_19249(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19186)
+static void C_ccall f_19186(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19162)
+static void C_ccall f_19162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19104)
+static void C_fcall f_19104(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19108)
+static void C_ccall f_19108(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19112)
+static void C_ccall f_19112(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_noret;
+C_noret_decl(f_18986)
+static void C_ccall f_18986(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18989)
+static void C_ccall f_18989(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18995)
+static void C_ccall f_18995(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19002)
+static void C_ccall f_19002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19004)
+static void C_fcall f_19004(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_19033)
+static void C_ccall f_19033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19036)
+static void C_ccall f_19036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19043)
+static void C_ccall f_19043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19030)
+static void C_ccall f_19030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_19017)
+static void C_ccall f_19017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18913)
+static void C_fcall f_18913(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18917)
+static void C_ccall f_18917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18920)
+static void C_ccall f_18920(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18928)
+static void C_fcall f_18928(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18932)
+static void C_ccall f_18932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18923)
+static void C_ccall f_18923(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18866)
+static void C_fcall f_18866(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18870)
+static void C_ccall f_18870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18877)
+static void C_ccall f_18877(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18879)
+static void C_fcall f_18879(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18901)
+static void C_ccall f_18901(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18908)
+static void C_ccall f_18908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18844)
+static void C_ccall f_18844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18840)
+static void C_ccall f_18840(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18819)
+static void C_ccall f_18819(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18797)
+static void C_ccall f_18797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18803)
+static void C_ccall f_18803(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18812)
+static void C_ccall f_18812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18788)
+static void C_ccall f_18788(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18736)
+static void C_ccall f_18736(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18751)
+static C_word C_fcall f_18751(C_word t0);
+C_noret_decl(f_18730)
+static void C_ccall f_18730(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18707)
+static void C_ccall f_18707(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_18719)
+static void C_ccall f_18719(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18704)
+static void C_ccall f_18704(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_18694)
+static void C_ccall f_18694(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_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_noret;
+C_noret_decl(f_18682)
+static void C_ccall f_18682(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18679)
+static void C_ccall f_18679(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18676)
+static void C_ccall f_18676(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18673)
+static void C_ccall f_18673(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18670)
+static void C_ccall f_18670(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18664)
+static void C_ccall f_18664(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18668)
+static void C_ccall f_18668(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18661)
+static void C_ccall f_18661(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18658)
+static void C_ccall f_18658(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_18651)
+static void C_ccall f_18651(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_18644)
+static void C_ccall f_18644(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_18626)
+static void C_ccall f_18626(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18623)
+static void C_ccall f_18623(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18585)
+static void C_ccall f_18585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18594)
+static void C_fcall f_18594(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18604)
+static void C_ccall f_18604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18614)
+static void C_ccall f_18614(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18589)
+static void C_ccall f_18589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18524)
+static void C_ccall f_18524(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18530)
+static void C_fcall f_18530(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18540)
+static void C_ccall f_18540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18550)
+static void C_ccall f_18550(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18504)
+static void C_ccall f_18504(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18501)
+static void C_ccall f_18501(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18494)
+static void C_ccall f_18494(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_18499)
+static void C_ccall f_18499(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18488)
+static void C_ccall f_18488(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18492)
+static void C_ccall f_18492(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18472)
+static void C_ccall f_18472(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18482)
+static void C_ccall f_18482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18466)
+static void C_ccall f_18466(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18470)
+static void C_ccall f_18470(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18450)
+static void C_ccall f_18450(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18460)
+static void C_ccall f_18460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18447)
+static void C_ccall f_18447(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18444)
+static void C_ccall f_18444(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18441)
+static void C_ccall f_18441(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18438)
+static void C_ccall f_18438(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18426)
+static void C_ccall f_18426(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18419)
+static void C_ccall f_18419(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18413)
+static void C_ccall f_18413(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18417)
+static void C_ccall f_18417(C_word c,C_word t0,C_word t1) 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_18411)
+static void C_ccall f_18411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18397)
+static void C_ccall f_18397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18401)
+static void C_ccall f_18401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18394)
+static void C_ccall f_18394(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18391)
+static void C_ccall f_18391(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18388)
+static void C_ccall f_18388(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18385)
+static void C_ccall f_18385(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18382)
+static void C_ccall f_18382(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18379)
+static void C_ccall f_18379(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18376)
+static void C_ccall f_18376(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18371)
+static void C_ccall f_18371(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18368)
+static void C_ccall f_18368(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_18365)
+static void C_ccall f_18365(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_18362)
+static void C_ccall f_18362(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17976)
+static void C_ccall f_17976(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_17976)
+static void C_ccall f_17976r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_18047)
+static void C_ccall f_18047(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18051)
+static void C_ccall f_18051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18036)
+static void C_ccall f_18036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18010)
+static void C_ccall f_18010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_18014)
+static void C_ccall f_18014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17999)
+static void C_ccall f_17999(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17967)
+static void C_ccall f_17967(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_17967)
+static void C_ccall f_17967r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_17971)
+static void C_ccall f_17971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17921)
+static void C_ccall f_17921(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_17921)
+static void C_ccall f_17921r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_17929)
+static void C_ccall f_17929(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17903)
+static void C_ccall f_17903(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17905)
+static void C_ccall f_17905(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17897)
+static void C_ccall f_17897(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17761)
+static void C_ccall f_17761(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_17761)
+static void C_ccall f_17761r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_17829)
+static void C_fcall f_17829(C_word t0,C_word t1,C_word t2) 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_17775)
+static void C_ccall f_17775(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17785)
+static void C_fcall f_17785(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17783)
+static void C_ccall f_17783(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17779)
+static void C_ccall f_17779(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17869)
+static C_word C_fcall f_17869(C_word t0);
+C_noret_decl(f_17711)
+static void C_ccall f_17711(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_17711)
+static void C_ccall f_17711r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_17725)
+static void C_fcall f_17725(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17751)
+static void C_ccall f_17751(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17723)
+static void C_ccall f_17723(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17708)
+static void C_ccall f_17708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17694)
+static void C_ccall f_17694(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17704)
+static void C_ccall f_17704(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17700)
+static void C_ccall f_17700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17534)
+static void C_ccall f_17534(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17663)
+static void C_ccall f_17663(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17666)
+static void C_ccall f_17666(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17669)
+static void C_ccall f_17669(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17648)
+static void C_ccall f_17648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17651)
+static void C_ccall f_17651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17587)
+static void C_ccall f_17587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17617)
+static void C_ccall f_17617(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17591)
+static void C_ccall f_17591(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17577)
+static void C_ccall f_17577(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17580)
+static void C_ccall f_17580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17538)
+static void C_ccall f_17538(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17525)
+static void C_ccall f_17525(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17508)
+static void C_ccall f_17508(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17512)
+static void C_ccall f_17512(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17285)
+static void C_ccall f_17285(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_17285)
+static void C_ccall f_17285r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_17500)
+static void C_ccall f_17500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17373)
+static void C_fcall f_17373(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17376)
+static void C_fcall f_17376(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17396)
+static void C_fcall f_17396(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17308)
+static void C_ccall f_17308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17311)
+static void C_ccall f_17311(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17357)
+static void C_fcall f_17357(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17314)
+static void C_ccall f_17314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17322)
+static void C_fcall f_17322(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17334)
+static void C_ccall f_17334(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_17317)
+static void C_ccall f_17317(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17273)
+static void C_ccall f_17273(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17276)
+static void C_ccall f_17276(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17280)
+static void C_ccall f_17280(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17252)
+static void C_ccall f_17252(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17256)
+static void C_ccall f_17256(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_17204)
+static void C_ccall f_17204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17207)
+static void C_ccall f_17207(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17090)
+static void C_ccall f_17090(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_17090)
+static void C_ccall f_17090r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_17125)
+static void C_fcall f_17125(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17120)
+static void C_fcall f_17120(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17115)
+static void C_fcall f_17115(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_17110)
+static void C_fcall f_17110(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17092)
+static void C_fcall f_17092(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17096)
+static void C_ccall f_17096(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17109)
+static void C_ccall f_17109(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17001)
+static void C_ccall f_17001(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_17011)
+static void C_ccall f_17011(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17019)
+static void C_fcall f_17019(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17077)
+static void C_ccall f_17077(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17027)
+static void C_fcall f_17027(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_17040)
+static void C_ccall f_17040(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17043)
+static void C_ccall f_17043(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17046)
+static void C_ccall f_17046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17064)
+static void C_ccall f_17064(C_word c,C_word t0,C_word t1) 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_17049)
+static void C_ccall f_17049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17057)
+static void C_ccall f_17057(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_17014)
+static void C_ccall f_17014(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16845)
+static void C_ccall f_16845(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16845)
+static void C_ccall f_16845r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16953)
+static void C_fcall f_16953(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16948)
+static void C_fcall f_16948(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16847)
+static void C_fcall f_16847(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16851)
+static void C_ccall f_16851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16859)
+static void C_fcall f_16859(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16878)
+static void C_fcall f_16878(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16897)
+static void C_ccall f_16897(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16889)
+static void C_ccall f_16889(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16803)
+static void C_ccall f_16803(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16803)
+static void C_ccall f_16803r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16809)
+static void C_fcall f_16809(C_word t0,C_word t1,C_word t2) 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_16800)
+static void C_ccall f_16800(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16724)
+static void C_ccall f_16724(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16724)
+static void C_ccall f_16724r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16765)
+static void C_fcall f_16765(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16794)
+static void C_ccall f_16794(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16728)
+static void C_ccall f_16728(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16734)
+static void C_fcall f_16734(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16763)
+static void C_ccall f_16763(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16732)
+static void C_ccall f_16732(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16680)
+static void C_ccall f_16680(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16680)
+static void C_ccall f_16680r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16686)
+static void C_fcall f_16686(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16698)
+static void C_ccall f_16698(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_16636)
+static void C_fcall f_16636(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16651)
+static void C_ccall f_16651(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16602)
+static void C_ccall f_16602(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16618)
+static void C_ccall f_16618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16631)
+static void C_ccall f_16631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16428)
+static void C_ccall f_16428(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16428)
+static void C_ccall f_16428r(C_word t0,C_word t1,C_word t3) 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_16491)
+static void C_ccall f_16491(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_16441)
+static void C_ccall f_16441(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_16447)
+static void C_ccall f_16447(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_16474)
+static void C_ccall f_16474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16478)
+static void C_ccall f_16478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16482)
+static void C_ccall f_16482(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_16463)
+static void C_ccall f_16463(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16498)
+static void C_ccall f_16498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16502)
+static void C_ccall f_16502(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16506)
+static void C_ccall f_16506(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16421)
+static void C_ccall f_16421(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16415)
+static void C_ccall f_16415(C_word c,C_word t0,C_word t1) 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_16403)
+static void C_ccall f_16403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16397)
+static void C_ccall f_16397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16391)
+static void C_ccall f_16391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16325)
+static void C_ccall f_16325(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16386)
+static void C_ccall f_16386(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16382)
+static void C_ccall f_16382(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16375)
+static void C_ccall f_16375(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16371)
+static void C_ccall f_16371(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_16344)
+static void C_ccall f_16344(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_16285)
+static void C_ccall f_16285(C_word c,C_word t0,C_word t1,C_word t2) 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_16297)
+static void C_fcall f_16297(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_16305)
+static void C_fcall f_16305(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16292)
+static void C_ccall f_16292(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16248)
+static void C_ccall f_16248(C_word c,C_word t0,C_word t1,C_word t2) 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_16255)
+static void C_ccall f_16255(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16229)
+static void C_ccall f_16229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16233)
+static void C_ccall f_16233(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16246)
+static void C_ccall f_16246(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16211)
+static void C_ccall f_16211(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16218)
+static void C_ccall f_16218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16139)
+static void C_ccall f_16139(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_16145)
+static void C_fcall f_16145(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16174)
+static void C_fcall f_16174(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21861)
+static void C_ccall f_21861(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21889)
+static void C_ccall f_21889(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21893)
+static void C_fcall f_21893(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21896)
+static void C_ccall f_21896(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21820)
+static void C_ccall f_21820(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_21830)
+static void C_fcall f_21830(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21806)
+static void C_ccall f_21806(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21803)
+static void C_ccall f_21803(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21793)
+static void C_ccall f_21793(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21774)
+static void C_ccall f_21774(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21778)
+static void C_ccall f_21778(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21755)
+static void C_ccall f_21755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21759)
+static void C_ccall f_21759(C_word c,C_word t0,C_word t1) 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_21712)
+static void C_ccall f_21712(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16084)
+static void C_fcall f_16084(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16106)
+static void C_ccall f_16106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16112)
+static void C_ccall f_16112(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16115)
+static void C_ccall f_16115(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_16080)
+static void C_ccall f_16080(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16077)
+static void C_ccall f_16077(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16074)
+static void C_ccall f_16074(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_16047)
+static void C_ccall f_16047(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16047)
+static void C_ccall f_16047r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16053)
+static void C_fcall f_16053(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_16020)
+static void C_ccall f_16020(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_16020)
+static void C_ccall f_16020r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_16026)
+static void C_fcall f_16026(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15993)
+static void C_ccall f_15993(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_15993)
+static void C_ccall f_15993r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_15999)
+static void C_fcall f_15999(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15952)
+static void C_ccall f_15952(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15958)
+static void C_ccall f_15958(C_word c,C_word t0,C_word t1,C_word t2) 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_15960)
+static void C_ccall f_15960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15964)
+static void C_ccall f_15964(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_15971)
+static void C_ccall f_15971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15974)
+static void C_ccall f_15974(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15978)
+static void C_ccall f_15978(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_15889)
+static void C_ccall f_15889(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_15950)
+static void C_ccall f_15950(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15911)
+static void C_ccall f_15911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15939)
+static void C_ccall f_15939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15923)
+static void C_ccall f_15923(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15914)
+static void C_ccall f_15914(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15869)
+static void C_ccall f_15869(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15852)
+static void C_ccall f_15852(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15856)
+static void C_ccall f_15856(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15866)
+static void C_ccall f_15866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14906)
+static void C_ccall f_14906(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14910)
+static void C_ccall f_14910(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14913)
+static void C_ccall f_14913(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14916)
+static void C_ccall f_14916(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_15228)
+static void C_fcall f_15228(C_word t0,C_word t1,C_word t2) 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_15796)
+static void C_ccall f_15796(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15799)
+static void C_ccall f_15799(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15808)
+static void C_fcall f_15808(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15821)
+static void C_ccall f_15821(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15824)
+static void C_ccall f_15824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15762)
+static void C_ccall f_15762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15765)
+static void C_ccall f_15765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15746)
+static void C_ccall f_15746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15756)
+static void C_ccall f_15756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15749)
+static void C_ccall f_15749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15734)
+static void C_ccall f_15734(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15702)
+static void C_ccall f_15702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15712)
+static void C_ccall f_15712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15705)
+static void C_ccall f_15705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15631)
+static void C_ccall f_15631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15634)
+static void C_ccall f_15634(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15643)
+static void C_fcall f_15643(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_15678)
+static void C_ccall f_15678(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15665)
+static void C_ccall f_15665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15656)
+static void C_ccall f_15656(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15493)
+static void C_ccall f_15493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15498)
+static void C_fcall f_15498(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15546)
+static void C_ccall f_15546(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15603)
+static void C_ccall f_15603(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_15613)
+static void C_ccall f_15613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15511)
+static void C_ccall f_15511(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15484)
+static void C_ccall f_15484(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15474)
+static void C_ccall f_15474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15435)
+static void C_ccall f_15435(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15444)
+static void C_ccall f_15444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15389)
+static void C_ccall f_15389(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_noret;
+C_noret_decl(f_15410)
+static void C_ccall f_15410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15398)
+static void C_ccall f_15398(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_15277)
+static void C_ccall f_15277(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15283)
+static void C_ccall f_15283(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15323)
+static void C_ccall f_15323(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_15307)
+static void C_ccall f_15307(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15314)
+static void C_ccall f_15314(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15287)
+static void C_fcall f_15287(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15103)
+static void C_fcall f_15103(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15119)
+static void C_fcall f_15119(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15134)
+static void C_fcall f_15134(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15184)
+static void C_fcall f_15184(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15150)
+static void C_fcall f_15150(C_word t0,C_word t1) 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_15054)
+static void C_fcall f_15054(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_15061)
+static void C_ccall f_15061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15066)
+static void C_fcall f_15066(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_15079)
+static void C_ccall f_15079(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15082)
+static void C_ccall f_15082(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15033)
+static C_word C_fcall f_15033(C_word t0);
+C_noret_decl(f_14992)
+static void C_fcall f_14992(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14996)
+static void C_ccall f_14996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14999)
+static void C_ccall f_14999(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15018)
+static void C_ccall f_15018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15021)
+static void C_ccall f_15021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_15002)
+static void C_ccall f_15002(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14921)
+static void C_fcall f_14921(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14931)
+static void C_ccall f_14931(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14968)
+static void C_ccall f_14968(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14955)
+static void C_ccall f_14955(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14937)
+static void C_ccall f_14937(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_14848)
+static void C_ccall f_14848(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_14848)
+static void C_ccall f_14848r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_14856)
+static void C_ccall f_14856(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14863)
+static void C_ccall f_14863(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14866)
+static void C_ccall f_14866(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14817)
+static void C_ccall f_14817(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_14817)
+static void C_ccall f_14817r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_14821)
+static void C_ccall f_14821(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_14786)
+static void C_ccall f_14786(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_14786)
+static void C_ccall f_14786r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_14790)
+static void C_ccall f_14790(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_14758)
+static void C_ccall f_14758(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_14758)
+static void C_ccall f_14758r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_14762)
+static void C_ccall f_14762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14721)
+static void C_ccall f_14721(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_14721)
+static void C_ccall f_14721r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_14725)
+static void C_ccall f_14725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14731)
+static void C_ccall f_14731(C_word c,C_word t0,C_word t1) 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_14709)
+static void C_ccall f_14709(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14713)
+static void C_ccall f_14713(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_14645)
+static void C_ccall f_14645(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14659)
+static void C_ccall f_14659(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_14673)
+static void C_ccall f_14673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14583)
+static void C_fcall f_14583(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_14585)
+static void C_ccall f_14585(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14598)
+static void C_ccall f_14598(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14631)
+static void C_ccall f_14631(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14601)
+static void C_fcall f_14601(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14610)
+static void C_ccall f_14610(C_word c,C_word t0,C_word t1) 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_14560)
+static void C_ccall f_14560(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14523)
+static void C_ccall f_14523(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14548)
+static void C_ccall f_14548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14536)
+static void C_ccall f_14536(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14461)
+static void C_ccall f_14461(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_14449)
+static void C_ccall f_14449(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14284)
+static void C_ccall f_14284(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11891)
+static void C_ccall f_11891(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11895)
+static void C_ccall f_11895(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11898)
+static void C_ccall f_11898(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_11904)
+static void C_ccall f_11904(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11907)
+static void C_ccall f_11907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11984)
+static void C_fcall f_11984(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13601)
+static void C_ccall f_13601(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13604)
+static void C_ccall f_13604(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13610)
+static void C_fcall f_13610(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14254)
+static void C_ccall f_14254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14167)
+static void C_ccall f_14167(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13693)
+static void C_ccall f_13693(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_13755)
+static void C_fcall f_13755(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_14080)
+static void C_ccall f_14080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14136)
+static void C_ccall f_14136(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14099)
+static void C_ccall f_14099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14074)
+static void C_ccall f_14074(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14036)
+static void C_ccall f_14036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14039)
+static void C_ccall f_14039(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_14027)
+static void C_ccall f_14027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14023)
+static void C_ccall f_14023(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14003)
+static void C_ccall f_14003(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_13987)
+static void C_ccall f_13987(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_13971)
+static void C_ccall f_13971(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_13956)
+static void C_ccall f_13956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13959)
+static void C_ccall f_13959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13944)
+static void C_ccall f_13944(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13929)
+static void C_ccall f_13929(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13932)
+static void C_ccall f_13932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13917)
+static void C_ccall f_13917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13853)
+static void C_ccall f_13853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13856)
+static void C_ccall f_13856(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13859)
+static void C_ccall f_13859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13875)
+static void C_ccall f_13875(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13869)
+static void C_ccall f_13869(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13864)
+static void C_ccall f_13864(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13837)
+static void C_ccall f_13837(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_13821)
+static void C_ccall f_13821(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13828)
+static void C_ccall f_13828(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_13797)
+static void C_ccall f_13797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13785)
+static void C_ccall f_13785(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13773)
+static void C_ccall f_13773(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13749)
+static void C_ccall f_13749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13705)
+static void C_ccall f_13705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13708)
+static void C_ccall f_13708(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13714)
+static void C_fcall f_13714(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13657)
+static void C_ccall f_13657(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_13680)
+static void C_ccall f_13680(C_word c,C_word t0,C_word t1) 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_13673)
+static void C_ccall f_13673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13641)
+static void C_ccall f_13641(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_13625)
+static void C_ccall f_13625(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13632)
+static void C_ccall f_13632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13586)
+static void C_fcall f_13586(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13594)
+static void C_ccall f_13594(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13517)
+static void C_fcall f_13517(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_13524)
+static void C_ccall f_13524(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13431)
+static void C_fcall f_13431(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13435)
+static void C_ccall f_13435(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13438)
+static void C_ccall f_13438(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13444)
+static void C_ccall f_13444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13449)
+static void C_fcall f_13449(C_word t0,C_word t1,C_word t2) 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_13468)
+static void C_fcall f_13468(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13482)
+static void C_ccall f_13482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13486)
+static void C_ccall f_13486(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13478)
+static void C_ccall f_13478(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13348)
+static void C_fcall f_13348(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13354)
+static void C_fcall f_13354(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_13358)
+static void C_ccall f_13358(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_13394)
+static void C_ccall f_13394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13132)
+static void C_fcall f_13132(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13136)
+static void C_ccall f_13136(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13139)
+static void C_ccall f_13139(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13321)
+static void C_fcall f_13321(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13328)
+static void C_ccall f_13328(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13151)
+static void C_ccall f_13151(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13168)
+static void C_fcall f_13168(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13184)
+static void C_ccall f_13184(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_13057)
+static void C_fcall f_13057(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13130)
+static void C_ccall f_13130(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13071)
+static void C_ccall f_13071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13073)
+static void C_fcall f_13073(C_word t0,C_word t1,C_word t2,C_word t3) 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_13092)
+static void C_ccall f_13092(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13099)
+static void C_ccall f_13099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13027)
+static void C_fcall f_13027(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13055)
+static void C_ccall f_13055(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13042)
+static void C_ccall f_13042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13031)
+static void C_ccall f_13031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13038)
+static void C_ccall f_13038(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12972)
+static void C_fcall f_12972(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12980)
+static void C_ccall f_12980(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12982)
+static void C_fcall f_12982(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12992)
+static void C_fcall f_12992(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12998)
+static void C_ccall f_12998(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13005)
+static void C_ccall f_13005(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12910)
+static void C_fcall f_12910(C_word t0,C_word t1) 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_12920)
+static void C_fcall f_12920(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12930)
+static void C_fcall f_12930(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12936)
+static void C_fcall f_12936(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_12946)
+static void C_ccall f_12946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12840)
+static void C_fcall f_12840(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12908)
+static void C_ccall f_12908(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12850)
+static void C_ccall f_12850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12853)
+static void C_ccall f_12853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12780)
+static void C_fcall f_12780(C_word t0,C_word t1,C_word t2) 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_12790)
+static void C_ccall f_12790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12793)
+static void C_ccall f_12793(C_word c,C_word t0,C_word t1) 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_12815)
+static void C_ccall f_12815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12733)
+static void C_fcall f_12733(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12738)
+static void C_ccall f_12738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12750)
+static void C_ccall f_12750(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12765)
+static void C_ccall f_12765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12756)
+static void C_ccall f_12756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12715)
+static void C_fcall f_12715(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12719)
+static void C_ccall f_12719(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_12504)
+static void C_fcall f_12504(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12713)
+static void C_ccall f_12713(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12527)
+static void C_ccall f_12527(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12548)
+static void C_fcall f_12548(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_12706)
+static void C_ccall f_12706(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12555)
+static void C_fcall f_12555(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12558)
+static void C_ccall f_12558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12702)
+static void C_ccall f_12702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12582)
+static void C_ccall f_12582(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12585)
+static void C_ccall f_12585(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12594)
+static void C_fcall f_12594(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12664)
+static void C_ccall f_12664(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12632)
+static void C_ccall f_12632(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12635)
+static void C_ccall f_12635(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12638)
+static void C_ccall f_12638(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12597)
+static void C_ccall f_12597(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12600)
+static void C_ccall f_12600(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_12606)
+static void C_ccall f_12606(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12619)
+static void C_ccall f_12619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12530)
+static void C_ccall f_12530(C_word c,C_word t0,C_word t1,C_word t2) 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_12525)
+static void C_ccall f_12525(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12131)
+static void C_fcall f_12131(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12502)
+static void C_ccall f_12502(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12498)
+static void C_ccall f_12498(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12494)
+static void C_ccall f_12494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12145)
+static void C_ccall f_12145(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12147)
+static void C_fcall f_12147(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12483)
+static void C_ccall f_12483(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12164)
+static void C_ccall f_12164(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12433)
+static void C_fcall f_12433(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_12454)
+static void C_ccall f_12454(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12440)
+static void C_ccall f_12440(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12400)
+static void C_ccall f_12400(C_word c,C_word t0,C_word t1) 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_12420)
+static void C_ccall f_12420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12424)
+static void C_ccall f_12424(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12413)
+static void C_ccall f_12413(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12328)
+static void C_ccall f_12328(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_12387)
+static void C_ccall f_12387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12391)
+static void C_ccall f_12391(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12380)
+static void C_ccall f_12380(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12376)
+static void C_ccall f_12376(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12340)
+static void C_fcall f_12340(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12343)
+static void C_ccall f_12343(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12346)
+static void C_ccall f_12346(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_12360)
+static void C_ccall f_12360(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12319)
+static void C_ccall f_12319(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_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_12266)
+static void C_ccall f_12266(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12245)
+static void C_ccall f_12245(C_word c,C_word t0,C_word t1) C_noret;
+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_12211)
+static void C_ccall f_12211(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_12177)
+static void C_ccall f_12177(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12095)
+static void C_fcall f_12095(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12099)
+static void C_ccall f_12099(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12107)
+static void C_fcall f_12107(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12035)
+static void C_fcall f_12035(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12041)
+static void C_fcall f_12041(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12067)
+static void C_ccall f_12067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12051)
+static void C_ccall f_12051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12054)
+static void C_ccall f_12054(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12064)
+static void C_ccall f_12064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11987)
+static void C_fcall f_11987(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11995)
+static void C_ccall f_11995(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_12026)
+static void C_ccall f_12026(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_12010)
+static void C_ccall f_12010(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12017)
+static void C_ccall f_12017(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11969)
+static void C_fcall f_11969(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11973)
+static void C_ccall f_11973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11960)
+static void C_fcall f_11960(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11964)
+static void C_ccall f_11964(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11924)
+static void C_fcall f_11924(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11932)
+static void C_ccall f_11932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11934)
+static void C_fcall f_11934(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_11948)
+static void C_ccall f_11948(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11915)
+static void C_fcall f_11915(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_11909)
+static void C_ccall f_11909(C_word c,C_word t0,C_word t1,C_word t2) 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_11842)
+static void C_ccall f_11842(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11842)
+static void C_ccall f_11842r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11850)
+static void C_ccall f_11850(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_11853)
+static void C_ccall f_11853(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11816)
+static void C_ccall f_11816(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11813)
+static void C_ccall f_11813(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11810)
+static void C_ccall f_11810(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11773)
+static void C_ccall f_11773(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11773)
+static void C_ccall f_11773r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11777)
+static void C_ccall f_11777(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_11783)
+static void C_ccall f_11783(C_word c,C_word t0,C_word t1) 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_11739)
+static void C_ccall f_11739r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11743)
+static void C_ccall f_11743(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11746)
+static void C_ccall f_11746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11749)
+static void C_ccall f_11749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11714)
+static void C_ccall f_11714(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11727)
+static void C_ccall f_11727(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11702)
+static void C_ccall f_11702(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11706)
+static void C_ccall f_11706(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_11643)
+static void C_ccall f_11643(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11647)
+static void C_ccall f_11647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11615)
+static void C_ccall f_11615(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11615)
+static void C_ccall f_11615r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11619)
+static void C_ccall f_11619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11574)
+static void C_ccall f_11574(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11574)
+static void C_ccall f_11574r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11578)
+static void C_ccall f_11578(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11581)
+static void C_ccall f_11581(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11584)
+static void C_ccall f_11584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11571)
+static void C_ccall f_11571(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11472)
+static void C_ccall f_11472(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_11472)
+static void C_ccall f_11472r(C_word t0,C_word t1,C_word t2,C_word t4) 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_11553)
+static void C_ccall f_11553(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11486)
+static void C_fcall f_11486(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11490)
+static void C_ccall f_11490(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11490)
+static void C_ccall f_11490r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11521)
+static void C_ccall f_11521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11503)
+static void C_fcall f_11503(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11510)
+static void C_ccall f_11510(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11568)
+static void C_ccall f_11568(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11417)
+static void C_ccall f_11417(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11429)
+static void C_ccall f_11429(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11435)
+static void C_ccall f_11435(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11461)
+static void C_ccall f_11461(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11465)
+static void C_ccall f_11465(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11445)
+static void C_ccall f_11445(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11456)
+static void C_ccall f_11456(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11452)
+static void C_ccall f_11452(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11380)
+static void C_ccall f_11380(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11389)
+static void C_ccall f_11389(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11415)
+static void C_ccall f_11415(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11399)
+static void C_ccall f_11399(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11410)
+static void C_ccall f_11410(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11406)
+static void C_ccall f_11406(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11332)
+static void C_ccall f_11332(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11332)
+static void C_ccall f_11332r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11336)
+static void C_ccall f_11336(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11339)
+static void C_ccall f_11339(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11320)
+static void C_ccall f_11320(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11308)
+static void C_ccall f_11308(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11312)
+static void C_ccall f_11312(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11277)
+static void C_ccall f_11277(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11277)
+static void C_ccall f_11277r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f25012)
+static void C_ccall f25012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f23907)
+static void C_ccall f23907(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11281)
+static void C_ccall f_11281(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11284)
+static void C_ccall f_11284(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11243)
+static void C_ccall f_11243(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11243)
+static void C_ccall f_11243r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11247)
+static void C_ccall f_11247(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_11253)
+static void C_ccall f_11253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11230)
+static void C_ccall f_11230(C_word c,C_word t0,C_word t1,C_word t2) 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_11201)
+static void C_ccall f_11201(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11210)
+static void C_ccall f_11210(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11228)
+static void C_ccall f_11228(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_noret;
+C_noret_decl(f_11179)
+static void C_ccall f_11179(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11188)
+static void C_ccall f_11188(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11199)
+static void C_ccall f_11199(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11195)
+static void C_ccall f_11195(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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11159)
+static void C_ccall f_11159r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11163)
+static void C_ccall f_11163(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11169)
+static void C_ccall f_11169(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11169)
+static void C_ccall f_11169r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11173)
+static void C_ccall f_11173(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11139)
+static void C_ccall f_11139(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11139)
+static void C_ccall f_11139r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11143)
+static void C_ccall f_11143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11149)
+static void C_ccall f_11149(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11149)
+static void C_ccall f_11149r(C_word t0,C_word t1,C_word t3) 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_11115)
+static void C_ccall f_11115(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11115)
+static void C_ccall f_11115r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11119)
+static void C_ccall f_11119(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11130)
+static void C_ccall f_11130(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11130)
+static void C_ccall f_11130r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_11134)
+static void C_ccall f_11134(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11124)
+static void C_ccall f_11124(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11091)
+static void C_ccall f_11091(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_11091)
+static void C_ccall f_11091r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_11095)
+static void C_ccall f_11095(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11106)
+static void C_ccall f_11106(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_11106)
+static void C_ccall f_11106r(C_word t0,C_word t1,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_11100)
+static void C_ccall f_11100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11085)
+static void C_ccall f_11085(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11079)
+static void C_ccall f_11079(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_word t2,...) C_noret;
+C_noret_decl(f_11073)
+static void C_ccall f_11073r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_11067)
+static void C_ccall f_11067(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_11067)
+static void C_ccall f_11067r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_11042)
+static void C_fcall f_11042(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11046)
+static void C_ccall f_11046(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11058)
+static void C_ccall f_11058(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10944)
+static void C_fcall f_10944(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10953)
+static void C_ccall f_10953(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10989)
+static void C_fcall f_10989(C_word t0,C_word t1,C_word t2) 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_10960)
+static void C_ccall f_10960(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10963)
+static void C_ccall f_10963(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10987)
+static void C_ccall f_10987(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10969)
+static void C_ccall f_10969(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10972)
+static void C_ccall f_10972(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_10979)
+static void C_ccall f_10979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10966)
+static void C_ccall f_10966(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10854)
+static void C_ccall f_10854(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10894)
+static void C_fcall f_10894(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10928)
+static void C_ccall f_10928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10917)
+static void C_ccall f_10917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10924)
+static void C_ccall f_10924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10873)
+static void C_ccall f_10873(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10880)
+static void C_ccall f_10880(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10844)
+static void C_ccall f_10844(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_10852)
+static void C_ccall f_10852(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10810)
+static void C_ccall f_10810(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_word t3) C_noret;
+C_noret_decl(f_10792)
+static void C_ccall f_10792(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10775)
+static void C_ccall f_10775(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10790)
+static void C_ccall f_10790(C_word c,C_word t0,C_word t1) 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_10759)
+static void C_ccall f_10759r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10772)
+static void C_ccall f_10772(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10743)
+static void C_ccall f_10743(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10743)
+static void C_ccall f_10743r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10756)
+static void C_ccall f_10756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10727)
+static void C_ccall f_10727(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10727)
+static void C_ccall f_10727r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10740)
+static void C_ccall f_10740(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10712)
+static void C_ccall f_10712(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10716)
+static void C_ccall f_10716(C_word c,C_word t0,C_word t1) 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_10682)
+static void C_ccall f_10682(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_10682)
+static void C_ccall f_10682r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_10655)
+static void C_ccall f_10655(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10655)
+static void C_ccall f_10655r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10667)
+static void C_fcall f_10667(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22054)
+static void C_ccall f_22054(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_22175)
+static void C_ccall f_22175(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22061)
+static void C_fcall f_22061(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22074)
+static void C_fcall f_22074(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_22122)
+static void C_ccall f_22122(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22126)
+static void C_ccall f_22126(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22107)
+static void C_ccall f_22107(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22143)
+static void C_ccall f_22143(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_21998)
+static void C_ccall f_21998(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_22006)
+static void C_fcall f_22006(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_22008)
+static C_word C_fcall f_22008(C_word t0,C_word t1,C_word t2,C_word t3);
+C_noret_decl(f_21995)
+static void C_ccall f_21995(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21992)
+static void C_ccall f_21992(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21986)
+static void C_ccall f_21986(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21983)
+static void C_ccall f_21983(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21980)
+static void C_ccall f_21980(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_21977)
+static void C_ccall f_21977(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_21974)
+static void C_ccall f_21974(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10608)
+static void C_ccall f_10608(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_10587)
+static void C_ccall f_10587(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10570)
+static void C_ccall f_10570(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10567)
+static void C_ccall f_10567(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10552)
+static void C_ccall f_10552(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_10552)
+static void C_ccall f_10552r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_10561)
+static void C_ccall f_10561(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_word t3) C_noret;
+C_noret_decl(f_10529)
+static void C_ccall f_10529(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_word t2) C_noret;
+C_noret_decl(f_10502)
+static void C_ccall f_10502(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10444)
+static void C_fcall f_10444(C_word t0,C_word t1,C_word t2) 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_10460)
+static void C_ccall f_10460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10466)
+static void C_ccall f_10466(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10404)
+static void C_ccall f_10404(C_word c,C_word t0,C_word t1,C_word t2) 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_10416)
+static void C_ccall f_10416(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10416)
+static void C_ccall f_10416r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10420)
+static void C_ccall f_10420(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10373)
+static void C_ccall f_10373(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_10386)
+static void C_ccall f_10386(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_10386)
+static void C_ccall f_10386r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_10394)
+static void C_ccall f_10394(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10284)
+static void C_ccall f_10284(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_10284)
+static void C_ccall f_10284r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_10338)
+static void C_fcall f_10338(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10370)
+static void C_ccall f_10370(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_10355)
+static void C_ccall f_10355(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10363)
+static void C_ccall f_10363(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_10296)
+static void C_fcall f_10296(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10325)
+static void C_ccall f_10325(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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_10213)
+static void C_ccall f_10213r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_10255)
+static void C_fcall f_10255(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_10268)
+static void C_ccall f_10268(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_10225)
+static void C_fcall f_10225(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10235)
+static void C_ccall f_10235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10161)
+static void C_fcall f_10161(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10179)
+static C_word C_fcall f_10179(C_word t0);
+C_noret_decl(f_10171)
+static void C_fcall f_10171(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10116)
+static void C_fcall f_10116(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_10148)
+static void C_ccall f_10148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10152)
+static void C_ccall f_10152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10071)
+static void C_ccall f_10071(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10077)
+static void C_fcall f_10077(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10097)
+static void C_ccall f_10097(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10101)
+static void C_ccall f_10101(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_10039)
+static void C_fcall f_10039(C_word t0,C_word t1,C_word t2) 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_10027)
+static void C_ccall f_10027(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10020)
+static void C_ccall f_10020(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10015)
+static void C_ccall f_10015(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9861)
+static void C_ccall f_9861(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9861)
+static void C_ccall f_9861r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_9892)
+static void C_ccall f_9892(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9895)
+static void C_ccall f_9895(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_9820)
+static void C_fcall f_9820(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9833)
+static C_word C_fcall f_9833(C_word t0,C_word t1);
+C_noret_decl(f_9810)
+static void C_ccall f_9810(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9804)
+static void C_ccall f_9804(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_word t2) C_noret;
+C_noret_decl(f_9792)
+static void C_ccall f_9792(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9786)
+static void C_ccall f_9786(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9772)
+static void C_ccall f_9772(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9780)
+static void C_ccall f_9780(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9784)
+static void C_ccall f_9784(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_9766)
+static void C_ccall f_9766(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9770)
+static void C_ccall f_9770(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_9752)
+static void C_ccall f_9752(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9756)
+static void C_ccall f_9756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9730)
+static void C_ccall f_9730(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9738)
+static void C_ccall f_9738(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_9716)
+static void C_ccall f_9716(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9724)
+static void C_ccall f_9724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9728)
+static void C_ccall f_9728(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_word t2) C_noret;
+C_noret_decl(f_9699)
+static void C_ccall f_9699(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9687)
+static void C_ccall f_9687(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9675)
+static void C_ccall f_9675(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9663)
+static void C_ccall f_9663(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_word t3) C_noret;
+C_noret_decl(f_9639)
+static void C_ccall f_9639(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9633)
+static void C_ccall f_9633(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9627)
+static void C_ccall f_9627(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_word t2) C_noret;
+C_noret_decl(f_9589)
+static void C_fcall f_9589(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9593)
+static void C_ccall f_9593(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9601)
+static C_word C_fcall f_9601(C_word t0,C_word t1);
+C_noret_decl(f_9555)
+static void C_ccall f_9555(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_9555)
+static void C_ccall f_9555r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_9559)
+static void C_ccall f_9559(C_word c,C_word t0,C_word t1) C_noret;
+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_9484)
+static void C_ccall f_9484r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) 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_9511)
+static C_word C_fcall f_9511(C_word t0,C_word t1);
+C_noret_decl(f_9456)
+static void C_ccall f_9456(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9465)
+static C_word C_fcall f_9465(C_word t0,C_word t1);
+C_noret_decl(f_9450)
+static void C_ccall f_9450(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_9450)
+static void C_ccall f_9450r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_9417)
+static void C_ccall f_9417(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9426)
+static void C_fcall f_9426(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9444)
+static void C_ccall f_9444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9365)
+static void C_ccall f_9365(C_word c,C_word t0,C_word t1,C_word t2) 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_9386)
+static C_word C_fcall f_9386(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_9336)
+static void C_ccall f_9336(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_9336)
+static void C_ccall f_9336r(C_word t0,C_word t1,C_word t2,C_word t4) 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_9333)
+static void C_ccall f_9333(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9330)
+static void C_ccall f_9330(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_noret;
+C_noret_decl(f_9324)
+static void C_ccall f_9324(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9299)
+static void C_ccall f_9299(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9303)
+static void C_ccall f_9303(C_word c,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_9287)
+static void C_ccall f_9287(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9291)
+static void C_ccall f_9291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9297)
+static void C_ccall f_9297(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9275)
+static void C_ccall f_9275(C_word c,C_word t0,C_word t1,C_word t2) 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_9266)
+static void C_ccall f_9266(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9270)
+static void C_ccall f_9270(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_word t2) 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_9245)
+static void C_ccall f_9245(C_word c,C_word t0,C_word t1,C_word t2) 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_9205)
+static void C_ccall f_9205(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_9205)
+static void C_ccall f_9205r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_9190)
+static void C_ccall f_9190(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9197)
+static void C_ccall f_9197(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9169)
+static void C_ccall f_9169(C_word c,C_word t0,C_word t1,C_word t2) 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_9180)
+static void C_ccall f_9180(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9149)
+static void C_ccall f_9149(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_9095)
+static void C_ccall f_9095r(C_word t0,C_word t1,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(f23857)
+static void C_ccall f23857(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f23853)
+static void C_ccall f23853(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_9120)
+static void C_ccall f_9120(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9112)
+static void C_ccall f_9112(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9082)
+static void C_ccall f_9082(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9093)
+static void C_ccall f_9093(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9069)
+static void C_ccall f_9069(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9080)
+static void C_ccall f_9080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9056)
+static void C_ccall f_9056(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9067)
+static void C_ccall f_9067(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9043)
+static void C_ccall f_9043(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_9020)
+static void C_ccall f_9020(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9002)
+static void C_ccall f_9002(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8976)
+static void C_ccall f_8976(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8996)
+static void C_ccall f_8996(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9000)
+static void C_ccall f_9000(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8958)
+static void C_ccall f_8958(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8931)
+static C_word C_fcall f_8931(C_word t0,C_word t1);
+C_noret_decl(f_8919)
+static void C_ccall f_8919(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8916)
+static void C_ccall f_8916(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8911)
+static void C_ccall f_8911(C_word c,C_word t0,C_word t1,C_word t2) 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_8879)
+static void C_ccall f_8879r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8883)
+static void C_ccall f_8883(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_noret;
+C_noret_decl(f_8814)
+static void C_ccall f_8814r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8826)
+static void C_fcall f_8826(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8836)
+static void C_ccall f_8836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8851)
+static void C_ccall f_8851(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8862)
+static void C_ccall f_8862(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8800)
+static void C_ccall f_8800(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_8743)
+static void C_ccall f_8743(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_8743)
+static void C_ccall f_8743r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_8755)
+static void C_fcall f_8755(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8765)
+static void C_ccall f_8765(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8780)
+static void C_ccall f_8780(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_8718)
+static void C_ccall f_8718(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8724)
+static void C_fcall f_8724(C_word t0,C_word t1,C_word t2,C_word t3) 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_8706)
+static void C_ccall f_8706(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_8706)
+static void C_ccall f_8706r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_8703)
+static void C_ccall f_8703(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8700)
+static void C_ccall f_8700(C_word c,C_word t0,C_word t1,C_word t2) 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_8694)
+static void C_ccall f_8694(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8691)
+static void C_ccall f_8691(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8688)
+static void C_ccall f_8688(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8685)
+static void C_ccall f_8685(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8682)
+static void C_ccall f_8682(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8676)
+static void C_ccall f_8676(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_8676)
+static void C_ccall f_8676r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_8670)
+static void C_ccall f_8670(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_8670)
+static void C_ccall f_8670r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_8623)
+static void C_fcall f_8623(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8629)
+static void C_fcall f_8629(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8653)
+static void C_ccall f_8653(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_noret;
+C_noret_decl(f_8618)
+static void C_ccall f_8618(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8615)
+static void C_ccall f_8615(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8586)
+static void C_ccall f_8586(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8607)
+static void C_ccall f_8607(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8572)
+static void C_ccall f_8572(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8584)
+static void C_ccall f_8584(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8563)
+static void C_ccall f_8563(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_8539)
+static void C_ccall f_8539(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8527)
+static void C_ccall f_8527(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8523)
+static void C_ccall f_8523(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8488)
+static void C_ccall f_8488(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8519)
+static void C_ccall f_8519(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8513)
+static void C_ccall f_8513(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_8475)
+static void C_ccall f_8475(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8463)
+static void C_ccall f_8463(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_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_8432)
+static void C_ccall f_8432(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8429)
+static void C_ccall f_8429(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8426)
+static void C_ccall f_8426(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_8420)
+static void C_ccall f_8420(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8417)
+static void C_ccall f_8417(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8414)
+static void C_ccall f_8414(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8411)
+static void C_ccall f_8411(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8408)
+static void C_ccall f_8408(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8402)
+static void C_ccall f_8402(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8399)
+static void C_ccall f_8399(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8395)
+static void C_ccall f_8395(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8391)
+static void C_ccall f_8391(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8385)
+static void C_ccall f_8385(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8378)
+static void C_ccall f_8378(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_word t2) C_noret;
+C_noret_decl(f_8346)
+static void C_ccall f_8346(C_word c,C_word t0,C_word t1,C_word t2) 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_8329)
+static void C_ccall f_8329(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8344)
+static void C_ccall f_8344(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8306)
+static void C_ccall f_8306(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8327)
+static void C_ccall f_8327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8289)
+static void C_ccall f_8289(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8304)
+static void C_ccall f_8304(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8266)
+static void C_ccall f_8266(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8287)
+static void C_ccall f_8287(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8249)
+static void C_ccall f_8249(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8264)
+static void C_ccall f_8264(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8232)
+static void C_ccall f_8232(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8247)
+static void C_ccall f_8247(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_8230)
+static void C_ccall f_8230(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_word t2) 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_8181)
+static void C_ccall f_8181(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8196)
+static void C_ccall f_8196(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_word t2) C_noret;
+C_noret_decl(f_8179)
+static void C_ccall f_8179(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8147)
+static void C_ccall f_8147(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8162)
+static void C_ccall f_8162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8130)
+static void C_ccall f_8130(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8145)
+static void C_ccall f_8145(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_word t2) C_noret;
+C_noret_decl(f_8128)
+static void C_ccall f_8128(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8096)
+static void C_ccall f_8096(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8111)
+static void C_ccall f_8111(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8073)
+static void C_ccall f_8073(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_8050)
+static void C_ccall f_8050(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8071)
+static void C_ccall f_8071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8033)
+static void C_ccall f_8033(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8048)
+static void C_ccall f_8048(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8010)
+static void C_ccall f_8010(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8031)
+static void C_ccall f_8031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7987)
+static void C_ccall f_7987(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8008)
+static void C_ccall f_8008(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7964)
+static void C_ccall f_7964(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_7941)
+static void C_ccall f_7941(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7962)
+static void C_ccall f_7962(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_7939)
+static void C_ccall f_7939(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7895)
+static void C_ccall f_7895(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7916)
+static void C_ccall f_7916(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7872)
+static void C_ccall f_7872(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7893)
+static void C_ccall f_7893(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7849)
+static void C_ccall f_7849(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7870)
+static void C_ccall f_7870(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7826)
+static void C_ccall f_7826(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_7820)
+static void C_ccall f_7820(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7817)
+static void C_ccall f_7817(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7790)
+static void C_ccall f_7790(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7805)
+static void C_ccall f_7805(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7773)
+static void C_ccall f_7773(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_7770)
+static void C_ccall f_7770(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7767)
+static void C_ccall f_7767(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7764)
+static void C_ccall f_7764(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7761)
+static void C_ccall f_7761(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7758)
+static void C_ccall f_7758(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7755)
+static void C_ccall f_7755(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7752)
+static void C_ccall f_7752(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7749)
+static void C_ccall f_7749(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7746)
+static void C_ccall f_7746(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7743)
+static void C_ccall f_7743(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7740)
+static void C_ccall f_7740(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7737)
+static void C_ccall f_7737(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7734)
+static void C_ccall f_7734(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7728)
+static void C_ccall f_7728(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7725)
+static void C_ccall f_7725(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7722)
+static void C_ccall f_7722(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7719)
+static void C_ccall f_7719(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7716)
+static void C_ccall f_7716(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7677)
+static void C_ccall f_7677(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7681)
+static void C_ccall f_7681(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7686)
+static C_word C_fcall f_7686(C_word t0,C_word t1,C_word t2);
+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_7671)
+static void C_ccall f_7671r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7632)
+static void C_ccall f_7632(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_7632)
+static void C_ccall f_7632r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_7638)
+static void C_fcall f_7638(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+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_7649)
+static void C_ccall f_7649(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_7616)
+static void C_ccall f_7616(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_7595)
+static void C_ccall f_7595(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7601)
+static void C_ccall f_7601(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7574)
+static void C_ccall f_7574(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7580)
+static void C_ccall f_7580(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7550)
+static void C_ccall f_7550(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7526)
+static void C_ccall f_7526(C_word c,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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7506)
+static void C_fcall f_7506(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7485)
+static void C_ccall f_7485(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7491)
+static void C_ccall f_7491(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7464)
+static void C_ccall f_7464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7470)
+static void C_ccall f_7470(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7440)
+static void C_ccall f_7440(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7446)
+static void C_ccall f_7446(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7416)
+static void C_ccall f_7416(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7422)
+static void C_ccall f_7422(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7396)
+static void C_fcall f_7396(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_7393)
+static void C_ccall f_7393(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7390)
+static void C_ccall f_7390(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_word t4) C_noret;
+C_noret_decl(f_7384)
+static void C_ccall f_7384(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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_7329)
+static void C_ccall f_7329r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_7339)
+static void C_fcall f_7339(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7348)
+static void C_fcall f_7348(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7317)
+static void C_ccall f_7317(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7327)
+static void C_ccall f_7327(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7304)
+static void C_ccall f_7304(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7252)
+static void C_ccall f_7252(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7265)
+static void C_ccall f_7265(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7274)
+static C_word C_fcall f_7274(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_7200)
+static void C_ccall f_7200(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_7221)
+static C_word C_fcall f_7221(C_word t0,C_word t1,C_word t2);
+C_noret_decl(f_7170)
+static void C_ccall f_7170(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7179)
+static void C_fcall f_7179(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_7134)
+static void C_ccall f_7134(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7134)
+static void C_ccall f_7134r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7141)
+static void C_ccall f_7141(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7101)
+static void C_ccall f_7101(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_7101)
+static void C_ccall f_7101r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_7105)
+static void C_ccall f_7105(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_word t2,C_word t3,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_word t2,C_word t3) C_noret;
+C_noret_decl(f_7092)
+static void C_ccall f_7092(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7089)
+static void C_ccall f_7089(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7086)
+static void C_ccall f_7086(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7083)
+static void C_ccall f_7083(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7080)
+static void C_ccall f_7080(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7077)
+static void C_ccall f_7077(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7074)
+static void C_ccall f_7074(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7071)
+static void C_ccall f_7071(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7068)
+static void C_ccall f_7068(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_7029)
+static void C_ccall f_7029(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7035)
+static void C_fcall f_7035(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6950)
+static void C_ccall f_6950(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_6950)
+static void C_ccall f_6950r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6962)
+static void C_fcall f_6962(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6981)
+static void C_fcall f_6981(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_7012)
+static void C_ccall f_7012(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_word t2,...) C_noret;
+C_noret_decl(f_6933)
+static void C_ccall f_6933r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6890)
+static void C_ccall f_6890(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6896)
+static void C_fcall f_6896(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6923)
+static void C_ccall f_6923(C_word c,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_word t3) C_noret;
+C_noret_decl(f_6884)
+static void C_ccall f_6884(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6881)
+static void C_ccall f_6881(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6878)
+static void C_ccall f_6878(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_6878)
+static void C_ccall f_6878r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6872)
+static void C_ccall f_6872(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6854)
+static void C_ccall f_6854(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_6826)
+static void C_ccall f_6826(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6820)
+static void C_ccall f_6820(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6809)
+static void C_ccall f_6809(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_6781)
+static void C_ccall f_6781(C_word c,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_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_6760)
+static void C_ccall f_6760(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6754)
+static void C_ccall f_6754(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6743)
+static void C_ccall f_6743(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_6715)
+static void C_ccall f_6715(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6701)
+static void C_ccall f_6701(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6687)
+static void C_ccall f_6687(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6681)
+static void C_ccall f_6681(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6667)
+static void C_ccall f_6667(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6660)
+static void C_ccall f_6660(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6654)
+static void C_ccall f_6654(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6640)
+static void C_ccall f_6640(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_6607)
+static void C_ccall f_6607(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6604)
+static void C_ccall f_6604(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6601)
+static void C_ccall f_6601(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6598)
+static void C_ccall f_6598(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6595)
+static void C_ccall f_6595(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6592)
+static void C_ccall f_6592(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6589)
+static void C_ccall f_6589(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6586)
+static void C_ccall f_6586(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6583)
+static void C_ccall f_6583(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6580)
+static void C_ccall f_6580(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6577)
+static void C_ccall f_6577(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6574)
+static void C_ccall f_6574(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6571)
+static void C_ccall f_6571(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6568)
+static void C_ccall f_6568(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6565)
+static void C_ccall f_6565(C_word c,C_word t0,C_word t1,C_word t2) 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_noret;
+C_noret_decl(f_6557)
+static void C_ccall f_6557(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6563)
+static void C_ccall f_6563(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6532)
+static void C_ccall f_6532(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6545)
+static void C_ccall f_6545(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6516)
+static void C_ccall f_6516(C_word c,C_word t0,C_word t1,C_word t2) 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_6503)
+static void C_ccall f_6503r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6481)
+static void C_ccall f_6481(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6481)
+static void C_ccall f_6481r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6450)
+static void C_ccall f_6450(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,...) C_noret;
+C_noret_decl(f_6450)
+static void C_ccall f_6450r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t6) C_noret;
+C_noret_decl(f_6431)
+static void C_ccall f_6431(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6431)
+static void C_ccall f_6431r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6418)
+static void C_ccall f_6418(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6418)
+static void C_ccall f_6418r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6405)
+static void C_ccall f_6405(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6405)
+static void C_ccall f_6405r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6392)
+static void C_ccall f_6392(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6392)
+static void C_ccall f_6392r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6379)
+static void C_ccall f_6379(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6379)
+static void C_ccall f_6379r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6366)
+static void C_ccall f_6366(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6366)
+static void C_ccall f_6366r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6353)
+static void C_ccall f_6353(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6353)
+static void C_ccall f_6353r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6340)
+static void C_ccall f_6340(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6340)
+static void C_ccall f_6340r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6327)
+static void C_ccall f_6327(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6327)
+static void C_ccall f_6327r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6314)
+static void C_ccall f_6314(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6314)
+static void C_ccall f_6314r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6300)
+static void C_ccall f_6300(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6300)
+static void C_ccall f_6300r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6287)
+static void C_ccall f_6287(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_6287)
+static void C_ccall f_6287r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_6284)
+static void C_ccall f_6284(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6254)
+static void C_ccall f_6254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6257)
+static void C_ccall f_6257(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6241)
+static void C_ccall f_6241(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6237)
+static void C_ccall f_6237(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6234)
+static void C_ccall f_6234(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6229)
+static void C_ccall f_6229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6226)
+static void C_ccall f_6226(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6223)
+static void C_ccall f_6223(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6220)
+static void C_ccall f_6220(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6214)
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6210)
+static void C_ccall f_6210(C_word c,C_word t0,C_word t1) 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_6194)
+static void C_ccall f_6194(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_word t2) C_noret;
+C_noret_decl(f_6178)
+static void C_ccall f_6178(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6173)
+static void C_ccall f_6173(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6170)
+static void C_ccall f_6170(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6166)
+static void C_ccall f_6166(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6151)
+static void C_ccall f_6151(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_6151)
+static void C_ccall f_6151r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6142)
+static void C_ccall f_6142(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6142)
+static void C_ccall f_6142r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6126)
+static void C_ccall f_6126(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_6126)
+static void C_ccall f_6126r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6117)
+static void C_ccall f_6117(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6121)
+static void C_ccall f_6121(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_6107)
+static void C_ccall f_6107r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_6115)
+static void C_ccall f_6115(C_word c,C_word t0,C_word t1) C_noret;
+
+C_noret_decl(trf_16426)
+static void C_fcall trf_16426(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16426(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16426(t0,t1);}
+
+C_noret_decl(trf_16669)
+static void C_fcall trf_16669(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16669(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16669(t0,t1);}
+
+C_noret_decl(trf_16672)
+static void C_fcall trf_16672(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16672(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16672(t0,t1);}
+
+C_noret_decl(trf_16675)
+static void C_fcall trf_16675(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16675(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16675(t0,t1);}
+
+C_noret_decl(trf_16678)
+static void C_fcall trf_16678(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16678(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16678(t0,t1);}
+
+C_noret_decl(trf_21585)
+static void C_fcall trf_21585(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21585(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_21585(t0,t1,t2);}
+
+C_noret_decl(trf_21593)
+static void C_fcall trf_21593(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21593(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_21593(t0,t1,t2);}
+
+C_noret_decl(trf_21528)
+static void C_fcall trf_21528(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21528(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_21528(t0,t1,t2);}
+
+C_noret_decl(trf_21372)
+static void C_fcall trf_21372(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21372(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_21372(t0,t1,t2);}
+
+C_noret_decl(trf_21391)
+static void C_fcall trf_21391(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21391(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_21391(t0,t1);}
+
+C_noret_decl(trf_21020)
+static void C_fcall trf_21020(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21020(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_21020(t0,t1);}
+
+C_noret_decl(trf_21032)
+static void C_fcall trf_21032(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21032(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_21032(t0,t1,t2);}
+
+C_noret_decl(trf_20889)
+static void C_fcall trf_20889(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20889(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20889(t0,t1,t2);}
+
+C_noret_decl(trf_20823)
+static void C_fcall trf_20823(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20823(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20823(t0,t1,t2);}
+
+C_noret_decl(trf_20625)
+static void C_fcall trf_20625(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20625(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20625(t0,t1,t2);}
+
+C_noret_decl(trf_20551)
+static void C_fcall trf_20551(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20551(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20551(t0,t1,t2);}
+
+C_noret_decl(trf_20566)
+static void C_fcall trf_20566(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20566(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20566(t0,t1,t2);}
+
+C_noret_decl(trf_20491)
+static void C_fcall trf_20491(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20491(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20491(t0,t1);}
+
+C_noret_decl(trf_20495)
+static void C_fcall trf_20495(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20495(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20495(t0,t1);}
+
+C_noret_decl(trf_20416)
+static void C_fcall trf_20416(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20416(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20416(t0,t1);}
+
+C_noret_decl(trf_20364)
+static void C_fcall trf_20364(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20364(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20364(t0,t1);}
+
+C_noret_decl(trf_20359)
+static void C_fcall trf_20359(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20359(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20359(t0,t1,t2);}
+
+C_noret_decl(trf_20191)
+static void C_fcall trf_20191(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20191(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_20191(t0,t1,t2,t3);}
+
+C_noret_decl(trf_20257)
+static void C_fcall trf_20257(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20257(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20257(t0,t1,t2);}
+
+C_noret_decl(trf_20265)
+static void C_fcall trf_20265(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20265(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_20265(t0,t1,t2);}
+
+C_noret_decl(trf_20291)
+static void C_fcall trf_20291(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20291(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20291(t0,t1);}
+
+C_noret_decl(trf_20269)
+static void C_fcall trf_20269(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20269(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20269(t0,t1);}
+
+C_noret_decl(trf_20275)
+static void C_fcall trf_20275(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20275(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20275(t0,t1);}
+
+C_noret_decl(trf_20235)
+static void C_fcall trf_20235(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20235(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20235(t0,t1);}
+
+C_noret_decl(trf_20239)
+static void C_fcall trf_20239(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20239(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_20239(t0,t1);}
+
+C_noret_decl(trf_20200)
+static void C_fcall trf_20200(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_20200(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_20200(t0,t1,t2,t3);}
+
+C_noret_decl(trf_19896)
+static void C_fcall trf_19896(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19896(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19896(t0,t1);}
+
+C_noret_decl(trf_19891)
+static void C_fcall trf_19891(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19891(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19891(t0,t1,t2);}
+
+C_noret_decl(trf_19748)
+static void C_fcall trf_19748(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19748(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_19748(t0,t1,t2,t3);}
+
+C_noret_decl(trf_19761)
+static void C_fcall trf_19761(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19761(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19761(t0,t1);}
+
+C_noret_decl(trf_19796)
+static void C_fcall trf_19796(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19796(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19796(t0,t1,t2);}
+
+C_noret_decl(trf_19704)
+static void C_fcall trf_19704(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19704(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_19704(t0,t1,t2,t3);}
+
+C_noret_decl(trf_19710)
+static void C_fcall trf_19710(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19710(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19710(t0,t1,t2);}
+
+C_noret_decl(trf_19718)
+static void C_fcall trf_19718(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19718(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19718(t0,t1,t2);}
+
+C_noret_decl(trf_19581)
+static void C_fcall trf_19581(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19581(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19581(t0,t1);}
+
+C_noret_decl(trf_19524)
+static void C_fcall trf_19524(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19524(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19524(t0,t1,t2);}
+
+C_noret_decl(trf_19123)
+static void C_fcall trf_19123(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19123(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19123(t0,t1,t2);}
+
+C_noret_decl(trf_19168)
+static void C_fcall trf_19168(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19168(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_19168(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_19199)
+static void C_fcall trf_19199(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19199(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19199(t0,t1);}
+
+C_noret_decl(trf_19104)
+static void C_fcall trf_19104(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19104(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_19104(t0,t1);}
+
+C_noret_decl(trf_19004)
+static void C_fcall trf_19004(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_19004(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_19004(t0,t1,t2);}
+
+C_noret_decl(trf_18913)
+static void C_fcall trf_18913(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18913(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_18913(t0,t1,t2,t3);}
+
+C_noret_decl(trf_18928)
+static void C_fcall trf_18928(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18928(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_18928(t0,t1);}
+
+C_noret_decl(trf_18866)
+static void C_fcall trf_18866(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18866(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18866(t0,t1,t2);}
+
+C_noret_decl(trf_18879)
+static void C_fcall trf_18879(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18879(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18879(t0,t1,t2);}
+
+C_noret_decl(trf_18594)
+static void C_fcall trf_18594(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18594(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18594(t0,t1,t2);}
+
+C_noret_decl(trf_18530)
+static void C_fcall trf_18530(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_18530(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_18530(t0,t1,t2);}
+
+C_noret_decl(trf_17829)
+static void C_fcall trf_17829(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17829(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17829(t0,t1,t2);}
+
+C_noret_decl(trf_17785)
+static void C_fcall trf_17785(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17785(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17785(t0,t1,t2);}
+
+C_noret_decl(trf_17725)
+static void C_fcall trf_17725(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17725(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17725(t0,t1,t2);}
+
+C_noret_decl(trf_17373)
+static void C_fcall trf_17373(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17373(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17373(t0,t1);}
+
+C_noret_decl(trf_17376)
+static void C_fcall trf_17376(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17376(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17376(t0,t1);}
+
+C_noret_decl(trf_17396)
+static void C_fcall trf_17396(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17396(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17396(t0,t1);}
+
+C_noret_decl(trf_17357)
+static void C_fcall trf_17357(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17357(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17357(t0,t1);}
+
+C_noret_decl(trf_17322)
+static void C_fcall trf_17322(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17322(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17322(t0,t1,t2);}
+
+C_noret_decl(trf_17125)
+static void C_fcall trf_17125(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17125(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_17125(t0,t1);}
+
+C_noret_decl(trf_17120)
+static void C_fcall trf_17120(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17120(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17120(t0,t1,t2);}
+
+C_noret_decl(trf_17115)
+static void C_fcall trf_17115(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17115(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_17115(t0,t1,t2,t3);}
+
+C_noret_decl(trf_17110)
+static void C_fcall trf_17110(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17110(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_17110(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_17092)
+static void C_fcall trf_17092(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17092(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_17092(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_17019)
+static void C_fcall trf_17019(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17019(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17019(t0,t1,t2);}
+
+C_noret_decl(trf_17027)
+static void C_fcall trf_17027(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_17027(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_17027(t0,t1,t2);}
+
+C_noret_decl(trf_16953)
+static void C_fcall trf_16953(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16953(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16953(t0,t1);}
+
+C_noret_decl(trf_16948)
+static void C_fcall trf_16948(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16948(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16948(t0,t1,t2);}
+
+C_noret_decl(trf_16847)
+static void C_fcall trf_16847(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16847(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16847(t0,t1,t2);}
+
+C_noret_decl(trf_16859)
+static void C_fcall trf_16859(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16859(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16859(t0,t1,t2);}
+
+C_noret_decl(trf_16878)
+static void C_fcall trf_16878(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16878(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16878(t0,t1);}
+
+C_noret_decl(trf_16809)
+static void C_fcall trf_16809(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16809(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16809(t0,t1,t2);}
+
+C_noret_decl(trf_16765)
+static void C_fcall trf_16765(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16765(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16765(t0,t1,t2);}
+
+C_noret_decl(trf_16734)
+static void C_fcall trf_16734(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16734(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16734(t0,t1,t2);}
+
+C_noret_decl(trf_16686)
+static void C_fcall trf_16686(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16686(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16686(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16636(t0,t1);}
+
+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_16297)
+static void C_fcall trf_16297(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16297(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16297(t0,t1,t2);}
+
+C_noret_decl(trf_16305)
+static void C_fcall trf_16305(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16305(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16305(t0,t1,t2);}
+
+C_noret_decl(trf_16145)
+static void C_fcall trf_16145(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16145(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_16145(t0,t1,t2);}
+
+C_noret_decl(trf_16174)
+static void C_fcall trf_16174(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16174(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_16174(t0,t1);}
+
+C_noret_decl(trf_21893)
+static void C_fcall trf_21893(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21893(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_21893(t0,t1);}
+
+C_noret_decl(trf_21830)
+static void C_fcall trf_21830(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_21830(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_21830(t0,t1);}
+
+C_noret_decl(trf_16084)
+static void C_fcall trf_16084(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16084(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_16084(t0,t1,t2,t3);}
+
+C_noret_decl(trf_16053)
+static void C_fcall trf_16053(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16053(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_16053(t0,t1,t2,t3);}
+
+C_noret_decl(trf_16026)
+static void C_fcall trf_16026(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_16026(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_16026(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15999)
+static void C_fcall trf_15999(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15999(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_15999(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15228)
+static void C_fcall trf_15228(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15228(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15228(t0,t1,t2);}
+
+C_noret_decl(trf_15808)
+static void C_fcall trf_15808(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15808(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_15808(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15643)
+static void C_fcall trf_15643(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15643(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15643(t0,t1,t2);}
+
+C_noret_decl(trf_15498)
+static void C_fcall trf_15498(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15498(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_15498(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15287)
+static void C_fcall trf_15287(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15287(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15287(t0,t1,t2);}
+
+C_noret_decl(trf_15103)
+static void C_fcall trf_15103(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15103(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15103(t0,t1,t2);}
+
+C_noret_decl(trf_15119)
+static void C_fcall trf_15119(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15119(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15119(t0,t1);}
+
+C_noret_decl(trf_15134)
+static void C_fcall trf_15134(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15134(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15134(t0,t1,t2);}
+
+C_noret_decl(trf_15184)
+static void C_fcall trf_15184(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15184(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15184(t0,t1);}
+
+C_noret_decl(trf_15150)
+static void C_fcall trf_15150(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15150(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_15150(t0,t1);}
+
+C_noret_decl(trf_15054)
+static void C_fcall trf_15054(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15054(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_15054(t0,t1,t2,t3);}
+
+C_noret_decl(trf_15066)
+static void C_fcall trf_15066(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_15066(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_15066(t0,t1,t2);}
+
+C_noret_decl(trf_14992)
+static void C_fcall trf_14992(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14992(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_14992(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14921)
+static void C_fcall trf_14921(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14921(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_14921(t0,t1,t2,t3);}
+
+C_noret_decl(trf_14583)
+static void C_fcall trf_14583(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14583(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_14583(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_14601)
+static void C_fcall trf_14601(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14601(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_14601(t0,t1);}
+
+C_noret_decl(trf_11984)
+static void C_fcall trf_11984(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11984(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11984(t0,t1);}
+
+C_noret_decl(trf_13610)
+static void C_fcall trf_13610(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13610(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13610(t0,t1);}
+
+C_noret_decl(trf_13755)
+static void C_fcall trf_13755(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13755(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13755(t0,t1);}
+
+C_noret_decl(trf_13714)
+static void C_fcall trf_13714(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13714(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13714(t0,t1);}
+
+C_noret_decl(trf_13586)
+static void C_fcall trf_13586(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13586(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13586(t0,t1,t2);}
+
+C_noret_decl(trf_13517)
+static void C_fcall trf_13517(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13517(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13517(t0,t1,t2);}
+
+C_noret_decl(trf_13431)
+static void C_fcall trf_13431(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13431(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13431(t0,t1);}
+
+C_noret_decl(trf_13449)
+static void C_fcall trf_13449(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13449(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13449(t0,t1,t2);}
+
+C_noret_decl(trf_13468)
+static void C_fcall trf_13468(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13468(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13468(t0,t1);}
+
+C_noret_decl(trf_13348)
+static void C_fcall trf_13348(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13348(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13348(t0,t1);}
+
+C_noret_decl(trf_13354)
+static void C_fcall trf_13354(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13354(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_13354(t0,t1,t2);}
+
+C_noret_decl(trf_13132)
+static void C_fcall trf_13132(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13132(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13132(t0,t1);}
+
+C_noret_decl(trf_13321)
+static void C_fcall trf_13321(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13321(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13321(t0,t1);}
+
+C_noret_decl(trf_13168)
+static void C_fcall trf_13168(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13168(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13168(t0,t1);}
+
+C_noret_decl(trf_13057)
+static void C_fcall trf_13057(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13057(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13057(t0,t1);}
+
+C_noret_decl(trf_13073)
+static void C_fcall trf_13073(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13073(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_13073(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13027)
+static void C_fcall trf_13027(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13027(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13027(t0,t1);}
+
+C_noret_decl(trf_12972)
+static void C_fcall trf_12972(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12972(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12972(t0,t1);}
+
+C_noret_decl(trf_12982)
+static void C_fcall trf_12982(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12982(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_12982(t0,t1,t2,t3);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12992(t0,t1);}
+
+C_noret_decl(trf_12910)
+static void C_fcall trf_12910(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12910(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12910(t0,t1);}
+
+C_noret_decl(trf_12920)
+static void C_fcall trf_12920(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12920(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_12920(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12930)
+static void C_fcall trf_12930(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12930(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12930(t0,t1);}
+
+C_noret_decl(trf_12936)
+static void C_fcall trf_12936(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12936(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12936(t0,t1);}
+
+C_noret_decl(trf_12840)
+static void C_fcall trf_12840(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12840(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12840(t0,t1);}
+
+C_noret_decl(trf_12780)
+static void C_fcall trf_12780(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12780(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12780(t0,t1,t2);}
+
+C_noret_decl(trf_12733)
+static void C_fcall trf_12733(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12733(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12733(t0,t1,t2);}
+
+C_noret_decl(trf_12715)
+static void C_fcall trf_12715(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12715(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12715(t0,t1);}
+
+C_noret_decl(trf_12504)
+static void C_fcall trf_12504(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12504(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_12504(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12548)
+static void C_fcall trf_12548(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12548(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12548(t0,t1,t2);}
+
+C_noret_decl(trf_12555)
+static void C_fcall trf_12555(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12555(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12555(t0,t1);}
+
+C_noret_decl(trf_12594)
+static void C_fcall trf_12594(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12594(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12594(t0,t1);}
+
+C_noret_decl(trf_12131)
+static void C_fcall trf_12131(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12131(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12131(t0,t1,t2);}
+
+C_noret_decl(trf_12147)
+static void C_fcall trf_12147(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12147(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_12147(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12433)
+static void C_fcall trf_12433(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12433(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12433(t0,t1);}
+
+C_noret_decl(trf_12340)
+static void C_fcall trf_12340(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12340(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12340(t0,t1);}
+
+C_noret_decl(trf_12095)
+static void C_fcall trf_12095(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12095(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12095(t0,t1,t2);}
+
+C_noret_decl(trf_12107)
+static void C_fcall trf_12107(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12107(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_12107(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12035)
+static void C_fcall trf_12035(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12035(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_12035(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12041)
+static void C_fcall trf_12041(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12041(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_12041(t0,t1,t2,t3);}
+
+C_noret_decl(trf_11987)
+static void C_fcall trf_11987(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11987(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11987(t0,t1);}
+
+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_11969)
+static void C_fcall trf_11969(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11969(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11969(t0,t1,t2);}
+
+C_noret_decl(trf_11960)
+static void C_fcall trf_11960(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11960(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11960(t0,t1,t2);}
+
+C_noret_decl(trf_11924)
+static void C_fcall trf_11924(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11924(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11924(t0,t1);}
+
+C_noret_decl(trf_11934)
+static void C_fcall trf_11934(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11934(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11934(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_11915)
+static void C_fcall trf_11915(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11915(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_11915(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_11486)
+static void C_fcall trf_11486(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11486(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11486(t0,t1);}
+
+C_noret_decl(trf_11503)
+static void C_fcall trf_11503(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11503(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11503(t0,t1);}
+
+C_noret_decl(trf_11042)
+static void C_fcall trf_11042(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11042(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11042(t0,t1,t2);}
+
+C_noret_decl(trf_10944)
+static void C_fcall trf_10944(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10944(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_10944(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_10989)
+static void C_fcall trf_10989(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10989(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10989(t0,t1,t2);}
+
+C_noret_decl(trf_10894)
+static void C_fcall trf_10894(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10894(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10894(t0,t1,t2);}
+
+C_noret_decl(trf_10667)
+static void C_fcall trf_10667(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10667(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10667(t0,t1);}
+
+C_noret_decl(trf_22061)
+static void C_fcall trf_22061(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_22061(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_22061(t0,t1);}
+
+C_noret_decl(trf_22074)
+static void C_fcall trf_22074(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_22074(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_22074(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_22006)
+static void C_fcall trf_22006(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_22006(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_22006(t0,t1);}
+
+C_noret_decl(trf_10444)
+static void C_fcall trf_10444(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10444(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10444(t0,t1,t2);}
+
+C_noret_decl(trf_10338)
+static void C_fcall trf_10338(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10338(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10338(t0,t1,t2);}
+
+C_noret_decl(trf_10296)
+static void C_fcall trf_10296(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10296(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10296(t0,t1,t2);}
+
+C_noret_decl(trf_10255)
+static void C_fcall trf_10255(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10255(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10255(t0,t1,t2);}
+
+C_noret_decl(trf_10225)
+static void C_fcall trf_10225(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10225(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10225(t0,t1,t2);}
+
+C_noret_decl(trf_10161)
+static void C_fcall trf_10161(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10161(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_10161(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10171)
+static void C_fcall trf_10171(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10171(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10171(t0,t1);}
+
+C_noret_decl(trf_10116)
+static void C_fcall trf_10116(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10116(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_10116(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_10077)
+static void C_fcall trf_10077(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10077(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10077(t0,t1,t2);}
+
+C_noret_decl(trf_10039)
+static void C_fcall trf_10039(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10039(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10039(t0,t1,t2);}
+
+C_noret_decl(trf_9820)
+static void C_fcall trf_9820(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9820(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9820(t0,t1,t2);}
+
+C_noret_decl(trf_9589)
+static void C_fcall trf_9589(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9589(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_9589(t0,t1,t2,t3);}
+
+C_noret_decl(trf_9426)
+static void C_fcall trf_9426(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9426(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9426(t0,t1,t2);}
+
+C_noret_decl(trf_8826)
+static void C_fcall trf_8826(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8826(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_8826(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8755)
+static void C_fcall trf_8755(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8755(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_8755(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8724)
+static void C_fcall trf_8724(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8724(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_8724(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8623)
+static void C_fcall trf_8623(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8623(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_8623(t0,t1,t2,t3);}
+
+C_noret_decl(trf_8629)
+static void C_fcall trf_8629(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8629(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_8629(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7638)
+static void C_fcall trf_7638(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7638(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_7638(t0,t1,t2,t3);}
+
+C_noret_decl(trf_7506)
+static void C_fcall trf_7506(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7506(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_7506(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_7396)
+static void C_fcall trf_7396(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7396(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_7396(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_7339)
+static void C_fcall trf_7339(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7339(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7339(t0,t1);}
+
+C_noret_decl(trf_7348)
+static void C_fcall trf_7348(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7348(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7348(t0,t1);}
+
+C_noret_decl(trf_7179)
+static void C_fcall trf_7179(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7179(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7179(t0,t1,t2);}
+
+C_noret_decl(trf_7035)
+static void C_fcall trf_7035(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7035(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_7035(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6962)
+static void C_fcall trf_6962(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6962(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6962(t0,t1,t2);}
+
+C_noret_decl(trf_6981)
+static void C_fcall trf_6981(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6981(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6981(t0,t1,t2);}
+
+C_noret_decl(trf_6896)
+static void C_fcall trf_6896(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6896(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6896(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(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(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);}
+
+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);}
+
+/* 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 *a;
+if(toplevel_initialized) C_kontinue(t1,C_SCHEME_UNDEFINED);
+else C_toplevel_entry(C_text("library_toplevel"));
+C_check_nursery_minimum(982);
+if(!C_demand(982)){
+C_save(t1);
+C_reclaim((void*)toplevel_trampoline,NULL);}
+toplevel_initialized=1;
+if(!C_demand_2(8312)){
+C_save(t1);
+C_rereclaim2(8312*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(982);
+C_initialize_lf(lf,1042);
+lf[1]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[3]=C_decode_literal(C_heaptop,"\376B\000\000\0064.2.12");
+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],5,"fpsin");
+lf[228]=C_h_intern(&lf[228],5,"fpcos");
+lf[229]=C_h_intern(&lf[229],5,"fptan");
+lf[230]=C_h_intern(&lf[230],6,"fpasin");
+lf[231]=C_h_intern(&lf[231],6,"fpacos");
+lf[232]=C_h_intern(&lf[232],6,"fpatan");
+lf[233]=C_h_intern(&lf[233],7,"fpatan2");
+lf[234]=C_h_intern(&lf[234],5,"fpexp");
+lf[235]=C_h_intern(&lf[235],6,"fpexpt");
+lf[236]=C_h_intern(&lf[236],5,"fplog");
+lf[237]=C_h_intern(&lf[237],6,"fpsqrt");
+lf[238]=C_h_intern(&lf[238],1,"*");
+lf[239]=C_h_intern(&lf[239],1,"-");
+lf[240]=C_h_intern(&lf[240],1,"+");
+lf[241]=C_h_intern(&lf[241],1,"/");
+lf[242]=C_h_intern(&lf[242],1,"=");
+lf[243]=C_h_intern(&lf[243],1,">");
+lf[244]=C_h_intern(&lf[244],1,"<");
+lf[245]=C_h_intern(&lf[245],2,">=");
+lf[246]=C_h_intern(&lf[246],2,"<=");
+lf[247]=C_h_intern(&lf[247],4,"add1");
+lf[248]=C_h_intern(&lf[248],4,"sub1");
+lf[249]=C_h_intern(&lf[249],8,"quotient");
+lf[250]=C_h_intern(&lf[250],11,"\003sysnumber\077");
+lf[251]=C_h_intern(&lf[251],7,"number\077");
+lf[252]=C_h_intern(&lf[252],8,"complex\077");
+lf[253]=C_h_intern(&lf[253],5,"real\077");
+lf[254]=C_h_intern(&lf[254],9,"rational\077");
+lf[255]=C_h_intern(&lf[255],19,"\003sysflonum-fraction");
+lf[256]=C_h_intern(&lf[256],12,"\003sysinteger\077");
+lf[257]=C_h_intern(&lf[257],8,"integer\077");
+lf[258]=C_h_intern(&lf[258],10,"\003sysexact\077");
+lf[259]=C_h_intern(&lf[259],12,"\003sysinexact\077");
+lf[260]=C_h_intern(&lf[260],6,"exact\077");
+lf[261]=C_h_intern(&lf[261],8,"inexact\077");
+lf[262]=C_h_intern(&lf[262],4,"expt");
+lf[263]=C_h_intern(&lf[263],16,"\003sysfits-in-int\077");
+lf[264]=C_h_intern(&lf[264],25,"\003sysfits-in-unsigned-int\077");
+lf[265]=C_h_intern(&lf[265],27,"\003sysflonum-in-fixnum-range\077");
+lf[266]=C_h_intern(&lf[266],18,"\003sysdouble->number");
+lf[267]=C_h_intern(&lf[267],5,"zero\077");
+lf[268]=C_h_intern(&lf[268],9,"positive\077");
+lf[269]=C_h_intern(&lf[269],9,"negative\077");
+lf[270]=C_h_intern(&lf[270],3,"abs");
+lf[271]=C_h_intern(&lf[271],5,"angle");
+lf[272]=C_decode_literal(C_heaptop,"\376U3.14159265358979\000");
+lf[273]=C_decode_literal(C_heaptop,"\376U0.0\000");
+lf[274]=C_h_intern(&lf[274],9,"real-part");
+lf[275]=C_h_intern(&lf[275],9,"imag-part");
+lf[276]=C_h_intern(&lf[276],9,"numerator");
+lf[277]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a rational number");
+lf[278]=C_h_intern(&lf[278],11,"denominator");
+lf[279]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a rational number");
+lf[280]=C_h_intern(&lf[280],9,"magnitude");
+lf[281]=C_h_intern(&lf[281],6,"signum");
+lf[282]=C_decode_literal(C_heaptop,"\376U1.0\000");
+lf[283]=C_decode_literal(C_heaptop,"\376U-1.0\000");
+lf[284]=C_decode_literal(C_heaptop,"\376U0.0\000");
+lf[285]=C_h_intern(&lf[285],18,"\003sysexact->inexact");
+lf[286]=C_h_intern(&lf[286],14,"exact->inexact");
+lf[287]=C_h_intern(&lf[287],18,"\003sysinexact->exact");
+lf[288]=C_h_intern(&lf[288],14,"inexact->exact");
+lf[289]=C_h_intern(&lf[289],5,"floor");
+lf[290]=C_h_intern(&lf[290],7,"ceiling");
+lf[291]=C_h_intern(&lf[291],8,"truncate");
+lf[292]=C_h_intern(&lf[292],5,"round");
+lf[293]=C_h_intern(&lf[293],9,"remainder");
+lf[294]=C_h_intern(&lf[294],6,"modulo");
+lf[295]=C_h_intern(&lf[295],5,"even\077");
+lf[296]=C_h_intern(&lf[296],4,"odd\077");
+lf[297]=C_h_intern(&lf[297],3,"max");
+lf[298]=C_h_intern(&lf[298],3,"min");
+lf[299]=C_h_intern(&lf[299],3,"exp");
+lf[300]=C_h_intern(&lf[300],3,"log");
+lf[301]=C_h_intern(&lf[301],3,"sin");
+lf[302]=C_h_intern(&lf[302],3,"cos");
+lf[303]=C_h_intern(&lf[303],3,"tan");
+lf[304]=C_h_intern(&lf[304],4,"asin");
+lf[305]=C_h_intern(&lf[305],4,"acos");
+lf[306]=C_h_intern(&lf[306],4,"sqrt");
+lf[307]=C_h_intern(&lf[307],4,"atan");
+lf[308]=C_h_intern(&lf[308],7,"\003sysgcd");
+lf[309]=C_h_intern(&lf[309],3,"gcd");
+lf[310]=C_h_intern(&lf[310],7,"\003syslcm");
+lf[311]=C_h_intern(&lf[311],3,"lcm");
+lf[312]=C_h_intern(&lf[312],18,"\003sysstring->number");
+lf[313]=C_h_intern(&lf[313],14,"string->number");
+lf[314]=C_h_intern(&lf[314],18,"\003sysnumber->string");
+lf[315]=C_h_intern(&lf[315],14,"number->string");
+lf[316]=C_h_intern(&lf[316],22,"flonum-print-precision");
+lf[317]=C_h_intern(&lf[317],15,"\003sysmake-symbol");
+lf[318]=C_h_intern(&lf[318],7,"symbol\077");
+lf[319]=C_h_intern(&lf[319],9,"\003syssnafu");
+lf[320]=C_h_intern(&lf[320],9,"\003sysfnord");
+lf[321]=C_h_intern(&lf[321],17,"\003sysintern-symbol");
+lf[322]=C_h_intern(&lf[322],20,"\003sysinterned-symbol\077");
+lf[323]=C_h_intern(&lf[323],18,"\003sysstring->symbol");
+lf[324]=C_h_intern(&lf[324],18,"\003syssymbol->string");
+lf[325]=C_h_intern(&lf[325],28,"\003syssymbol->qualified-string");
+lf[326]=C_h_intern(&lf[326],27,"\003sysqualified-symbol-prefix");
+lf[327]=C_decode_literal(C_heaptop,"\376B\000\000\002##");
+lf[328]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
+lf[329]=C_h_intern(&lf[329],21,"\003sysqualified-symbol\077");
+lf[330]=C_h_intern(&lf[330],28,"\003sysstring->qualified-symbol");
+lf[331]=C_h_intern(&lf[331],14,"symbol->string");
+lf[332]=C_h_intern(&lf[332],14,"string->symbol");
+lf[333]=C_h_intern(&lf[333],25,"string->uninterned-symbol");
+lf[334]=C_h_intern(&lf[334],6,"gensym");
+lf[335]=C_decode_literal(C_heaptop,"\376B\000\000\001g");
+lf[336]=C_decode_literal(C_heaptop,"\376B\000\000\042argument is not a string or symbol");
+lf[337]=C_h_intern(&lf[337],8,"keyword\077");
+lf[338]=C_h_intern(&lf[338],15,"string->keyword");
+lf[339]=C_h_intern(&lf[339],15,"keyword->string");
+lf[340]=C_decode_literal(C_heaptop,"\376B\000\000!bad argument type - not a keyword");
+lf[341]=C_h_intern(&lf[341],15,"\003sysget-keyword");
+lf[342]=C_h_intern(&lf[342],11,"get-keyword");
+lf[343]=C_decode_literal(C_heaptop,"\376B\000\000\030missing keyword argument");
+lf[344]=C_h_intern(&lf[344],13,"\003sysmake-blob");
+lf[345]=C_h_intern(&lf[345],9,"make-blob");
+lf[346]=C_h_intern(&lf[346],5,"blob\077");
+lf[347]=C_h_intern(&lf[347],9,"blob-size");
+lf[348]=C_h_intern(&lf[348],12,"string->blob");
+lf[349]=C_h_intern(&lf[349],12,"blob->string");
+lf[350]=C_h_intern(&lf[350],6,"blob=\077");
+lf[351]=C_h_intern(&lf[351],7,"vector\077");
+lf[352]=C_h_intern(&lf[352],13,"vector-length");
+lf[353]=C_h_intern(&lf[353],10,"vector-ref");
+lf[354]=C_h_intern(&lf[354],11,"vector-set!");
+lf[355]=C_h_intern(&lf[355],15,"\003sysmake-vector");
+lf[356]=C_h_intern(&lf[356],11,"make-vector");
+lf[357]=C_decode_literal(C_heaptop,"\376B\000\000\020size is negative");
+lf[358]=C_h_intern(&lf[358],12,"list->vector");
+lf[359]=C_h_intern(&lf[359],12,"vector->list");
+lf[360]=C_h_intern(&lf[360],6,"vector");
+lf[361]=C_h_intern(&lf[361],16,"\003syslist->vector");
+lf[362]=C_h_intern(&lf[362],12,"vector-fill!");
+lf[363]=C_h_intern(&lf[363],12,"vector-copy!");
+lf[364]=C_decode_literal(C_heaptop,"\376B\000\000)cannot copy vector - count exceeds length");
+lf[365]=C_h_intern(&lf[365],13,"vector-resize");
+lf[367]=C_h_intern(&lf[367],5,"char\077");
+lf[368]=C_h_intern(&lf[368],13,"char->integer");
+lf[369]=C_h_intern(&lf[369],13,"integer->char");
+lf[370]=C_h_intern(&lf[370],6,"char=\077");
+lf[371]=C_h_intern(&lf[371],6,"char>\077");
+lf[372]=C_h_intern(&lf[372],6,"char<\077");
+lf[373]=C_h_intern(&lf[373],7,"char>=\077");
+lf[374]=C_h_intern(&lf[374],7,"char<=\077");
+lf[375]=C_h_intern(&lf[375],11,"char-upcase");
+lf[376]=C_h_intern(&lf[376],13,"char-downcase");
+lf[377]=C_h_intern(&lf[377],9,"char-ci=\077");
+lf[378]=C_h_intern(&lf[378],9,"char-ci>\077");
+lf[379]=C_h_intern(&lf[379],9,"char-ci<\077");
+lf[380]=C_h_intern(&lf[380],10,"char-ci>=\077");
+lf[381]=C_h_intern(&lf[381],10,"char-ci<=\077");
+lf[382]=C_h_intern(&lf[382],16,"char-upper-case\077");
+lf[383]=C_h_intern(&lf[383],16,"char-lower-case\077");
+lf[384]=C_h_intern(&lf[384],13,"char-numeric\077");
+lf[385]=C_h_intern(&lf[385],16,"char-whitespace\077");
+lf[386]=C_h_intern(&lf[386],16,"char-alphabetic\077");
+lf[387]=C_h_intern(&lf[387],9,"char-name");
+lf[388]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid character name");
+lf[389]=C_h_intern(&lf[389],10,"procedure\077");
+lf[390]=C_h_intern(&lf[390],5,"apply");
+lf[391]=C_h_intern(&lf[391],34,"\003syscall-with-current-continuation");
+lf[392]=C_h_intern(&lf[392],33,"\003syscall-with-direct-continuation");
+lf[393]=C_h_intern(&lf[393],21,"\003syscall-with-cthulhu");
+lf[394]=C_h_intern(&lf[394],17,"\003sysdirect-return");
+lf[395]=C_h_intern(&lf[395],6,"values");
+lf[396]=C_h_intern(&lf[396],20,"\003syscall-with-values");
+lf[397]=C_h_intern(&lf[397],16,"call-with-values");
+lf[398]=C_h_intern(&lf[398],12,"\003sysfor-each");
+lf[399]=C_h_intern(&lf[399],8,"for-each");
+lf[400]=C_h_intern(&lf[400],7,"\003sysmap");
+lf[401]=C_h_intern(&lf[401],3,"map");
+lf[402]=C_decode_literal(C_heaptop,"\376B\000\000\034lists are not of same length");
+lf[403]=C_h_intern(&lf[403],17,"\003sysdynamic-winds");
+lf[404]=C_h_intern(&lf[404],12,"dynamic-wind");
+lf[405]=C_h_intern(&lf[405],16,"\003sysdynamic-wind");
+lf[406]=C_h_intern(&lf[406],30,"call-with-current-continuation");
+lf[408]=C_h_intern(&lf[408],7,"call/cc");
+lf[409]=C_h_intern(&lf[409],20,"continuation-capture");
+lf[410]=C_h_intern(&lf[410],12,"continuation");
+lf[411]=C_h_intern(&lf[411],13,"continuation\077");
+lf[412]=C_h_intern(&lf[412],22,"\003syscontinuation-graft");
+lf[413]=C_h_intern(&lf[413],18,"continuation-graft");
+lf[414]=C_h_intern(&lf[414],19,"continuation-return");
+lf[415]=C_h_intern(&lf[415],5,"port\077");
+lf[416]=C_h_intern(&lf[416],11,"input-port\077");
+lf[417]=C_h_intern(&lf[417],12,"output-port\077");
+lf[418]=C_h_intern(&lf[418],13,"\003sysmake-port");
+lf[419]=C_h_intern(&lf[419],9,"read-line");
+lf[420]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[421]=C_h_intern(&lf[421],21,"\003sysstream-port-class");
+lf[422]=C_h_intern(&lf[422],18,"\003sysopen-file-port");
+lf[423]=C_h_intern(&lf[423],18,"\003sysstandard-input");
+lf[424]=C_h_intern(&lf[424],19,"\003sysstandard-output");
+lf[425]=C_h_intern(&lf[425],18,"\003sysstandard-error");
+lf[426]=C_h_intern(&lf[426],14,"\003syscheck-port");
+lf[427]=C_decode_literal(C_heaptop,"\376B\000\000\026argument is not a port");
+lf[428]=C_h_intern(&lf[428],19,"\003syscheck-port-mode");
+lf[429]=C_decode_literal(C_heaptop,"\376B\000\000\031port is not an input port");
+lf[430]=C_decode_literal(C_heaptop,"\376B\000\000\032port is not an output-port");
+lf[431]=C_h_intern(&lf[431],15,"\003syscheck-port*");
+lf[432]=C_h_intern(&lf[432],11,"\000file-error");
+lf[433]=C_decode_literal(C_heaptop,"\376B\000\000\023port already closed");
+lf[434]=C_h_intern(&lf[434],18,"current-input-port");
+lf[435]=C_h_intern(&lf[435],19,"current-output-port");
+lf[436]=C_h_intern(&lf[436],18,"current-error-port");
+lf[437]=C_h_intern(&lf[437],13,"\003systty-port\077");
+lf[438]=C_h_intern(&lf[438],25,"\003syspeek-unsigned-integer");
+lf[439]=C_h_intern(&lf[439],13,"\003sysport-data");
+lf[440]=C_h_intern(&lf[440],18,"\003sysset-port-data!");
+lf[441]=C_h_intern(&lf[441],7,"mingw32");
+lf[442]=C_h_intern(&lf[442],27,"\003sysplatform-fixup-pathname");
+lf[443]=C_h_intern(&lf[443],23,"\003syspathname-resolution");
+lf[444]=C_h_intern(&lf[444],20,"\003sysexpand-home-path");
+lf[445]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[446]=C_decode_literal(C_heaptop,"\376B\000\000\004HOME");
+lf[447]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[448]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[449]=C_h_intern(&lf[449],15,"open-input-file");
+lf[450]=C_h_intern(&lf[450],16,"open-output-file");
+lf[451]=C_h_intern(&lf[451],16,"close-input-port");
+lf[452]=C_h_intern(&lf[452],17,"close-output-port");
+lf[453]=C_decode_literal(C_heaptop,"\376B\000\000\001r");
+lf[454]=C_decode_literal(C_heaptop,"\376B\000\000\001w");
+lf[455]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[456]=C_decode_literal(C_heaptop,"\376B\000\000\023cannot open file - ");
+lf[457]=C_h_intern(&lf[457],17,"\003syspeek-c-string");
+lf[458]=C_h_intern(&lf[458],6,"stream");
+lf[459]=C_h_intern(&lf[459],7,"\000binary");
+lf[460]=C_decode_literal(C_heaptop,"\376B\000\000\001b");
+lf[461]=C_h_intern(&lf[461],5,"\000text");
+lf[462]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[463]=C_h_intern(&lf[463],7,"\000append");
+lf[464]=C_decode_literal(C_heaptop,"\376B\000\000&cannot use append mode with input file");
+lf[465]=C_decode_literal(C_heaptop,"\376B\000\000\001a");
+lf[466]=C_decode_literal(C_heaptop,"\376B\000\000\023invalid file option");
+lf[467]=C_h_intern(&lf[467],5,"\000open");
+lf[468]=C_h_intern(&lf[468],20,"call-with-input-file");
+lf[469]=C_h_intern(&lf[469],21,"call-with-output-file");
+lf[470]=C_h_intern(&lf[470],20,"with-input-from-file");
+lf[471]=C_h_intern(&lf[471],19,"with-output-to-file");
+lf[472]=C_h_intern(&lf[472],12,"file-exists\077");
+lf[473]=C_h_intern(&lf[473],8,"\000exists\077");
+lf[474]=C_h_intern(&lf[474],17,"directory-exists\077");
+lf[475]=C_h_intern(&lf[475],16,"\003sysflush-output");
+lf[476]=C_h_intern(&lf[476],12,"flush-output");
+lf[477]=C_h_intern(&lf[477],9,"port-name");
+lf[478]=C_h_intern(&lf[478],14,"set-port-name!");
+lf[479]=C_h_intern(&lf[479],13,"\003sysport-line");
+lf[480]=C_h_intern(&lf[480],13,"port-position");
+lf[481]=C_decode_literal(C_heaptop,"\376B\000\000\037cannot compute position of port");
+lf[482]=C_h_intern(&lf[482],11,"delete-file");
+lf[483]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot delete file - ");
+lf[484]=C_h_intern(&lf[484],7,"\000delete");
+lf[485]=C_h_intern(&lf[485],11,"rename-file");
+lf[486]=C_decode_literal(C_heaptop,"\376B\000\000\025cannot rename file - ");
+lf[487]=C_h_intern(&lf[487],7,"\000rename");
+lf[489]=C_h_intern(&lf[489],28,"\003syscurrent-parameter-vector");
+lf[490]=C_decode_literal(C_heaptop,"\376\000\000\000\000");
+lf[491]=C_h_intern(&lf[491],14,"make-parameter");
+lf[492]=C_h_intern(&lf[492],11,"eof-object\077");
+lf[493]=C_h_intern(&lf[493],11,"char-ready\077");
+lf[494]=C_h_intern(&lf[494],9,"read-char");
+lf[495]=C_h_intern(&lf[495],18,"\003sysread-char/port");
+lf[496]=C_h_intern(&lf[496],15,"\003sysread-char-0");
+lf[497]=C_h_intern(&lf[497],15,"\003syspeek-char-0");
+lf[498]=C_h_intern(&lf[498],9,"peek-char");
+lf[499]=C_h_intern(&lf[499],4,"read");
+lf[500]=C_h_intern(&lf[500],8,"\003sysread");
+lf[501]=C_h_intern(&lf[501],26,"\003sysdefault-read-info-hook");
+lf[502]=C_h_intern(&lf[502],31,"\003sysread-error-with-line-number");
+lf[503]=C_h_intern(&lf[503],21,"\003sysenable-qualifiers");
+lf[504]=C_h_intern(&lf[504],20,"\003sysread-prompt-hook");
+lf[505]=C_h_intern(&lf[505],19,"\003sysinfix-list-hook");
+lf[506]=C_h_intern(&lf[506],21,"\003syssharp-number-hook");
+lf[507]=C_h_intern(&lf[507],14,"\003sysread-error");
+lf[508]=C_decode_literal(C_heaptop,"\376B\000\000!invalid parameterized read syntax");
+lf[509]=C_h_intern(&lf[509],14,"case-sensitive");
+lf[510]=C_h_intern(&lf[510],13,"keyword-style");
+lf[511]=C_h_intern(&lf[511],20,"parentheses-synonyms");
+lf[512]=C_h_intern(&lf[512],13,"symbol-escape");
+lf[513]=C_h_intern(&lf[513],18,"current-read-table");
+lf[514]=C_h_intern(&lf[514],16,"\003sysread-warning");
+lf[515]=C_decode_literal(C_heaptop,"\376B\000\000\011 in line ");
+lf[516]=C_h_intern(&lf[516],13,"\000syntax-error");
+lf[517]=C_decode_literal(C_heaptop,"\376B\000\000\011 in line ");
+lf[518]=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[519]=C_decode_literal(C_heaptop,"\376B\000\000\032unexpected list terminator");
+lf[520]=C_decode_literal(C_heaptop,"\376B\000\000\022reserved character");
+lf[521]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid escape-sequence \047\134");
+lf[522]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
+lf[523]=C_decode_literal(C_heaptop,"\376B\000\000\034unterminated string constant");
+lf[524]=C_h_intern(&lf[524],21,"\003syschar->utf8-string");
+lf[525]=C_decode_literal(C_heaptop,"\376B\000\000\023unterminated string");
+lf[526]=C_decode_literal(C_heaptop,"\376B\000\000\001x");
+lf[527]=C_decode_literal(C_heaptop,"\376B\000\000\022bad surrogate pair");
+lf[528]=C_h_intern(&lf[528],25,"\003syssurrogates->codepoint");
+lf[529]=C_decode_literal(C_heaptop,"\376B\000\000\001u");
+lf[530]=C_decode_literal(C_heaptop,"\376B\000\000\032unpaired escaped surrogate");
+lf[531]=C_h_intern(&lf[531],22,"\003sysunicode-surrogate\077");
+lf[532]=C_decode_literal(C_heaptop,"\376B\000\000\001u");
+lf[533]=C_decode_literal(C_heaptop,"\376B\000\000\032invalid escape (surrogate)");
+lf[534]=C_decode_literal(C_heaptop,"\376B\000\000\001U");
+lf[535]=C_decode_literal(C_heaptop,"\376B\000\000\077undefined escape sequence in string - probably forgot backslash");
+lf[536]=C_decode_literal(C_heaptop,"\376B\000\000\011missing `");
+lf[537]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
+lf[538]=C_h_intern(&lf[538],9,"list-info");
+lf[539]=C_decode_literal(C_heaptop,"\376B\000\000\030list-terminator mismatch");
+lf[540]=C_decode_literal(C_heaptop,"\376B\000\000\021unterminated list");
+lf[541]=C_decode_literal(C_heaptop,"\376B\000\000\027missing list terminator");
+lf[542]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid use of `.\047");
+lf[543]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[544]=C_decode_literal(C_heaptop,"\376B\000\000\015missing token");
+lf[545]=C_decode_literal(C_heaptop,"\376B\000\000\025invalid vector syntax");
+lf[546]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[547]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid use of `.\047");
+lf[548]=C_decode_literal(C_heaptop,"\376B\000\0003cannot represent exact fraction - coerced to flonum");
+lf[549]=C_decode_literal(C_heaptop,"\376B\000\000\025illegal number syntax");
+lf[550]=C_decode_literal(C_heaptop,"\376B\000\000!unexpected end of numeric literal");
+lf[551]=C_decode_literal(C_heaptop,"\376B\000\0000illegal number syntax - invalid exactness prefix");
+lf[552]=C_decode_literal(C_heaptop,"\376B\000\000!unexpected end of numeric literal");
+lf[553]=C_decode_literal(C_heaptop,"\376B\000\000%illegal number syntax - invalid radix");
+lf[554]=C_h_intern(&lf[554],11,"symbol-info");
+lf[555]=C_decode_literal(C_heaptop,"\376B\000\000\042unexpected end of `| ... |\047 symbol");
+lf[556]=C_decode_literal(C_heaptop,"\376B\000\000\013missing \047|\047");
+lf[557]=C_decode_literal(C_heaptop,"\376B\000\000\027unknown named character");
+lf[558]=C_decode_literal(C_heaptop,"\376B\000\000\032unterminated block-comment");
+lf[559]=C_decode_literal(C_heaptop,"\376B\000\000\037invalid qualified symbol syntax");
+lf[560]=C_decode_literal(C_heaptop,"\376B\000\000&qualified symbol syntax is not allowed");
+lf[561]=C_h_intern(&lf[561],7,"\000suffix");
+lf[562]=C_h_intern(&lf[562],7,"\000prefix");
+lf[563]=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[564]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\012\000\000|\376\377\016");
+lf[565]=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[566]=C_h_intern(&lf[566],5,"quote");
+lf[567]=C_h_intern(&lf[567],10,"quasiquote");
+lf[568]=C_h_intern(&lf[568],16,"unquote-splicing");
+lf[569]=C_h_intern(&lf[569],7,"unquote");
+lf[570]=C_decode_literal(C_heaptop,"\376B\000\000!invalid parameterized read syntax");
+lf[571]=C_decode_literal(C_heaptop,"\376B\000\0006unexpected end of input while reading `#c...\047 sequence");
+lf[572]=C_decode_literal(C_heaptop,"\376B\000\000*invalid case specifier in `#c...\047 sequence");
+lf[573]=C_h_intern(&lf[573],11,"quasisyntax");
+lf[574]=C_h_intern(&lf[574],8,"location");
+lf[575]=C_decode_literal(C_heaptop,"\376B\000\000\001#");
+lf[576]=C_h_intern(&lf[576],11,"cond-expand");
+lf[577]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\004else\376\377\016");
+lf[578]=C_decode_literal(C_heaptop,"\376B\000\000\003eof");
+lf[579]=C_decode_literal(C_heaptop,"\376B\000\000\010optional");
+lf[580]=C_decode_literal(C_heaptop,"\376B\000\000\004rest");
+lf[581]=C_decode_literal(C_heaptop,"\376B\000\000\003key");
+lf[582]=C_decode_literal(C_heaptop,"\376B\000\000\002#!");
+lf[583]=C_decode_literal(C_heaptop,"\376B\000\000\014current-line");
+lf[584]=C_decode_literal(C_heaptop,"\376B\000\000\014current-file");
+lf[586]=C_decode_literal(C_heaptop,"\376B\000\000\022invalid `#!\047 token");
+lf[587]=C_h_intern(&lf[587],18,"\003sysuser-read-hook");
+lf[588]=C_decode_literal(C_heaptop,"\376B\000\000\035UTF-8 codepoint out of range:");
+lf[589]=C_decode_literal(C_heaptop,"\376B\000\000\036invalid sharp-sign read syntax");
+lf[590]=C_h_intern(&lf[590],18,"\003sysset-read-mark!");
+lf[591]=C_h_intern(&lf[591],16,"set-read-syntax!");
+lf[592]=C_h_intern(&lf[592],22,"set-sharp-read-syntax!");
+lf[593]=C_h_intern(&lf[593],30,"set-parameterized-read-syntax!");
+lf[594]=C_h_intern(&lf[594],15,"copy-read-table");
+lf[595]=C_h_intern(&lf[595],10,"read-table");
+lf[596]=C_h_intern(&lf[596],16,"\003syswrite-char-0");
+lf[597]=C_h_intern(&lf[597],19,"\003syswrite-char/port");
+lf[598]=C_h_intern(&lf[598],10,"write-char");
+lf[599]=C_h_intern(&lf[599],7,"newline");
+lf[600]=C_h_intern(&lf[600],5,"write");
+lf[601]=C_h_intern(&lf[601],9,"\003sysprint");
+lf[602]=C_h_intern(&lf[602],7,"display");
+lf[603]=C_h_intern(&lf[603],5,"print");
+lf[604]=C_h_intern(&lf[604],6,"print*");
+lf[608]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
+lf[609]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
+lf[610]=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[611]=C_decode_literal(C_heaptop,"\376B\000\000\002#!");
+lf[612]=C_decode_literal(C_heaptop,"\376B\000\000\002()");
+lf[613]=C_decode_literal(C_heaptop,"\376B\000\000\002#t");
+lf[614]=C_decode_literal(C_heaptop,"\376B\000\000\002#f");
+lf[615]=C_decode_literal(C_heaptop,"\376B\000\000\005#!eof");
+lf[616]=C_decode_literal(C_heaptop,"\376B\000\000\016#<unspecified>");
+lf[617]=C_decode_literal(C_heaptop,"\376B\000\000\002#\134");
+lf[618]=C_h_intern(&lf[618],28,"\003sysarbitrary-unbound-symbol");
+lf[619]=C_decode_literal(C_heaptop,"\376B\000\000\020#<unbound value>");
+lf[620]=C_decode_literal(C_heaptop,"\376B\000\000\033#<invalid forwarded object>");
+lf[621]=C_decode_literal(C_heaptop,"\376B\000\000\002#:");
+lf[622]=C_h_intern(&lf[622],10,"#!optional");
+lf[623]=C_h_intern(&lf[623],5,"#!key");
+lf[624]=C_h_intern(&lf[624],6,"#!rest");
+lf[625]=C_h_intern(&lf[625],19,"\003syspointer->string");
+lf[626]=C_decode_literal(C_heaptop,"\376B\000\000\002\134\042");
+lf[627]=C_decode_literal(C_heaptop,"\376B\000\000\002\134\134");
+lf[628]=C_decode_literal(C_heaptop,"\376B\000\000\003 . ");
+lf[629]=C_decode_literal(C_heaptop,"\376B\000\000\025#<static blob of size");
+lf[630]=C_decode_literal(C_heaptop,"\376B\000\000\017#<blob of size ");
+lf[631]=C_h_intern(&lf[631],19,"\003sysuser-print-hook");
+lf[632]=C_h_intern(&lf[632],21,"\003sysprocedure->string");
+lf[633]=C_decode_literal(C_heaptop,"\376B\000\000\013#<locative>");
+lf[634]=C_h_intern(&lf[634],23,"\003syslambda-info->string");
+lf[635]=C_decode_literal(C_heaptop,"\376B\000\000\016#<lambda info ");
+lf[636]=C_decode_literal(C_heaptop,"\376B\000\000\002\042>");
+lf[637]=C_decode_literal(C_heaptop,"\376B\000\000\016#<input port \042");
+lf[638]=C_decode_literal(C_heaptop,"\376B\000\000\017#<output port \042");
+lf[639]=C_decode_literal(C_heaptop,"\376B\000\000\003#()");
+lf[640]=C_decode_literal(C_heaptop,"\376B\000\000\002#(");
+lf[641]=C_decode_literal(C_heaptop,"\376B\000\000,unprintable non-immediate object encountered");
+lf[642]=C_decode_literal(C_heaptop,"\376B\000\000\033#<invalid immediate object>");
+lf[643]=C_decode_literal(C_heaptop,"\376B\000\000\014#<procedure ");
+lf[644]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
+lf[645]=C_decode_literal(C_heaptop,"\376B\000\000\014#<procedure>");
+lf[646]=C_h_intern(&lf[646],15,"\003syslambda-info");
+lf[647]=C_h_intern(&lf[647],19,"\003sysrecord-printers");
+lf[648]=C_h_intern(&lf[648],27,"\003sysregister-record-printer");
+lf[649]=C_h_intern(&lf[649],9,"condition");
+lf[650]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[651]=C_h_intern(&lf[651],6,"thread");
+lf[652]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[653]=C_decode_literal(C_heaptop,"\376B\000\000\002#<");
+lf[654]=C_h_intern(&lf[654],27,"\003syswith-print-length-limit");
+lf[655]=C_h_intern(&lf[655],11,"bitwise-and");
+lf[656]=C_h_intern(&lf[656],11,"bitwise-ior");
+lf[657]=C_h_intern(&lf[657],11,"bitwise-xor");
+lf[658]=C_h_intern(&lf[658],11,"bitwise-not");
+lf[659]=C_h_intern(&lf[659],16,"arithmetic-shift");
+lf[660]=C_h_intern(&lf[660],8,"bit-set\077");
+lf[661]=C_h_intern(&lf[661],14,"\003syscopy-bytes");
+lf[662]=C_decode_literal(C_heaptop,"\376B\000\000\022string buffer full");
+lf[663]=C_h_intern(&lf[663],20,"\003sysscan-buffer-line");
+lf[664]=C_h_intern(&lf[664],21,"\003sysstring-port-class");
+lf[665]=C_h_intern(&lf[665],17,"open-input-string");
+lf[666]=C_decode_literal(C_heaptop,"\376B\000\000\010(string)");
+lf[667]=C_h_intern(&lf[667],18,"open-output-string");
+lf[668]=C_decode_literal(C_heaptop,"\376B\000\000\010(string)");
+lf[669]=C_h_intern(&lf[669],17,"get-output-string");
+lf[670]=C_decode_literal(C_heaptop,"\376B\000\000$argument is not a string-output-port");
+lf[671]=C_h_intern(&lf[671],19,"\003sysprint-to-string");
+lf[672]=C_decode_literal(C_heaptop,"\376B\000\000\021#<tagged pointer ");
+lf[673]=C_decode_literal(C_heaptop,"\376B\000\000\001 ");
+lf[674]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
+lf[675]=C_h_intern(&lf[675],20,"\003syspointer->address");
+lf[676]=C_decode_literal(C_heaptop,"\376B\000\000\021#<SWIG pointer 0x");
+lf[677]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
+lf[678]=C_decode_literal(C_heaptop,"\376B\000\000\014#<pointer 0x");
+lf[679]=C_decode_literal(C_heaptop,"\376B\000\000\001>");
+lf[680]=C_h_intern(&lf[680],13,"software-type");
+lf[681]=C_h_intern(&lf[681],12,"machine-type");
+lf[682]=C_h_intern(&lf[682],18,"machine-byte-order");
+lf[683]=C_h_intern(&lf[683],16,"software-version");
+lf[684]=C_h_intern(&lf[684],14,"build-platform");
+lf[685]=C_h_intern(&lf[685],9,"c-runtime");
+lf[686]=C_h_intern(&lf[686],20,"\003syswindows-platform");
+lf[687]=C_h_intern(&lf[687],15,"chicken-version");
+lf[688]=C_decode_literal(C_heaptop,"\376B\000\000\010Version ");
+lf[689]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[690]=C_decode_literal(C_heaptop,"\376B\000\000\001\012");
+lf[691]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[692]=C_decode_literal(C_heaptop,"\376B\000\000\002 [");
+lf[693]=C_decode_literal(C_heaptop,"\376B\000\000\002 ]");
+lf[694]=C_h_intern(&lf[694],7,"unknown");
+lf[695]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[696]=C_decode_literal(C_heaptop,"\376B\000\000\001-");
+lf[697]=C_decode_literal(C_heaptop,"\376B\000\000\006 64bit");
+lf[698]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[699]=C_decode_literal(C_heaptop,"\376B\000\000\011 symbolgc");
+lf[700]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[701]=C_decode_literal(C_heaptop,"\376B\000\000\011 manyargs");
+lf[702]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[703]=C_decode_literal(C_heaptop,"\376B\000\000\006 dload");
+lf[704]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[705]=C_decode_literal(C_heaptop,"\376B\000\000\010 ptables");
+lf[706]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[707]=C_decode_literal(C_heaptop,"\376B\000\000\010 gchooks");
+lf[708]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[709]=C_decode_literal(C_heaptop,"\376B\000\000\006 cross");
+lf[710]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[711]=C_h_intern(&lf[711],32,"\003syspathname-directory-separator");
+lf[712]=C_h_intern(&lf[712],16,"\003sys->feature-id");
+lf[713]=C_decode_literal(C_heaptop,"\376B\000\0001bad argument type - not a valid feature identifer");
+lf[714]=C_h_intern(&lf[714],12,"\003sysfeatures");
+lf[715]=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[716]=C_h_intern(&lf[716],17,"register-feature!");
+lf[717]=C_h_intern(&lf[717],19,"unregister-feature!");
+lf[718]=C_h_intern(&lf[718],8,"features");
+lf[719]=C_h_intern(&lf[719],12,"\003sysfeature\077");
+lf[720]=C_h_intern(&lf[720],8,"feature\077");
+lf[721]=C_h_intern(&lf[721],18,"\003sysget-call-chain");
+lf[722]=C_h_intern(&lf[722],25,"\003syspeek-nonnull-c-string");
+lf[723]=C_h_intern(&lf[723],18,"\003syscurrent-thread");
+lf[724]=C_h_intern(&lf[724],27,"\003sysreally-print-call-chain");
+lf[725]=C_decode_literal(C_heaptop,"\376B\000\000\005\011<--\012");
+lf[726]=C_decode_literal(C_heaptop,"\376B\000\000\002] ");
+lf[727]=C_decode_literal(C_heaptop,"\376B\000\000\002\011\011");
+lf[728]=C_decode_literal(C_heaptop,"\376B\000\000\002\012\011");
+lf[729]=C_h_intern(&lf[729],16,"print-call-chain");
+lf[730]=C_decode_literal(C_heaptop,"\376B\000\000\020\012\011Call history:\012");
+lf[731]=C_h_intern(&lf[731],14,"get-call-chain");
+lf[732]=C_h_intern(&lf[732],23,"\003sysuser-interrupt-hook");
+lf[733]=C_h_intern(&lf[733],15,"\000user-interrupt");
+lf[734]=C_h_intern(&lf[734],21,"\003sysprimordial-thread");
+lf[735]=C_h_intern(&lf[735],18,"\003sysbreak-on-error");
+lf[736]=C_h_intern(&lf[736],17,"\003syserror-handler");
+lf[737]=C_h_intern(&lf[737],13,"reset-handler");
+lf[738]=C_h_intern(&lf[738],12,"exit-handler");
+lf[739]=C_h_intern(&lf[739],21,"implicit-exit-handler");
+lf[740]=C_h_intern(&lf[740],25,"\003sysimplicit-exit-handler");
+lf[741]=C_h_intern(&lf[741],16,"force-finalizers");
+lf[742]=C_h_intern(&lf[742],23,"\003syscleanup-before-exit");
+lf[743]=C_h_intern(&lf[743],20,"\003sysforce-finalizers");
+lf[744]=C_decode_literal(C_heaptop,"\376B\000\000\036[debug] forcing finalizers...\012");
+lf[745]=C_h_intern(&lf[745],7,"on-exit");
+lf[746]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016user-interrupt\376\377\016");
+lf[747]=C_h_intern(&lf[747],9,"\003sysabort");
+lf[748]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[749]=C_decode_literal(C_heaptop,"\376B\000\000\012\012Warning: ");
+lf[750]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
+lf[751]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
+lf[752]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
+lf[753]=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[754]=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[755]=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[756]=C_h_intern(&lf[756],17,"\000arithmetic-error");
+lf[757]=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[758]=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[759]=C_h_intern(&lf[759],14,"\000runtime-error");
+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\007runtime\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\007process\376\377\016");
+lf[762]=C_h_intern(&lf[762],14,"\000network-error");
+lf[763]=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[764]=C_h_intern(&lf[764],22,"\000network-timeout-error");
+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\003net\376\003\000\000\002\376\001\000\000\007timeout\376\377\016");
+lf[766]=C_h_intern(&lf[766],12,"\000limit-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\003\000\000\002\376\001\000\000\005limit\376\377\016");
+lf[768]=C_h_intern(&lf[768],12,"\000arity-error");
+lf[769]=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[770]=C_h_intern(&lf[770],13,"\000access-error");
+lf[771]=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[772]=C_h_intern(&lf[772],13,"\000domain-error");
+lf[773]=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[774]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\377\016");
+lf[775]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
+lf[776]=C_decode_literal(C_heaptop,"\376B\000\000\032exception handler returned");
+lf[777]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
+lf[778]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
+lf[779]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\377\016");
+lf[780]=C_h_intern(&lf[780],29,"\003syscurrent-exception-handler");
+lf[781]=C_h_intern(&lf[781],10,"\003syssignal");
+lf[782]=C_h_intern(&lf[782],5,"abort");
+lf[783]=C_h_intern(&lf[783],6,"signal");
+lf[784]=C_h_intern(&lf[784],18,"\003syslast-exception");
+lf[785]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
+lf[786]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
+lf[787]=C_h_intern(&lf[787],3,"exn");
+lf[788]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\007message");
+lf[789]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\011arguments");
+lf[790]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\003exn\376\001\000\000\010location");
+lf[791]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
+lf[792]=C_decode_literal(C_heaptop,"\376B\000\000\002) ");
+lf[793]=C_decode_literal(C_heaptop,"\376B\000\000\000");
+lf[794]=C_decode_literal(C_heaptop,"\376B\000\000 <exn: has no `message\047 property>");
+lf[795]=C_h_intern(&lf[795],14,"user-interrupt");
+lf[796]=C_decode_literal(C_heaptop,"\376B\000\000\030\012*** user interrupt ***\012");
+lf[797]=C_h_intern(&lf[797],18,"uncaught-exception");
+lf[798]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
+lf[799]=C_decode_literal(C_heaptop,"\376B\000\000\022uncaught exception");
+lf[800]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
+lf[801]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
+lf[802]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\001\000\000\006reason");
+lf[803]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\022uncaught-exception\376\377\016");
+lf[804]=C_h_intern(&lf[804],22,"with-exception-handler");
+lf[805]=C_h_intern(&lf[805],25,"current-exception-handler");
+lf[806]=C_h_intern(&lf[806],23,"make-property-condition");
+lf[807]=C_h_intern(&lf[807],24,"make-composite-condition");
+lf[808]=C_h_intern(&lf[808],10,"\003sysappend");
+lf[809]=C_h_intern(&lf[809],10,"condition\077");
+lf[810]=C_h_intern(&lf[810],19,"condition-predicate");
+lf[811]=C_h_intern(&lf[811],27,"condition-property-accessor");
+lf[812]=C_decode_literal(C_heaptop,"\376B\000\000\036condition has no such property");
+lf[813]=C_h_intern(&lf[813],22,"get-condition-property");
+lf[814]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument count - received ");
+lf[815]=C_decode_literal(C_heaptop,"\376B\000\000\016 but expected ");
+lf[816]=C_decode_literal(C_heaptop,"\376B\000\000\035too few arguments - received ");
+lf[817]=C_decode_literal(C_heaptop,"\376B\000\000\016 but expected ");
+lf[818]=C_decode_literal(C_heaptop,"\376B\000\000\021bad argument type");
+lf[819]=C_decode_literal(C_heaptop,"\376B\000\000\020unbound variable");
+lf[820]=C_decode_literal(C_heaptop,"\376B\000\000\030parameter limit exceeded");
+lf[821]=C_decode_literal(C_heaptop,"\376B\000\000\015out of memory");
+lf[822]=C_decode_literal(C_heaptop,"\376B\000\000\020division by zero");
+lf[823]=C_decode_literal(C_heaptop,"\376B\000\000\014out of range");
+lf[824]=C_decode_literal(C_heaptop,"\376B\000\000\025call of non-procedure");
+lf[825]=C_decode_literal(C_heaptop,"\376B\000\000+continuation cannot receive multiple values");
+lf[826]=C_decode_literal(C_heaptop,"\376B\000\000)bad argument type - not a non-cyclic list");
+lf[827]=C_decode_literal(C_heaptop,"\376B\000\000\022recursion too deep");
+lf[828]=C_decode_literal(C_heaptop,"\376B\000\0007inexact number cannot be represented as an exact number");
+lf[829]=C_decode_literal(C_heaptop,"\376B\000\000%bad argument type - not a proper list");
+lf[830]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a fixnum");
+lf[831]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a number");
+lf[832]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a string");
+lf[833]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a pair");
+lf[834]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a list");
+lf[835]=C_decode_literal(C_heaptop,"\376B\000\000#bad argument type - not a character");
+lf[836]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a vector");
+lf[837]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a symbol");
+lf[838]=C_decode_literal(C_heaptop,"\376B\000\000\016stack overflow");
+lf[839]=C_decode_literal(C_heaptop,"\376B\000\0008bad argument type - not a structure of the required type");
+lf[840]=C_decode_literal(C_heaptop,"\376B\000\000\036bad argument type - not a blob");
+lf[841]=C_decode_literal(C_heaptop,"\376B\000\000#locative refers to reclaimed object");
+lf[842]=C_decode_literal(C_heaptop,"\376B\000\000-bad argument type - not a non-immediate value");
+lf[843]=C_decode_literal(C_heaptop,"\376B\000\000\047bad argument type - not a number vector");
+lf[844]=C_decode_literal(C_heaptop,"\376B\000\000\042bad argument type - not an integer");
+lf[845]=C_decode_literal(C_heaptop,"\376B\000\000+bad argument type - not an unsigned integer");
+lf[846]=C_decode_literal(C_heaptop,"\376B\000\000!bad argument type - not a pointer");
+lf[847]=C_decode_literal(C_heaptop,"\376B\000\000(bad argument type - not a tagged pointer");
+lf[848]=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[849]=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[850]=C_decode_literal(C_heaptop,"\376B\000\000 bad argument type - not a flonum");
+lf[851]=C_decode_literal(C_heaptop,"\376B\000\000#bad argument type - not a procedure");
+lf[852]=C_decode_literal(C_heaptop,"\376B\000\000\026unknown internal error");
+lf[853]=C_h_intern(&lf[853],14,"\003sysstructure\077");
+lf[854]=C_h_intern(&lf[854],22,"\003sysgeneric-structure\077");
+lf[855]=C_h_intern(&lf[855],8,"\003sysslot");
+lf[856]=C_h_intern(&lf[856],8,"\003syssize");
+lf[857]=C_h_intern(&lf[857],16,"\003sysmake-pointer");
+lf[858]=C_h_intern(&lf[858],23,"\003sysmake-tagged-pointer");
+lf[859]=C_h_intern(&lf[859],12,"\003syspointer\077");
+lf[860]=C_h_intern(&lf[860],24,"\003sysset-pointer-address!");
+lf[861]=C_h_intern(&lf[861],15,"\003sysbytevector\077");
+lf[862]=C_h_intern(&lf[862],23,"\003sysstring->pbytevector");
+lf[863]=C_h_intern(&lf[863],14,"\003syspermanent\077");
+lf[864]=C_h_intern(&lf[864],17,"\003sysblock-address");
+lf[865]=C_h_intern(&lf[865],13,"\003syslocative\077");
+lf[866]=C_h_intern(&lf[866],16,"\003sysnull-pointer");
+lf[867]=C_h_intern(&lf[867],17,"\003sysnull-pointer\077");
+lf[868]=C_h_intern(&lf[868],20,"\003sysaddress->pointer");
+lf[869]=C_h_intern(&lf[869],23,"\003syspeek-signed-integer");
+lf[870]=C_h_intern(&lf[870],15,"\003syspeek-fixnum");
+lf[871]=C_h_intern(&lf[871],13,"\003syspeek-byte");
+lf[872]=C_h_intern(&lf[872],22,"\003sysvector->structure!");
+lf[873]=C_h_intern(&lf[873],15,"\003syspeek-double");
+lf[874]=C_h_intern(&lf[874],26,"\003syspeek-and-free-c-string");
+lf[875]=C_h_intern(&lf[875],34,"\003syspeek-and-free-nonnull-c-string");
+lf[876]=C_h_intern(&lf[876],17,"\003syspoke-c-string");
+lf[877]=C_h_intern(&lf[877],16,"\003syspoke-integer");
+lf[878]=C_h_intern(&lf[878],15,"\003syspoke-double");
+lf[879]=C_h_intern(&lf[879],22,"\003syspeek-c-string-list");
+lf[880]=C_h_intern(&lf[880],31,"\003syspeek-and-free-c-string-list");
+lf[881]=C_h_intern(&lf[881],20,"\003sysvector->closure!");
+lf[882]=C_h_intern(&lf[882],32,"\003syssymbol-has-toplevel-binding\077");
+lf[883]=C_h_intern(&lf[883],14,"\003syscopy-words");
+lf[884]=C_h_intern(&lf[884],17,"\003syscompare-bytes");
+lf[885]=C_h_intern(&lf[885],15,"\003syszap-strings");
+lf[886]=C_h_intern(&lf[886],17,"\003sysblock-pointer");
+lf[887]=C_h_intern(&lf[887],25,"\003sysforeign-char-argument");
+lf[888]=C_h_intern(&lf[888],27,"\003sysforeign-fixnum-argument");
+lf[889]=C_h_intern(&lf[889],27,"\003sysforeign-flonum-argument");
+lf[890]=C_h_intern(&lf[890],26,"\003sysforeign-block-argument");
+lf[891]=C_h_intern(&lf[891],34,"\003sysforeign-number-vector-argument");
+lf[892]=C_h_intern(&lf[892],27,"\003sysforeign-string-argument");
+lf[893]=C_h_intern(&lf[893],27,"\003sysforeign-symbol-argument");
+lf[894]=C_h_intern(&lf[894],28,"\003sysforeign-pointer-argument");
+lf[895]=C_h_intern(&lf[895],35,"\003sysforeign-tagged-pointer-argument");
+lf[896]=C_h_intern(&lf[896],28,"\003sysforeign-integer-argument");
+lf[897]=C_h_intern(&lf[897],37,"\003sysforeign-unsigned-integer-argument");
+lf[898]=C_h_intern(&lf[898],26,"\003sysdefault-thread-quantum");
+lf[899]=C_h_intern(&lf[899],29,"\003sysdefault-exception-handler");
+lf[900]=C_decode_literal(C_heaptop,"\376B\000\000>internal error: default exception handler shouldn\047t be called!");
+lf[901]=C_h_intern(&lf[901],15,"\003sysmake-thread");
+lf[902]=C_h_intern(&lf[902],14,"\003sysmake-mutex");
+lf[903]=C_h_intern(&lf[903],5,"mutex");
+lf[904]=C_h_intern(&lf[904],19,"\003sysabandon-mutexes");
+lf[905]=C_h_intern(&lf[905],12,"\003sysschedule");
+lf[906]=C_h_intern(&lf[906],17,"\003systhread-yield!");
+lf[907]=C_h_intern(&lf[907],18,"\003syscontext-switch");
+lf[908]=C_h_intern(&lf[908],18,"\003sysinterrupt-hook");
+lf[909]=C_h_intern(&lf[909],22,"\003syspending-finalizers");
+lf[910]=C_h_intern(&lf[910],26,"\003sysrun-pending-finalizers");
+lf[911]=C_h_intern(&lf[911],5,"errno");
+lf[912]=C_decode_literal(C_heaptop,"\376B\000\000Lunexpected end of file - unterminated `#{...}\047 item in `here\047 string litera"
+"l");
+lf[913]=C_decode_literal(C_heaptop,"\376B\000\000\001\047");
+lf[914]=C_decode_literal(C_heaptop,"\376B\000\000&unterminated here-doc string literal `");
+lf[915]=C_decode_literal(C_heaptop,"\376B\000\000$Missing tag after #<< here-doc token");
+lf[916]=C_decode_literal(C_heaptop,"\376B\000\000!Whitespace after #<< here-doc tag");
+lf[917]=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[918]=C_decode_literal(C_heaptop,"\376B\000\000$Missing tag after #<# here-doc token");
+lf[919]=C_decode_literal(C_heaptop,"\376B\000\000!Whitespace after #<# here-doc tag");
+lf[920]=C_decode_literal(C_heaptop,"\376B\000\000\021unreadable object");
+lf[921]=C_h_intern(&lf[921],12,"program-name");
+lf[922]=C_h_intern(&lf[922],22,"command-line-arguments");
+lf[923]=C_h_intern(&lf[923],18,"\003sysset-finalizer!");
+lf[924]=C_h_intern(&lf[924],14,"set-finalizer!");
+lf[925]=C_decode_literal(C_heaptop,"\376B\000\000\035[debug] too many finalizers (");
+lf[926]=C_decode_literal(C_heaptop,"\376B\000\000\035), resized max finalizers to ");
+lf[927]=C_decode_literal(C_heaptop,"\376B\000\000\003...");
+lf[928]=C_decode_literal(C_heaptop,"\376B\000\000\035[debug] too many finalizers (");
+lf[929]=C_decode_literal(C_heaptop,"\376B\000\000\016), forcing ...");
+lf[930]=C_decode_literal(C_heaptop,"\376B\000\000\020[debug] running ");
+lf[931]=C_decode_literal(C_heaptop,"\376B\000\000\015 finalizers (");
+lf[932]=C_decode_literal(C_heaptop,"\376B\000\000\007 live, ");
+lf[933]=C_decode_literal(C_heaptop,"\376B\000\000\017 allocated) ...");
+lf[934]=C_h_intern(&lf[934],2,"gc");
+lf[935]=C_h_intern(&lf[935],8,"\003syslist");
+lf[936]=C_h_intern(&lf[936],8,"\003syscons");
+lf[937]=C_h_intern(&lf[937],10,"\003sysvector");
+lf[938]=C_h_intern(&lf[938],9,"\003sysapply");
+lf[939]=C_h_intern(&lf[939],10,"\003sysvalues");
+lf[940]=C_h_intern(&lf[940],10,"\003sysequal\077");
+lf[941]=C_h_intern(&lf[941],7,"\003syscar");
+lf[942]=C_h_intern(&lf[942],7,"\003syscdr");
+lf[943]=C_h_intern(&lf[943],9,"\003syspair\077");
+lf[944]=C_h_intern(&lf[944],11,"\003sysvector\077");
+lf[945]=C_h_intern(&lf[945],16,"\003sysvector->list");
+lf[946]=C_h_intern(&lf[946],17,"\003sysvector-length");
+lf[947]=C_h_intern(&lf[947],14,"\003sysvector-ref");
+lf[948]=C_h_intern(&lf[948],6,"\003sys>=");
+lf[949]=C_h_intern(&lf[949],5,"\003sys=");
+lf[950]=C_h_intern(&lf[950],5,"\003sys+");
+lf[951]=C_h_intern(&lf[951],7,"\003syseq\077");
+lf[952]=C_h_intern(&lf[952],8,"\003syseqv\077");
+lf[953]=C_h_intern(&lf[953],9,"\003syslist\077");
+lf[954]=C_h_intern(&lf[954],9,"\003sysnull\077");
+lf[955]=C_h_intern(&lf[955],9,"\003sysmap-n");
+lf[956]=C_h_intern(&lf[956],12,"\003syslist-ref");
+lf[957]=C_h_intern(&lf[957],16,"\003sysmake-promise");
+lf[958]=C_h_intern(&lf[958],8,"promise\077");
+lf[959]=C_h_intern(&lf[959],20,"\003sysread-from-string");
+lf[960]=C_h_intern(&lf[960],19,"print-error-message");
+lf[961]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[962]=C_decode_literal(C_heaptop,"\376B\000\000\001(");
+lf[963]=C_decode_literal(C_heaptop,"\376B\000\000\002) ");
+lf[964]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[965]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\001\000\000\016user-interrupt\376\377\016");
+lf[966]=C_decode_literal(C_heaptop,"\376B\000\000\030: *** user interrupt ***");
+lf[967]=C_decode_literal(C_heaptop,"\376B\000\000\016: <condition> ");
+lf[968]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[969]=C_decode_literal(C_heaptop,"\376B\000\000\026: uncaught exception: ");
+lf[970]=C_decode_literal(C_heaptop,"\376B\000\000\005Error");
+lf[971]=C_h_intern(&lf[971],17,"\003sysmake-locative");
+lf[972]=C_decode_literal(C_heaptop,"\376B\000\000)locative cannot refer to immediate object");
+lf[973]=C_h_intern(&lf[973],8,"u8vector");
+lf[974]=C_h_intern(&lf[974],8,"s8vector");
+lf[975]=C_h_intern(&lf[975],9,"u16vector");
+lf[976]=C_h_intern(&lf[976],9,"s16vector");
+lf[977]=C_h_intern(&lf[977],9,"u32vector");
+lf[978]=C_h_intern(&lf[978],9,"s32vector");
+lf[979]=C_h_intern(&lf[979],9,"f32vector");
+lf[980]=C_h_intern(&lf[980],9,"f64vector");
+lf[981]=C_decode_literal(C_heaptop,"\376B\000\000Abad argument type - locative cannot refer to objects of this type");
+lf[982]=C_h_intern(&lf[982],21,"\003sysfind-symbol-table");
+lf[983]=C_h_intern(&lf[983],10,"\003sysimport");
+lf[984]=C_decode_literal(C_heaptop,"\376B\000\000\042symbol not exported from namespace");
+lf[985]=C_decode_literal(C_heaptop,"\376B\000\000\023undefined namespace");
+lf[986]=C_decode_literal(C_heaptop,"\376B\000\000\042bad argument type - invalid prefix");
+lf[987]=C_h_intern(&lf[987],17,"\003sysnamespace-ref");
+lf[988]=C_decode_literal(C_heaptop,"\376B\000\000\042symbol not exported from namespace");
+lf[989]=C_decode_literal(C_heaptop,"\376B\000\000+bad argument type - not a valid import name");
+lf[990]=C_h_intern(&lf[990],18,"\003syswalk-namespace");
+lf[991]=C_decode_literal(C_heaptop,"\376B\000\000\001.");
+lf[992]=C_decode_literal(C_heaptop,"\376B\000\000\023undefined namespace");
+lf[993]=C_h_intern(&lf[993],17,"memory-statistics");
+lf[994]=C_h_intern(&lf[994],19,"\003sysdecorate-lambda");
+lf[995]=C_h_intern(&lf[995],21,"\003syslambda-decoration");
+lf[996]=C_h_intern(&lf[996],21,"procedure-information");
+lf[997]=C_h_intern(&lf[997],6,"setter");
+lf[999]=C_h_intern(&lf[999],10,"\003syssetter");
+lf[1000]=C_h_intern(&lf[1000],18,"getter-with-setter");
+lf[1001]=C_h_intern(&lf[1001],8,"\003sysput!");
+lf[1002]=C_h_intern(&lf[1002],4,"put!");
+lf[1003]=C_h_intern(&lf[1003],7,"\003sysget");
+lf[1004]=C_h_intern(&lf[1004],3,"get");
+lf[1005]=C_h_intern(&lf[1005],8,"remprop!");
+lf[1006]=C_h_intern(&lf[1006],12,"symbol-plist");
+lf[1007]=C_h_intern(&lf[1007],14,"get-properties");
+lf[1008]=C_h_intern(&lf[1008],19,"symbol-plist/setter");
+lf[1009]=C_decode_literal(C_heaptop,"\376B\000\000\021no setter defined");
+lf[1010]=C_decode_literal(C_heaptop,"\376B\000\000!can\047t set setter of non-procedure");
+lf[1011]=C_h_intern(&lf[1011],9,"arguments");
+lf[1012]=C_h_intern(&lf[1012],7,"message");
+lf[1013]=C_decode_literal(C_heaptop,"\376B\000\000\002-:");
+lf[1014]=C_decode_literal(C_heaptop,"\376B\000\000\011<unknown>");
+lf[1015]=C_h_intern(&lf[1015],7,"running");
+lf[1016]=C_h_intern(&lf[1016],10,"primordial");
+lf[1017]=C_h_intern(&lf[1017],4,"repl");
+lf[1018]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[1019]=C_decode_literal(C_heaptop,"\376B\000\000\002: ");
+lf[1020]=C_decode_literal(C_heaptop,"\376B\000\000\006\012Error");
+lf[1021]=C_decode_literal(C_heaptop,"\376B\000\000\016error in error");
+lf[1022]=C_h_intern(&lf[1022],14,"\000cross-chicken");
+lf[1023]=C_h_intern(&lf[1023],8,"\000ptables");
+lf[1024]=C_h_intern(&lf[1024],6,"\000dload");
+lf[1025]=C_h_intern(&lf[1025],9,"\000manyargs");
+lf[1026]=C_h_intern(&lf[1026],7,"windows");
+lf[1027]=C_h_intern(&lf[1027],6,"cygwin");
+lf[1028]=C_decode_literal(C_heaptop,"\376B\000\000\010(stderr)");
+lf[1029]=C_decode_literal(C_heaptop,"\376B\000\000\010(stdout)");
+lf[1030]=C_decode_literal(C_heaptop,"\376B\000\000\007(stdin)");
+lf[1031]=C_h_intern(&lf[1031],9,"backspace");
+lf[1032]=C_h_intern(&lf[1032],4,"page");
+lf[1033]=C_h_intern(&lf[1033],6,"return");
+lf[1034]=C_h_intern(&lf[1034],3,"nul");
+lf[1035]=C_h_intern(&lf[1035],5,"alarm");
+lf[1036]=C_h_intern(&lf[1036],3,"esc");
+lf[1037]=C_h_intern(&lf[1037],6,"delete");
+lf[1038]=C_h_intern(&lf[1038],4,"vtab");
+lf[1039]=C_h_intern(&lf[1039],8,"linefeed");
+lf[1040]=C_h_intern(&lf[1040],3,"tab");
+lf[1041]=C_h_intern(&lf[1041],5,"space");
+C_register_lf2(lf,1042,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c380 ...) */,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_6107,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_6117,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_6126,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_6142,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_6151,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_6166,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_6170,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_6173,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_6178,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_6186,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_6194,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_6200,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_6210,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_6214,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_6220,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_6223,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_6226,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_6229,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_6234,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_6237,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_6241,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_word)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_6250,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_6284,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_6287,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_6300,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_6314,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_6327,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_6340,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_6353,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_6366,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_6379,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_6392,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_6405,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_6418,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_6431,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_6450,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_6481,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_6503,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_6516,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_6532,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_6552,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_6565,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_6568,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_6571,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_6574,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_6577,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_6580,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_6583,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_6586,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_6589,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_6592,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_6595,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_6598,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_6601,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_6604,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_6607,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_6610,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_6620,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_6630,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_6640,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_6654,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_6660,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_6667,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_6681,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_6687,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_6701,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_6715,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_6733,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_6743,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_6754,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_6760,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_6771,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_6774,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_6781,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_6799,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_6809,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_6820,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_6826,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_6844,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_6854,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_6872,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_6878,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_6881,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_6884,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_6887,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_6890,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_6933,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_6950,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_7029,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_7068,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_7071,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_7074,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_7077,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_7080,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_7083,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_7086,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_7089,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_7092,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_7095,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_7098,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_7101,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_7134,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_7170,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_7200,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_7252,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_7304,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_7317,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_7329,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_7380,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_7390,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_7393,a[2]=((C_word)li135),tmp=(C_word)a,a+=3,tmp));
+t148=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7396,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_7416,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_7440,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_7464,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_7485,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_7506,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_7526,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_7550,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_7574,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_7595,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_7616,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_7632,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_7671,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_7677,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_7716,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_7719,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_7722,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_7725,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_7728,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_7734,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_7737,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_7740,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_7743,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_7746,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_7749,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_7752,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_7755,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_7758,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_7761,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_7764,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_7767,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_7770,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_7773,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_7790,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_7817,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_7820,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_7826,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_7849,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_7872,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_7895,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_7918,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_7941,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_7964,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_7987,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_8010,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_8033,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_8050,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_8073,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_8096,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_8113,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_8130,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_8147,a[2]=((C_word)li197),tmp=(C_word)a,a+=3,tmp));
+t215=C_mutate((C_word*)lf[227]+1 /* (set! fpsin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8164,a[2]=((C_word)li198),tmp=(C_word)a,a+=3,tmp));
+t216=C_mutate((C_word*)lf[228]+1 /* (set! fpcos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8181,a[2]=((C_word)li199),tmp=(C_word)a,a+=3,tmp));
+t217=C_mutate((C_word*)lf[229]+1 /* (set! fptan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8198,a[2]=((C_word)li200),tmp=(C_word)a,a+=3,tmp));
+t218=C_mutate((C_word*)lf[230]+1 /* (set! fpasin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8215,a[2]=((C_word)li201),tmp=(C_word)a,a+=3,tmp));
+t219=C_mutate((C_word*)lf[231]+1 /* (set! fpacos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8232,a[2]=((C_word)li202),tmp=(C_word)a,a+=3,tmp));
+t220=C_mutate((C_word*)lf[232]+1 /* (set! fpatan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8249,a[2]=((C_word)li203),tmp=(C_word)a,a+=3,tmp));
+t221=C_mutate((C_word*)lf[233]+1 /* (set! fpatan2 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8266,a[2]=((C_word)li204),tmp=(C_word)a,a+=3,tmp));
+t222=C_mutate((C_word*)lf[234]+1 /* (set! fpexp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8289,a[2]=((C_word)li205),tmp=(C_word)a,a+=3,tmp));
+t223=C_mutate((C_word*)lf[235]+1 /* (set! fpexpt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8306,a[2]=((C_word)li206),tmp=(C_word)a,a+=3,tmp));
+t224=C_mutate((C_word*)lf[236]+1 /* (set! fplog ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8329,a[2]=((C_word)li207),tmp=(C_word)a,a+=3,tmp));
+t225=C_mutate((C_word*)lf[237]+1 /* (set! fpsqrt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8346,a[2]=((C_word)li208),tmp=(C_word)a,a+=3,tmp));
+t226=C_mutate((C_word*)lf[238]+1 /* (set! * ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_times,a[2]=((C_word)li209),tmp=(C_word)a,a+=3,tmp));
+t227=C_mutate((C_word*)lf[239]+1 /* (set! - ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_minus,a[2]=((C_word)li210),tmp=(C_word)a,a+=3,tmp));
+t228=C_mutate((C_word*)lf[240]+1 /* (set! + ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_plus,a[2]=((C_word)li211),tmp=(C_word)a,a+=3,tmp));
+t229=C_mutate((C_word*)lf[241]+1 /* (set! / ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_divide,a[2]=((C_word)li212),tmp=(C_word)a,a+=3,tmp));
+t230=C_mutate((C_word*)lf[242]+1 /* (set! = ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_nequalp,a[2]=((C_word)li213),tmp=(C_word)a,a+=3,tmp));
+t231=C_mutate((C_word*)lf[243]+1 /* (set! > ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_greaterp,a[2]=((C_word)li214),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_lessp,a[2]=((C_word)li215),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_greater_or_equal_p,a[2]=((C_word)li216),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_less_or_equal_p,a[2]=((C_word)li217),tmp=(C_word)a,a+=3,tmp));
+t235=C_mutate((C_word*)lf[247]+1 /* (set! add1 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8372,a[2]=((C_word)li218),tmp=(C_word)a,a+=3,tmp));
+t236=C_mutate((C_word*)lf[248]+1 /* (set! sub1 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8378,a[2]=((C_word)li219),tmp=(C_word)a,a+=3,tmp));
+t237=C_mutate((C_word*)lf[249]+1 /* (set! quotient ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_quotient,a[2]=((C_word)li220),tmp=(C_word)a,a+=3,tmp));
+t238=C_mutate((C_word*)lf[250]+1 /* (set! number? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8385,a[2]=((C_word)li221),tmp=(C_word)a,a+=3,tmp));
+t239=C_mutate((C_word*)lf[251]+1 /* (set! number? ...) */,*((C_word*)lf[250]+1));
+t240=C_mutate((C_word*)lf[252]+1 /* (set! complex? ...) */,*((C_word*)lf[251]+1));
+t241=C_mutate((C_word*)lf[253]+1 /* (set! real? ...) */,*((C_word*)lf[251]+1));
+t242=C_mutate((C_word*)lf[254]+1 /* (set! rational? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8391,a[2]=((C_word)li222),tmp=(C_word)a,a+=3,tmp));
+t243=C_mutate((C_word*)lf[255]+1 /* (set! flonum-fraction ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_flonum_fraction,a[2]=((C_word)li223),tmp=(C_word)a,a+=3,tmp));
+t244=C_mutate((C_word*)lf[256]+1 /* (set! integer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8395,a[2]=((C_word)li224),tmp=(C_word)a,a+=3,tmp));
+t245=C_mutate((C_word*)lf[257]+1 /* (set! integer? ...) */,*((C_word*)lf[256]+1));
+t246=C_mutate((C_word*)lf[258]+1 /* (set! exact? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8399,a[2]=((C_word)li225),tmp=(C_word)a,a+=3,tmp));
+t247=C_mutate((C_word*)lf[259]+1 /* (set! inexact? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8402,a[2]=((C_word)li226),tmp=(C_word)a,a+=3,tmp));
+t248=C_mutate((C_word*)lf[260]+1 /* (set! exact? ...) */,*((C_word*)lf[258]+1));
+t249=C_mutate((C_word*)lf[261]+1 /* (set! inexact? ...) */,*((C_word*)lf[259]+1));
+t250=C_mutate((C_word*)lf[262]+1 /* (set! expt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_expt,a[2]=((C_word)li227),tmp=(C_word)a,a+=3,tmp));
+t251=C_mutate((C_word*)lf[263]+1 /* (set! fits-in-int? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8408,a[2]=((C_word)li228),tmp=(C_word)a,a+=3,tmp));
+t252=C_mutate((C_word*)lf[264]+1 /* (set! fits-in-unsigned-int? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8411,a[2]=((C_word)li229),tmp=(C_word)a,a+=3,tmp));
+t253=C_mutate((C_word*)lf[265]+1 /* (set! flonum-in-fixnum-range? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8414,a[2]=((C_word)li230),tmp=(C_word)a,a+=3,tmp));
+t254=C_mutate((C_word*)lf[266]+1 /* (set! double->number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8417,a[2]=((C_word)li231),tmp=(C_word)a,a+=3,tmp));
+t255=C_mutate((C_word*)lf[267]+1 /* (set! zero? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8420,a[2]=((C_word)li232),tmp=(C_word)a,a+=3,tmp));
+t256=C_mutate((C_word*)lf[268]+1 /* (set! positive? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8423,a[2]=((C_word)li233),tmp=(C_word)a,a+=3,tmp));
+t257=C_mutate((C_word*)lf[269]+1 /* (set! negative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8426,a[2]=((C_word)li234),tmp=(C_word)a,a+=3,tmp));
+t258=C_mutate((C_word*)lf[270]+1 /* (set! abs ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8429,a[2]=((C_word)li235),tmp=(C_word)a,a+=3,tmp));
+t259=C_mutate((C_word*)lf[271]+1 /* (set! angle ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8432,a[2]=((C_word)li236),tmp=(C_word)a,a+=3,tmp));
+t260=C_mutate((C_word*)lf[274]+1 /* (set! real-part ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8451,a[2]=((C_word)li237),tmp=(C_word)a,a+=3,tmp));
+t261=C_mutate((C_word*)lf[275]+1 /* (set! imag-part ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8457,a[2]=((C_word)li238),tmp=(C_word)a,a+=3,tmp));
+t262=C_mutate((C_word*)lf[276]+1 /* (set! numerator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8463,a[2]=((C_word)li239),tmp=(C_word)a,a+=3,tmp));
+t263=C_mutate((C_word*)lf[278]+1 /* (set! denominator ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8475,a[2]=((C_word)li240),tmp=(C_word)a,a+=3,tmp));
+t264=C_mutate((C_word*)lf[280]+1 /* (set! magnitude ...) */,*((C_word*)lf[270]+1));
+t265=C_mutate((C_word*)lf[281]+1 /* (set! signum ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8488,a[2]=((C_word)li241),tmp=(C_word)a,a+=3,tmp));
+t266=C_mutate((C_word*)lf[285]+1 /* (set! exact->inexact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_exact_to_inexact,a[2]=((C_word)li242),tmp=(C_word)a,a+=3,tmp));
+t267=C_mutate((C_word*)lf[286]+1 /* (set! exact->inexact ...) */,*((C_word*)lf[285]+1));
+t268=C_mutate((C_word*)lf[287]+1 /* (set! inexact->exact ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8523,a[2]=((C_word)li243),tmp=(C_word)a,a+=3,tmp));
+t269=C_mutate((C_word*)lf[288]+1 /* (set! inexact->exact ...) */,*((C_word*)lf[287]+1));
+t270=C_mutate((C_word*)lf[289]+1 /* (set! floor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8527,a[2]=((C_word)li244),tmp=(C_word)a,a+=3,tmp));
+t271=C_mutate((C_word*)lf[290]+1 /* (set! ceiling ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8539,a[2]=((C_word)li245),tmp=(C_word)a,a+=3,tmp));
+t272=C_mutate((C_word*)lf[291]+1 /* (set! truncate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8551,a[2]=((C_word)li246),tmp=(C_word)a,a+=3,tmp));
+t273=C_mutate((C_word*)lf[292]+1 /* (set! round ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8563,a[2]=((C_word)li247),tmp=(C_word)a,a+=3,tmp));
+t274=C_mutate((C_word*)lf[293]+1 /* (set! remainder ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8572,a[2]=((C_word)li248),tmp=(C_word)a,a+=3,tmp));
+t275=*((C_word*)lf[289]+1);
+t276=C_mutate((C_word*)lf[294]+1 /* (set! modulo ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8586,a[2]=t275,a[3]=((C_word)li249),tmp=(C_word)a,a+=4,tmp));
+t277=C_mutate((C_word*)lf[295]+1 /* (set! even? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8615,a[2]=((C_word)li250),tmp=(C_word)a,a+=3,tmp));
+t278=C_mutate((C_word*)lf[296]+1 /* (set! odd? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8618,a[2]=((C_word)li251),tmp=(C_word)a,a+=3,tmp));
+t279=C_set_block_item(lf[297] /* max */,0,C_SCHEME_UNDEFINED);
+t280=C_set_block_item(lf[298] /* min */,0,C_SCHEME_UNDEFINED);
+t281=*((C_word*)lf[243]+1);
+t282=*((C_word*)lf[244]+1);
+t283=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8623,a[2]=((C_word)li253),tmp=(C_word)a,a+=3,tmp);
+t284=C_mutate((C_word*)lf[297]+1 /* (set! max ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8670,a[2]=t281,a[3]=t283,a[4]=((C_word)li254),tmp=(C_word)a,a+=5,tmp));
+t285=C_mutate((C_word*)lf[298]+1 /* (set! min ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8676,a[2]=t282,a[3]=t283,a[4]=((C_word)li255),tmp=(C_word)a,a+=5,tmp));
+t286=C_mutate((C_word*)lf[299]+1 /* (set! exp ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8682,a[2]=((C_word)li256),tmp=(C_word)a,a+=3,tmp));
+t287=C_mutate((C_word*)lf[300]+1 /* (set! log ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8685,a[2]=((C_word)li257),tmp=(C_word)a,a+=3,tmp));
+t288=C_mutate((C_word*)lf[301]+1 /* (set! sin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8688,a[2]=((C_word)li258),tmp=(C_word)a,a+=3,tmp));
+t289=C_mutate((C_word*)lf[302]+1 /* (set! cos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8691,a[2]=((C_word)li259),tmp=(C_word)a,a+=3,tmp));
+t290=C_mutate((C_word*)lf[303]+1 /* (set! tan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8694,a[2]=((C_word)li260),tmp=(C_word)a,a+=3,tmp));
+t291=C_mutate((C_word*)lf[304]+1 /* (set! asin ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8697,a[2]=((C_word)li261),tmp=(C_word)a,a+=3,tmp));
+t292=C_mutate((C_word*)lf[305]+1 /* (set! acos ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8700,a[2]=((C_word)li262),tmp=(C_word)a,a+=3,tmp));
+t293=C_mutate((C_word*)lf[306]+1 /* (set! sqrt ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8703,a[2]=((C_word)li263),tmp=(C_word)a,a+=3,tmp));
+t294=C_mutate((C_word*)lf[307]+1 /* (set! atan ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8706,a[2]=((C_word)li264),tmp=(C_word)a,a+=3,tmp));
+t295=*((C_word*)lf[293]+1);
+t296=C_mutate((C_word*)lf[308]+1 /* (set! gcd ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8718,a[2]=t295,a[3]=((C_word)li266),tmp=(C_word)a,a+=4,tmp));
+t297=C_mutate((C_word*)lf[309]+1 /* (set! gcd ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8743,a[2]=((C_word)li268),tmp=(C_word)a,a+=3,tmp));
+t298=C_mutate((C_word*)lf[310]+1 /* (set! lcm ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8800,a[2]=((C_word)li269),tmp=(C_word)a,a+=3,tmp));
+t299=C_mutate((C_word*)lf[311]+1 /* (set! lcm ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8814,a[2]=((C_word)li271),tmp=(C_word)a,a+=3,tmp));
+t300=C_mutate((C_word*)lf[312]+1 /* (set! string->number ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_string_to_number,a[2]=((C_word)li272),tmp=(C_word)a,a+=3,tmp));
+t301=C_mutate((C_word*)lf[313]+1 /* (set! string->number ...) */,*((C_word*)lf[312]+1));
+t302=C_mutate((C_word*)lf[314]+1 /* (set! number->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_number_to_string,a[2]=((C_word)li273),tmp=(C_word)a,a+=3,tmp));
+t303=C_mutate((C_word*)lf[315]+1 /* (set! number->string ...) */,*((C_word*)lf[314]+1));
+t304=C_mutate((C_word*)lf[316]+1 /* (set! flonum-print-precision ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8879,a[2]=((C_word)li274),tmp=(C_word)a,a+=3,tmp));
+t305=C_mutate((C_word*)lf[317]+1 /* (set! make-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_symbol,a[2]=((C_word)li275),tmp=(C_word)a,a+=3,tmp));
+t306=C_mutate((C_word*)lf[318]+1 /* (set! symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8911,a[2]=((C_word)li276),tmp=(C_word)a,a+=3,tmp));
+t307=C_mutate((C_word*)lf[319]+1 /* (set! snafu ...) */,lf[320]);
+t308=C_mutate((C_word*)lf[321]+1 /* (set! intern-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_string_to_symbol,a[2]=((C_word)li277),tmp=(C_word)a,a+=3,tmp));
+t309=C_mutate((C_word*)lf[322]+1 /* (set! interned-symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8916,a[2]=((C_word)li278),tmp=(C_word)a,a+=3,tmp));
+t310=C_mutate((C_word*)lf[323]+1 /* (set! string->symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8919,a[2]=((C_word)li279),tmp=(C_word)a,a+=3,tmp));
+t311=C_set_block_item(lf[324] /* symbol->string */,0,C_SCHEME_UNDEFINED);
+t312=C_set_block_item(lf[325] /* symbol->qualified-string */,0,C_SCHEME_UNDEFINED);
+t313=C_set_block_item(lf[326] /* qualified-symbol-prefix */,0,C_SCHEME_UNDEFINED);
+t314=*((C_word*)lf[172]+1);
+t315=*((C_word*)lf[158]+1);
+t316=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8931,a[2]=((C_word)li280),tmp=(C_word)a,a+=3,tmp);
+t317=C_mutate((C_word*)lf[324]+1 /* (set! symbol->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8958,a[2]=t316,a[3]=((C_word)li281),tmp=(C_word)a,a+=4,tmp));
+t318=C_mutate((C_word*)lf[325]+1 /* (set! symbol->qualified-string ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8976,a[2]=t314,a[3]=t316,a[4]=((C_word)li282),tmp=(C_word)a,a+=5,tmp));
+t319=C_mutate((C_word*)lf[326]+1 /* (set! qualified-symbol-prefix ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9002,a[2]=t316,a[3]=((C_word)li283),tmp=(C_word)a,a+=4,tmp));
+t320=C_mutate((C_word*)lf[329]+1 /* (set! qualified-symbol? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9020,a[2]=((C_word)li284),tmp=(C_word)a,a+=3,tmp));
+t321=C_mutate((C_word*)lf[330]+1 /* (set! string->qualified-symbol ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9043,a[2]=((C_word)li285),tmp=(C_word)a,a+=3,tmp));
+t322=C_mutate((C_word*)lf[331]+1 /* (set! symbol->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9056,a[2]=((C_word)li286),tmp=(C_word)a,a+=3,tmp));
+t323=*((C_word*)lf[158]+1);
+t324=C_mutate((C_word*)lf[332]+1 /* (set! string->symbol ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9069,a[2]=t323,a[3]=((C_word)li287),tmp=(C_word)a,a+=4,tmp));
+t325=*((C_word*)lf[158]+1);
+t326=C_mutate((C_word*)lf[333]+1 /* (set! string->uninterned-symbol ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9082,a[2]=t325,a[3]=((C_word)li288),tmp=(C_word)a,a+=4,tmp));
+t327=C_fix(-1);
+t328=(*a=C_VECTOR_TYPE|1,a[1]=t327,tmp=(C_word)a,a+=2,tmp);
+t329=C_mutate((C_word*)lf[334]+1 /* (set! gensym ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9095,a[2]=t328,a[3]=((C_word)li289),tmp=(C_word)a,a+=4,tmp));
+t330=C_mutate((C_word*)lf[337]+1 /* (set! keyword? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9149,a[2]=((C_word)li290),tmp=(C_word)a,a+=3,tmp));
+t331=*((C_word*)lf[173]+1);
+t332=C_mutate((C_word*)lf[338]+1 /* (set! string->keyword ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9169,a[2]=t331,a[3]=((C_word)li291),tmp=(C_word)a,a+=4,tmp));
+t333=*((C_word*)lf[337]+1);
+t334=C_mutate((C_word*)lf[339]+1 /* (set! keyword->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9190,a[2]=t333,a[3]=((C_word)li292),tmp=(C_word)a,a+=4,tmp));
+t335=C_mutate((C_word*)lf[341]+1 /* (set! get-keyword ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9205,a[2]=((C_word)li293),tmp=(C_word)a,a+=3,tmp));
+t336=C_mutate((C_word*)lf[342]+1 /* (set! get-keyword ...) */,*((C_word*)lf[341]+1));
+t337=C_mutate((C_word*)lf[344]+1 /* (set! make-blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9245,a[2]=((C_word)li294),tmp=(C_word)a,a+=3,tmp));
+t338=C_mutate((C_word*)lf[345]+1 /* (set! make-blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9251,a[2]=((C_word)li295),tmp=(C_word)a,a+=3,tmp));
+t339=C_mutate((C_word*)lf[346]+1 /* (set! blob? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9260,a[2]=((C_word)li296),tmp=(C_word)a,a+=3,tmp));
+t340=C_mutate((C_word*)lf[347]+1 /* (set! blob-size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9266,a[2]=((C_word)li297),tmp=(C_word)a,a+=3,tmp));
+t341=C_mutate((C_word*)lf[348]+1 /* (set! string->blob ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9275,a[2]=((C_word)li298),tmp=(C_word)a,a+=3,tmp));
+t342=C_mutate((C_word*)lf[349]+1 /* (set! blob->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9287,a[2]=((C_word)li299),tmp=(C_word)a,a+=3,tmp));
+t343=C_mutate((C_word*)lf[350]+1 /* (set! blob=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9299,a[2]=((C_word)li300),tmp=(C_word)a,a+=3,tmp));
+t344=C_mutate((C_word*)lf[351]+1 /* (set! vector? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9324,a[2]=((C_word)li301),tmp=(C_word)a,a+=3,tmp));
+t345=C_mutate((C_word*)lf[352]+1 /* (set! vector-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9327,a[2]=((C_word)li302),tmp=(C_word)a,a+=3,tmp));
+t346=C_mutate((C_word*)lf[353]+1 /* (set! vector-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9330,a[2]=((C_word)li303),tmp=(C_word)a,a+=3,tmp));
+t347=C_mutate((C_word*)lf[354]+1 /* (set! vector-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9333,a[2]=((C_word)li304),tmp=(C_word)a,a+=3,tmp));
+t348=C_mutate((C_word*)lf[355]+1 /* (set! make-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9336,a[2]=((C_word)li305),tmp=(C_word)a,a+=3,tmp));
+t349=C_mutate((C_word*)lf[356]+1 /* (set! make-vector ...) */,*((C_word*)lf[355]+1));
+t350=C_mutate((C_word*)lf[358]+1 /* (set! list->vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9365,a[2]=((C_word)li307),tmp=(C_word)a,a+=3,tmp));
+t351=C_mutate((C_word*)lf[359]+1 /* (set! vector->list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9417,a[2]=((C_word)li309),tmp=(C_word)a,a+=3,tmp));
+t352=C_mutate((C_word*)lf[360]+1 /* (set! vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9450,a[2]=((C_word)li310),tmp=(C_word)a,a+=3,tmp));
+t353=C_mutate((C_word*)lf[362]+1 /* (set! vector-fill! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9456,a[2]=((C_word)li312),tmp=(C_word)a,a+=3,tmp));
+t354=C_mutate((C_word*)lf[363]+1 /* (set! vector-copy! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9484,a[2]=((C_word)li314),tmp=(C_word)a,a+=3,tmp));
+t355=C_mutate((C_word*)lf[365]+1 /* (set! vector-resize ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9555,a[2]=((C_word)li315),tmp=(C_word)a,a+=3,tmp));
+t356=C_mutate(&lf[366] /* (set! grow-vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9589,a[2]=((C_word)li317),tmp=(C_word)a,a+=3,tmp));
+t357=C_mutate((C_word*)lf[367]+1 /* (set! char? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9624,a[2]=((C_word)li318),tmp=(C_word)a,a+=3,tmp));
+t358=C_mutate((C_word*)lf[368]+1 /* (set! char->integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9627,a[2]=((C_word)li319),tmp=(C_word)a,a+=3,tmp));
+t359=C_mutate((C_word*)lf[369]+1 /* (set! integer->char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9633,a[2]=((C_word)li320),tmp=(C_word)a,a+=3,tmp));
+t360=C_mutate((C_word*)lf[370]+1 /* (set! char=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9639,a[2]=((C_word)li321),tmp=(C_word)a,a+=3,tmp));
+t361=C_mutate((C_word*)lf[371]+1 /* (set! char>? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9651,a[2]=((C_word)li322),tmp=(C_word)a,a+=3,tmp));
+t362=C_mutate((C_word*)lf[372]+1 /* (set! char<? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9663,a[2]=((C_word)li323),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_9675,a[2]=((C_word)li324),tmp=(C_word)a,a+=3,tmp));
+t364=C_mutate((C_word*)lf[374]+1 /* (set! char<=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9687,a[2]=((C_word)li325),tmp=(C_word)a,a+=3,tmp));
+t365=C_mutate((C_word*)lf[375]+1 /* (set! char-upcase ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9699,a[2]=((C_word)li326),tmp=(C_word)a,a+=3,tmp));
+t366=C_mutate((C_word*)lf[376]+1 /* (set! char-downcase ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9705,a[2]=((C_word)li327),tmp=(C_word)a,a+=3,tmp));
+t367=C_set_block_item(lf[377] /* char-ci=? */,0,C_SCHEME_UNDEFINED);
+t368=C_set_block_item(lf[378] /* char-ci>? */,0,C_SCHEME_UNDEFINED);
+t369=C_set_block_item(lf[379] /* char-ci<? */,0,C_SCHEME_UNDEFINED);
+t370=C_set_block_item(lf[380] /* char-ci>=? */,0,C_SCHEME_UNDEFINED);
+t371=C_set_block_item(lf[381] /* char-ci<=? */,0,C_SCHEME_UNDEFINED);
+t372=*((C_word*)lf[376]+1);
+t373=C_mutate((C_word*)lf[377]+1 /* (set! char-ci=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9716,a[2]=t372,a[3]=((C_word)li328),tmp=(C_word)a,a+=4,tmp));
+t374=C_mutate((C_word*)lf[378]+1 /* (set! char-ci>? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9730,a[2]=t372,a[3]=((C_word)li329),tmp=(C_word)a,a+=4,tmp));
+t375=C_mutate((C_word*)lf[379]+1 /* (set! char-ci<? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9744,a[2]=t372,a[3]=((C_word)li330),tmp=(C_word)a,a+=4,tmp));
+t376=C_mutate((C_word*)lf[380]+1 /* (set! char-ci>=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9758,a[2]=t372,a[3]=((C_word)li331),tmp=(C_word)a,a+=4,tmp));
+t377=C_mutate((C_word*)lf[381]+1 /* (set! char-ci<=? ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9772,a[2]=t372,a[3]=((C_word)li332),tmp=(C_word)a,a+=4,tmp));
+t378=C_mutate((C_word*)lf[382]+1 /* (set! char-upper-case? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9786,a[2]=((C_word)li333),tmp=(C_word)a,a+=3,tmp));
+t379=C_mutate((C_word*)lf[383]+1 /* (set! char-lower-case? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9792,a[2]=((C_word)li334),tmp=(C_word)a,a+=3,tmp));
+t380=C_mutate((C_word*)lf[384]+1 /* (set! char-numeric? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9798,a[2]=((C_word)li335),tmp=(C_word)a,a+=3,tmp));
+t381=C_mutate((C_word*)lf[385]+1 /* (set! char-whitespace? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9804,a[2]=((C_word)li336),tmp=(C_word)a,a+=3,tmp));
+t382=C_mutate((C_word*)lf[386]+1 /* (set! char-alphabetic? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9810,a[2]=((C_word)li337),tmp=(C_word)a,a+=3,tmp));
+t383=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9818,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1523 make-vector */
+t384=*((C_word*)lf[356]+1);
+((C_proc4)(void*)(*((C_word*)t384+1)))(4,t384,t383,C_fix(37),C_SCHEME_END_OF_LIST);}
+
+/* k9816 */
+static void C_ccall f_9818(C_word c,C_word t0,C_word 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_9818,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_9820,a[2]=t1,a[3]=((C_word)li339),tmp=(C_word)a,a+=4,tmp);
+t5=C_mutate((C_word*)lf[387]+1 /* (set! char-name ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9861,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=((C_word)li340),tmp=(C_word)a,a+=6,tmp));
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9980,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1561 char-name */
+t7=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,lf[1041],C_make_character(32));}
+
+/* k9978 in k9816 */
+static void C_ccall f_9980(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9980,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9983,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1562 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1040],C_make_character(9));}
+
+/* k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9986,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1563 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1039],C_make_character(10));}
+
+/* k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_9986(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9989,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1564 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[599],C_make_character(10));}
+
+/* k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_9989(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9989,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9992,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1565 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1038],C_make_character(11));}
+
+/* k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_9992(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9992,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9995,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1566 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1037],C_make_character(127));}
+
+/* k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_9995(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9995,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9998,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1567 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1036],C_make_character(27));}
+
+/* k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10001,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1568 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1035],C_make_character(7));}
+
+/* k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10001,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10004,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1569 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1034],C_make_character(0));}
+
+/* k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10004(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10004,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10007,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1570 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1033],C_make_character(13));}
+
+/* k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10007(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10007,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10010,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1571 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1032],C_make_character(12));}
+
+/* k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10010(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10010,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10013,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1572 char-name */
+t3=*((C_word*)lf[387]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,lf[1031],C_make_character(8));}
+
+/* k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10013(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10013,2,t0,t1);}
+t2=C_mutate((C_word*)lf[389]+1 /* (set! procedure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10015,a[2]=((C_word)li341),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[390]+1 /* (set! apply ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_apply,a[2]=((C_word)li342),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[391]+1 /* (set! call-with-current-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_cc,a[2]=((C_word)li343),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[392]+1 /* (set! call-with-direct-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10020,a[2]=((C_word)li344),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[393]+1 /* (set! call-with-cthulhu ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_with_cthulhu,a[2]=((C_word)li345),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[394]+1 /* (set! direct-return ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10027,a[2]=((C_word)li346),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[395]+1 /* (set! values ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_values,a[2]=((C_word)li347),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[396]+1 /* (set! call-with-values ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_call_with_values,a[2]=((C_word)li348),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[397]+1 /* (set! call-with-values ...) */,*((C_word*)lf[396]+1));
+t11=C_mutate((C_word*)lf[398]+1 /* (set! for-each ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10033,a[2]=((C_word)li350),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[400]+1 /* (set! map ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10071,a[2]=((C_word)li352),tmp=(C_word)a,a+=3,tmp));
+t13=C_set_block_item(lf[399] /* for-each */,0,C_SCHEME_UNDEFINED);
+t14=C_set_block_item(lf[401] /* 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_10116,a[2]=t18,a[3]=t20,a[4]=((C_word)li353),tmp=(C_word)a,a+=5,tmp));
+t22=C_set_block_item(t20,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10161,a[2]=((C_word)li355),tmp=(C_word)a,a+=3,tmp));
+t23=C_mutate((C_word*)lf[399]+1 /* (set! for-each ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10213,a[2]=t20,a[3]=t15,a[4]=t16,a[5]=t18,a[6]=((C_word)li358),tmp=(C_word)a,a+=7,tmp));
+t24=C_mutate((C_word*)lf[401]+1 /* (set! map ...) */,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10284,a[2]=t20,a[3]=t15,a[4]=t16,a[5]=t18,a[6]=((C_word)li361),tmp=(C_word)a,a+=7,tmp));
+t25=C_set_block_item(lf[403] /* dynamic-winds */,0,C_SCHEME_END_OF_LIST);
+t26=C_mutate((C_word*)lf[404]+1 /* (set! dynamic-wind ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10373,a[2]=((C_word)li363),tmp=(C_word)a,a+=3,tmp));
+t27=C_mutate((C_word*)lf[405]+1 /* (set! dynamic-wind ...) */,*((C_word*)lf[404]+1));
+t28=C_mutate((C_word*)lf[406]+1 /* (set! call-with-current-continuation ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10404,a[2]=((C_word)li366),tmp=(C_word)a,a+=3,tmp));
+t29=C_mutate((C_word*)lf[408]+1 /* (set! call/cc ...) */,*((C_word*)lf[406]+1));
+t30=C_mutate(&lf[407] /* (set! dynamic-unwind ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10444,a[2]=((C_word)li367),tmp=(C_word)a,a+=3,tmp));
+t31=C_mutate((C_word*)lf[409]+1 /* (set! continuation-capture ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10502,a[2]=((C_word)li368),tmp=(C_word)a,a+=3,tmp));
+t32=C_mutate((C_word*)lf[411]+1 /* (set! continuation? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10512,a[2]=((C_word)li369),tmp=(C_word)a,a+=3,tmp));
+t33=C_mutate((C_word*)lf[412]+1 /* (set! continuation-graft ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_continuation_graft,a[2]=((C_word)li370),tmp=(C_word)a,a+=3,tmp));
+t34=C_mutate((C_word*)lf[413]+1 /* (set! continuation-graft ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10519,a[2]=((C_word)li371),tmp=(C_word)a,a+=3,tmp));
+t35=*((C_word*)lf[413]+1);
+t36=C_mutate((C_word*)lf[414]+1 /* (set! continuation-return ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10552,a[2]=t35,a[3]=((C_word)li373),tmp=(C_word)a,a+=4,tmp));
+t37=C_mutate((C_word*)lf[415]+1 /* (set! port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10567,a[2]=((C_word)li374),tmp=(C_word)a,a+=3,tmp));
+t38=C_mutate((C_word*)lf[416]+1 /* (set! input-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10570,a[2]=((C_word)li375),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[417]+1 /* (set! output-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10587,a[2]=((C_word)li376),tmp=(C_word)a,a+=3,tmp));
+t40=C_mutate((C_word*)lf[418]+1 /* (set! make-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10608,a[2]=((C_word)li377),tmp=(C_word)a,a+=3,tmp));
+t41=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21974,a[2]=((C_word)li378),tmp=(C_word)a,a+=3,tmp);
+t42=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21977,a[2]=((C_word)li379),tmp=(C_word)a,a+=3,tmp);
+t43=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21980,a[2]=((C_word)li380),tmp=(C_word)a,a+=3,tmp);
+t44=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21983,a[2]=((C_word)li381),tmp=(C_word)a,a+=3,tmp);
+t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21986,a[2]=((C_word)li382),tmp=(C_word)a,a+=3,tmp);
+t46=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21992,a[2]=((C_word)li383),tmp=(C_word)a,a+=3,tmp);
+t47=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21995,a[2]=((C_word)li384),tmp=(C_word)a,a+=3,tmp);
+t48=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21998,a[2]=((C_word)li386),tmp=(C_word)a,a+=3,tmp);
+t49=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_22054,a[2]=((C_word)li388),tmp=(C_word)a,a+=3,tmp);
+t50=(C_word)C_a_i_vector(&a,9,t41,t42,t43,t44,t45,t46,t47,t48,t49);
+t51=C_mutate((C_word*)lf[421]+1 /* (set! stream-port-class ...) */,t50);
+t52=C_mutate((C_word*)lf[422]+1 /* (set! open-file-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_open_file_port,a[2]=((C_word)li389),tmp=(C_word)a,a+=3,tmp));
+t53=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10636,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1851 ##sys#make-port */
+t54=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t54+1)))(6,t54,t53,C_SCHEME_TRUE,*((C_word*)lf[421]+1),lf[1030],lf[458]);}
+
+/* k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10636(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_10636,2,t0,t1);}
+t2=C_mutate((C_word*)lf[423]+1 /* (set! standard-input ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10640,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1852 ##sys#make-port */
+t4=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,C_SCHEME_FALSE,*((C_word*)lf[421]+1),lf[1029],lf[458]);}
+
+/* k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10640(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_10640,2,t0,t1);}
+t2=C_mutate((C_word*)lf[424]+1 /* (set! standard-output ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10644,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1853 ##sys#make-port */
+t4=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t3,C_SCHEME_FALSE,*((C_word*)lf[421]+1),lf[1028],lf[458]);}
+
+/* k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10644(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_10644,2,t0,t1);}
+t2=C_mutate((C_word*)lf[425]+1 /* (set! standard-error ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10647,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1855 ##sys#open-file-port */
+t4=*((C_word*)lf[422]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,*((C_word*)lf[423]+1),C_fix(0),C_SCHEME_FALSE);}
+
+/* k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10647(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10647,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10650,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1856 ##sys#open-file-port */
+t3=*((C_word*)lf[422]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,*((C_word*)lf[424]+1),C_fix(1),C_SCHEME_FALSE);}
+
+/* k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10650(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10650,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10653,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1857 ##sys#open-file-port */
+t3=*((C_word*)lf[422]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,*((C_word*)lf[425]+1),C_fix(2),C_SCHEME_FALSE);}
+
+/* k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10653(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_10653,2,t0,t1);}
+t2=C_mutate((C_word*)lf[426]+1 /* (set! check-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10655,a[2]=((C_word)li390),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[428]+1 /* (set! check-port-mode ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10682,a[2]=((C_word)li391),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[431]+1 /* (set! check-port* ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10712,a[2]=((C_word)li392),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[434]+1 /* (set! current-input-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10727,a[2]=((C_word)li393),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[435]+1 /* (set! current-output-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10743,a[2]=((C_word)li394),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[436]+1 /* (set! current-error-port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10759,a[2]=((C_word)li395),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[437]+1 /* (set! tty-port? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10775,a[2]=((C_word)li396),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[439]+1 /* (set! port-data ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10792,a[2]=((C_word)li397),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[440]+1 /* (set! set-port-data! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10798,a[2]=((C_word)li398),tmp=(C_word)a,a+=3,tmp));
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10806,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)li795),tmp=(C_word)a,a+=3,tmp);
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21972,a[2]=t11,tmp=(C_word)a,a+=3,tmp);
+/* g21382139 */
+t14=t12;
+((C_proc2)C_retrieve_proc(t14))(2,t14,t13);}
+
+/* k21970 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21972(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1904 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10806(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_10806,2,t0,t1);}
+t2=(C_word)C_eqp(t1,lf[441]);
+t3=C_mutate((C_word*)lf[442]+1 /* (set! platform-fixup-pathname ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10810,a[2]=t2,a[3]=((C_word)li399),tmp=(C_word)a,a+=4,tmp));
+t4=C_mutate((C_word*)lf[443]+1 /* (set! pathname-resolution ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10844,a[2]=((C_word)li400),tmp=(C_word)a,a+=3,tmp));
+t5=*((C_word*)lf[36]+1);
+t6=C_mutate((C_word*)lf[444]+1 /* (set! expand-home-path ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10854,a[2]=t5,a[3]=((C_word)li402),tmp=(C_word)a,a+=4,tmp));
+t7=C_set_block_item(lf[449] /* open-input-file */,0,C_SCHEME_UNDEFINED);
+t8=C_set_block_item(lf[450] /* open-output-file */,0,C_SCHEME_UNDEFINED);
+t9=C_set_block_item(lf[451] /* close-input-port */,0,C_SCHEME_UNDEFINED);
+t10=C_set_block_item(lf[452] /* 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_10944,a[2]=((C_word)li405),tmp=(C_word)a,a+=3,tmp));
+t16=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11042,a[2]=((C_word)li406),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[449]+1 /* (set! open-input-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11067,a[2]=t12,a[3]=((C_word)li407),tmp=(C_word)a,a+=4,tmp));
+t18=C_mutate((C_word*)lf[450]+1 /* (set! open-output-file ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11073,a[2]=t12,a[3]=((C_word)li408),tmp=(C_word)a,a+=4,tmp));
+t19=C_mutate((C_word*)lf[451]+1 /* (set! close-input-port ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11079,a[2]=t14,a[3]=((C_word)li409),tmp=(C_word)a,a+=4,tmp));
+t20=C_mutate((C_word*)lf[452]+1 /* (set! close-output-port ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11085,a[2]=t14,a[3]=((C_word)li410),tmp=(C_word)a,a+=4,tmp));
+t21=*((C_word*)lf[449]+1);
+t22=*((C_word*)lf[451]+1);
+t23=C_mutate((C_word*)lf[468]+1 /* (set! call-with-input-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11091,a[2]=t21,a[3]=t22,a[4]=((C_word)li413),tmp=(C_word)a,a+=5,tmp));
+t24=*((C_word*)lf[450]+1);
+t25=*((C_word*)lf[452]+1);
+t26=C_mutate((C_word*)lf[469]+1 /* (set! call-with-output-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11115,a[2]=t24,a[3]=t25,a[4]=((C_word)li416),tmp=(C_word)a,a+=5,tmp));
+t27=*((C_word*)lf[449]+1);
+t28=*((C_word*)lf[451]+1);
+t29=C_mutate((C_word*)lf[470]+1 /* (set! with-input-from-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11139,a[2]=t27,a[3]=t28,a[4]=((C_word)li418),tmp=(C_word)a,a+=5,tmp));
+t30=*((C_word*)lf[450]+1);
+t31=*((C_word*)lf[452]+1);
+t32=C_mutate((C_word*)lf[471]+1 /* (set! with-output-to-file ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11159,a[2]=t30,a[3]=t31,a[4]=((C_word)li420),tmp=(C_word)a,a+=5,tmp));
+t33=C_mutate((C_word*)lf[472]+1 /* (set! file-exists? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11179,a[2]=((C_word)li422),tmp=(C_word)a,a+=3,tmp));
+t34=C_mutate((C_word*)lf[474]+1 /* (set! directory-exists? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11201,a[2]=((C_word)li424),tmp=(C_word)a,a+=3,tmp));
+t35=C_mutate((C_word*)lf[475]+1 /* (set! flush-output ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11230,a[2]=((C_word)li425),tmp=(C_word)a,a+=3,tmp));
+t36=C_mutate((C_word*)lf[476]+1 /* (set! flush-output ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11243,a[2]=((C_word)li426),tmp=(C_word)a,a+=3,tmp));
+t37=C_mutate((C_word*)lf[477]+1 /* (set! port-name ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11277,a[2]=((C_word)li427),tmp=(C_word)a,a+=3,tmp));
+t38=C_mutate((C_word*)lf[478]+1 /* (set! set-port-name! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11308,a[2]=((C_word)li428),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[479]+1 /* (set! port-line ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11320,a[2]=((C_word)li429),tmp=(C_word)a,a+=3,tmp));
+t40=C_mutate((C_word*)lf[480]+1 /* (set! port-position ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11332,a[2]=((C_word)li430),tmp=(C_word)a,a+=3,tmp));
+t41=C_mutate((C_word*)lf[482]+1 /* (set! delete-file ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11380,a[2]=((C_word)li432),tmp=(C_word)a,a+=3,tmp));
+t42=C_mutate((C_word*)lf[485]+1 /* (set! rename-file ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11417,a[2]=((C_word)li435),tmp=(C_word)a,a+=3,tmp));
+t43=C_SCHEME_UNDEFINED;
+t44=(C_word)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[488] /* (set! default-parameter-vector ...) */,t44);
+t46=C_mutate((C_word*)lf[489]+1 /* (set! current-parameter-vector ...) */,lf[490]);
+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[491]+1 /* (set! make-parameter ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11472,a[2]=t48,a[3]=((C_word)li438),tmp=(C_word)a,a+=4,tmp));
+t50=C_mutate((C_word*)lf[492]+1 /* (set! eof-object? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11571,a[2]=((C_word)li439),tmp=(C_word)a,a+=3,tmp));
+t51=C_mutate((C_word*)lf[493]+1 /* (set! char-ready? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11574,a[2]=((C_word)li440),tmp=(C_word)a,a+=3,tmp));
+t52=C_mutate((C_word*)lf[494]+1 /* (set! read-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11615,a[2]=((C_word)li441),tmp=(C_word)a,a+=3,tmp));
+t53=C_mutate((C_word*)lf[496]+1 /* (set! read-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11643,a[2]=((C_word)li442),tmp=(C_word)a,a+=3,tmp));
+t54=C_mutate((C_word*)lf[495]+1 /* (set! read-char/port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11702,a[2]=((C_word)li443),tmp=(C_word)a,a+=3,tmp));
+t55=C_mutate((C_word*)lf[497]+1 /* (set! peek-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11714,a[2]=((C_word)li444),tmp=(C_word)a,a+=3,tmp));
+t56=C_mutate((C_word*)lf[498]+1 /* (set! peek-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11739,a[2]=((C_word)li445),tmp=(C_word)a,a+=3,tmp));
+t57=C_mutate((C_word*)lf[499]+1 /* (set! read ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11773,a[2]=((C_word)li446),tmp=(C_word)a,a+=3,tmp));
+t58=C_set_block_item(lf[501] /* default-read-info-hook */,0,C_SCHEME_FALSE);
+t59=C_set_block_item(lf[502] /* read-error-with-line-number */,0,C_SCHEME_FALSE);
+t60=C_set_block_item(lf[503] /* enable-qualifiers */,0,C_SCHEME_TRUE);
+t61=C_mutate((C_word*)lf[504]+1 /* (set! read-prompt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11810,a[2]=((C_word)li447),tmp=(C_word)a,a+=3,tmp));
+t62=C_mutate((C_word*)lf[505]+1 /* (set! infix-list-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11813,a[2]=((C_word)li448),tmp=(C_word)a,a+=3,tmp));
+t63=C_mutate((C_word*)lf[506]+1 /* (set! sharp-number-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11816,a[2]=((C_word)li449),tmp=(C_word)a,a+=3,tmp));
+t64=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11824,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2199 make-parameter */
+t65=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t65+1)))(3,t65,t64,C_SCHEME_TRUE);}
+
+/* k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11824(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_11824,2,t0,t1);}
+t2=C_mutate((C_word*)lf[509]+1 /* (set! case-sensitive ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11828,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2200 make-parameter */
+t4=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,lf[561]);}
+
+/* k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11828(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_11828,2,t0,t1);}
+t2=C_mutate((C_word*)lf[510]+1 /* (set! keyword-style ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11832,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2201 make-parameter */
+t4=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_TRUE);}
+
+/* k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11832,2,t0,t1);}
+t2=C_mutate((C_word*)lf[511]+1 /* (set! parentheses-synonyms ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11836,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2202 make-parameter */
+t4=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_TRUE);}
+
+/* k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11836(C_word c,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_11836,2,t0,t1);}
+t2=C_mutate((C_word*)lf[512]+1 /* (set! symbol-escape ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11840,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_a_i_record(&a,4,lf[595],C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);
+/* library.scm: 2204 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11840(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11840,2,t0,t1);}
+t2=C_mutate((C_word*)lf[513]+1 /* (set! current-read-table ...) */,t1);
+t3=*((C_word*)lf[172]+1);
+t4=C_mutate((C_word*)lf[514]+1 /* (set! read-warning ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11842,a[2]=t3,a[3]=((C_word)li450),tmp=(C_word)a,a+=4,tmp));
+t5=*((C_word*)lf[172]+1);
+t6=C_mutate((C_word*)lf[507]+1 /* (set! read-error ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11865,a[2]=t5,a[3]=((C_word)li451),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[387]+1);
+t12=*((C_word*)lf[509]+1);
+t13=*((C_word*)lf[510]+1);
+t14=*((C_word*)lf[511]+1);
+t15=*((C_word*)lf[512]+1);
+t16=*((C_word*)lf[513]+1);
+t17=(C_word)C_a_i_string(&a,1,C_make_character(0));
+t18=C_mutate((C_word*)lf[500]+1 /* (set! read ...) */,(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_11891,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)li492),tmp=(C_word)a,a+=13,tmp));
+t19=C_mutate((C_word*)lf[524]+1 /* (set! char->utf8-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14284,a[2]=((C_word)li493),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate((C_word*)lf[531]+1 /* (set! unicode-surrogate? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14449,a[2]=((C_word)li494),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate((C_word*)lf[528]+1 /* (set! surrogates->codepoint ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14461,a[2]=((C_word)li495),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[587]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14523,a[2]=((C_word)li496),tmp=(C_word)a,a+=3,tmp));
+t23=lf[585] /* read-marks */ =C_SCHEME_END_OF_LIST;;
+t24=C_mutate((C_word*)lf[590]+1 /* (set! set-read-mark! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14560,a[2]=((C_word)li497),tmp=(C_word)a,a+=3,tmp));
+t25=C_set_block_item(lf[591] /* set-read-syntax! */,0,C_SCHEME_UNDEFINED);
+t26=C_set_block_item(lf[592] /* set-sharp-read-syntax! */,0,C_SCHEME_UNDEFINED);
+t27=C_set_block_item(lf[593] /* set-parameterized-read-syntax! */,0,C_SCHEME_UNDEFINED);
+t28=*((C_word*)lf[513]+1);
+t29=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14583,a[2]=t28,a[3]=((C_word)li499),tmp=(C_word)a,a+=4,tmp);
+t30=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14635,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_21951,a[2]=((C_word)li794),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2792 syntax-setter */
+t32=t29;
+f_14583(t32,t30,lf[591],C_fix(1),t31);}
+
+/* a21950 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21951(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_21951,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_21953,a[2]=t2,a[3]=((C_word)li793),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_21953 in a21950 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21953(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_21953,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21957,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2796 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k21955 */
+static void C_ccall f_21957(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2797 proc */
+t2=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14635(C_word c,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_14635,2,t0,t1);}
+t2=C_mutate((C_word*)lf[591]+1 /* (set! set-read-syntax! ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14639,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_21940,a[2]=((C_word)li792),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2800 syntax-setter */
+t5=((C_word*)t0)[2];
+f_14583(t5,t3,lf[592],C_fix(2),t4);}
+
+/* a21939 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21940(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_21940,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_21942,a[2]=t2,a[3]=((C_word)li791),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_21942 in a21939 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21942(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_21942,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21946,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2804 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k21944 */
+static void C_ccall f_21946(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2805 proc */
+t2=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14639(C_word c,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_14639,2,t0,t1);}
+t2=C_mutate((C_word*)lf[592]+1 /* (set! set-sharp-read-syntax! ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14643,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21929,a[2]=((C_word)li790),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2808 syntax-setter */
+t5=((C_word*)t0)[2];
+f_14583(t5,t3,lf[593],C_fix(3),t4);}
+
+/* a21928 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21929(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_21929,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_21931,a[2]=t2,a[3]=((C_word)li789),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_21931 in a21928 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21931(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_21931,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21935,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2812 ##sys#read-char-0 */
+t6=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
+
+/* k21933 */
+static void C_ccall f_21935(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2813 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]);}
+
+/* k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14643(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_14643,2,t0,t1);}
+t2=C_mutate((C_word*)lf[593]+1 /* (set! set-parameterized-read-syntax! ...) */,t1);
+t3=C_mutate((C_word*)lf[594]+1 /* (set! copy-read-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14645,a[2]=((C_word)li500),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[596]+1 /* (set! write-char-0 ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14696,a[2]=((C_word)li501),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[597]+1 /* (set! write-char/port ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14709,a[2]=((C_word)li502),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[598]+1 /* (set! write-char ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14721,a[2]=((C_word)li503),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[599]+1 /* (set! newline ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14758,a[2]=((C_word)li504),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[600]+1 /* (set! write ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14786,a[2]=((C_word)li505),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[602]+1 /* (set! display ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14817,a[2]=((C_word)li506),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[603]+1 /* (set! print ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14848,a[2]=((C_word)li508),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[604]+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));
+t12=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14896,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2870 make-parameter */
+t13=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t13+1)))(3,t13,t12,C_fix(0));}
+
+/* k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14896(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_14896,2,t0,t1);}
+t2=C_mutate(&lf[605] /* (set! current-print-length ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14900,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2871 make-parameter */
+t4=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
+
+/* k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14900(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_14900,2,t0,t1);}
+t2=C_mutate(&lf[606] /* (set! print-length-limit ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14904,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2872 make-parameter */
+t4=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,C_SCHEME_FALSE);}
+
+/* k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_14904,2,t0,t1);}
+t2=C_mutate(&lf[607] /* (set! print-exit ...) */,t1);
+t3=*((C_word*)lf[387]+1);
+t4=*((C_word*)lf[509]+1);
+t5=*((C_word*)lf[510]+1);
+t6=lf[605];
+t7=*((C_word*)lf[172]+1);
+t8=C_mutate((C_word*)lf[601]+1 /* (set! print ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14906,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=((C_word)li523),tmp=(C_word)a,a+=6,tmp));
+t9=*((C_word*)lf[172]+1);
+t10=C_mutate((C_word*)lf[632]+1 /* (set! procedure->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15852,a[2]=t9,a[3]=((C_word)li524),tmp=(C_word)a,a+=4,tmp));
+t11=C_set_block_item(lf[647] /* record-printers */,0,C_SCHEME_END_OF_LIST);
+t12=C_mutate((C_word*)lf[648]+1 /* (set! register-record-printer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15869,a[2]=((C_word)li525),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[631]+1 /* (set! user-print-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15889,a[2]=((C_word)li526),tmp=(C_word)a,a+=3,tmp));
+t14=*((C_word*)lf[406]+1);
+t15=C_mutate((C_word*)lf[654]+1 /* (set! with-print-length-limit ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15952,a[2]=t14,a[3]=((C_word)li530),tmp=(C_word)a,a+=4,tmp));
+t16=C_mutate((C_word*)lf[655]+1 /* (set! bitwise-and ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15993,a[2]=((C_word)li532),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[656]+1 /* (set! bitwise-ior ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16020,a[2]=((C_word)li534),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[657]+1 /* (set! bitwise-xor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16047,a[2]=((C_word)li536),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate((C_word*)lf[658]+1 /* (set! bitwise-not ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16074,a[2]=((C_word)li537),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate((C_word*)lf[659]+1 /* (set! arithmetic-shift ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16077,a[2]=((C_word)li538),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate((C_word*)lf[660]+1 /* (set! bit-set? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16080,a[2]=((C_word)li539),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_16084,a[2]=t23,a[3]=((C_word)li540),tmp=(C_word)a,a+=4,tmp));
+t25=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21712,a[2]=((C_word)li541),tmp=(C_word)a,a+=3,tmp);
+t26=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21737,a[2]=((C_word)li542),tmp=(C_word)a,a+=3,tmp);
+t27=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21755,a[2]=t23,a[3]=((C_word)li543),tmp=(C_word)a,a+=4,tmp);
+t28=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21774,a[2]=t23,a[3]=((C_word)li544),tmp=(C_word)a,a+=4,tmp);
+t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21793,a[2]=((C_word)li545),tmp=(C_word)a,a+=3,tmp);
+t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21803,a[2]=((C_word)li546),tmp=(C_word)a,a+=3,tmp);
+t31=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21806,a[2]=((C_word)li547),tmp=(C_word)a,a+=3,tmp);
+t32=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21820,a[2]=((C_word)li548),tmp=(C_word)a,a+=3,tmp);
+t33=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21861,a[2]=((C_word)li550),tmp=(C_word)a,a+=3,tmp);
+t34=(C_word)C_a_i_vector(&a,9,t25,t26,t27,t28,t29,t30,t31,t32,t33);
+t35=C_mutate((C_word*)lf[664]+1 /* (set! string-port-class ...) */,t34);
+t36=C_mutate((C_word*)lf[663]+1 /* (set! scan-buffer-line ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16139,a[2]=((C_word)li552),tmp=(C_word)a,a+=3,tmp));
+t37=C_mutate((C_word*)lf[665]+1 /* (set! open-input-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16211,a[2]=((C_word)li553),tmp=(C_word)a,a+=3,tmp));
+t38=C_mutate((C_word*)lf[667]+1 /* (set! open-output-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16229,a[2]=((C_word)li554),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[669]+1 /* (set! get-output-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16248,a[2]=((C_word)li555),tmp=(C_word)a,a+=3,tmp));
+t40=*((C_word*)lf[669]+1);
+t41=*((C_word*)lf[667]+1);
+t42=C_mutate((C_word*)lf[671]+1 /* (set! print-to-string ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16285,a[2]=t41,a[3]=t40,a[4]=((C_word)li558),tmp=(C_word)a,a+=5,tmp));
+t43=*((C_word*)lf[172]+1);
+t44=C_mutate((C_word*)lf[625]+1 /* (set! pointer->string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16325,a[2]=t43,a[3]=((C_word)li559),tmp=(C_word)a,a+=4,tmp));
+t45=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16390,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)li788),tmp=(C_word)a,a+=3,tmp);
+t47=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21710,a[2]=t45,tmp=(C_word)a,a+=3,tmp);
+/* g38173818 */
+t48=t46;
+((C_proc2)C_retrieve_proc(t48))(2,t48,t47);}
+
+/* k21708 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21710(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3326 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16390(C_word c,C_word t0,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_16390,2,t0,t1);}
+t2=C_mutate((C_word*)lf[680]+1 /* (set! software-type ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16391,a[2]=t1,a[3]=((C_word)li560),tmp=(C_word)a,a+=4,tmp));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16396,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)li787),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21706,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* g38203821 */
+t6=t4;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k21704 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21706(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3330 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16396(C_word c,C_word t0,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_16396,2,t0,t1);}
+t2=C_mutate((C_word*)lf[681]+1 /* (set! machine-type ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16397,a[2]=t1,a[3]=((C_word)li561),tmp=(C_word)a,a+=4,tmp));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16402,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)li786),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21702,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* g38233824 */
+t6=t4;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k21700 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21702(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3334 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16402(C_word c,C_word t0,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_16402,2,t0,t1);}
+t2=C_mutate((C_word*)lf[682]+1 /* (set! machine-byte-order ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16403,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_16408,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)li785),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21698,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* g38263827 */
+t6=t4;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k21696 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21698(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3338 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16408(C_word c,C_word t0,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_16408,2,t0,t1);}
+t2=C_mutate((C_word*)lf[683]+1 /* (set! software-version ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16409,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_16414,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)li784),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21694,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* g38293830 */
+t6=t4;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k21692 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21694(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3342 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16414(C_word c,C_word t0,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_16414,2,t0,t1);}
+t2=C_mutate((C_word*)lf[684]+1 /* (set! build-platform ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16415,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_16420,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)li783),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21690,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* g38323833 */
+t6=t4;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k21688 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21690(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3346 string->symbol */
+t2=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16420(C_word c,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_16420,2,t0,t1);}
+t2=C_mutate((C_word*)lf[685]+1 /* (set! c-runtime ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16421,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_16426,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21686,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3350 software-type */
+t5=*((C_word*)lf[680]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k21684 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21686(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_21686,2,t0,t1);}
+t2=(C_word)C_eqp(lf[1026],t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21682,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3352 build-platform */
+t4=*((C_word*)lf[684]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=((C_word*)t0)[2];
+f_16426(t3,C_SCHEME_FALSE);}}
+
+/* k21680 in k21684 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21682(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(lf[1027],t1);
+t3=((C_word*)t0)[2];
+f_16426(t3,(C_word)C_i_not(t2));}
+
+/* k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16426(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_16426,NULL,2,t0,t1);}
+t2=C_mutate((C_word*)lf[686]+1 /* (set! windows-platform ...) */,t1);
+t3=C_mutate((C_word*)lf[687]+1 /* (set! chicken-version ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16428,a[2]=((C_word)li567),tmp=(C_word)a,a+=3,tmp));
+t4=C_set_block_item(lf[711] /* pathname-directory-separator */,0,C_make_character(47));
+t5=*((C_word*)lf[338]+1);
+t6=*((C_word*)lf[337]+1);
+t7=C_mutate((C_word*)lf[712]+1 /* (set! ->feature-id ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16602,a[2]=t6,a[3]=t5,a[4]=((C_word)li568),tmp=(C_word)a,a+=5,tmp));
+t8=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,lf[715]);
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16636,a[2]=((C_word)li569),tmp=(C_word)a,a+=3,tmp);
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16654,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_21668,a[2]=t10,a[3]=t9,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3414 software-type */
+t12=*((C_word*)lf[680]+1);
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,t11);}
+
+/* k21666 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21668(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3414 check */
+f_16636(((C_word*)t0)[2],t1);}
+
+/* k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16654(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_16654,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16657,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_21664,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3415 software-version */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[683]+1)))(2,*((C_word*)lf[683]+1),t3);}
+
+/* k21662 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21664(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3415 check */
+f_16636(((C_word*)t0)[2],t1);}
+
+/* k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16657(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_16657,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16660,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_21660,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3416 build-platform */
+t4=*((C_word*)lf[684]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k21658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21660(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3416 check */
+f_16636(((C_word*)t0)[2],t1);}
+
+/* k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16660(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_16660,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16663,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_21656,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3417 machine-type */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[681]+1)))(2,*((C_word*)lf[681]+1),t3);}
+
+/* k21654 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21656(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3417 check */
+f_16636(((C_word*)t0)[2],t1);}
+
+/* k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16663(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_16663,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16666,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21652,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3418 machine-byte-order */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[682]+1)))(2,*((C_word*)lf[682]+1),t3);}
+
+/* k21650 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21652(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3418 check */
+f_16636(((C_word*)t0)[2],t1);}
+
+/* k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16666(C_word c,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_16666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16669,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fudge(C_fix(40)))){
+t3=(C_word)C_a_i_cons(&a,2,lf[1025],*((C_word*)lf[714]+1));
+t4=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t3);
+t5=t2;
+f_16669(t5,t4);}
+else{
+t3=t2;
+f_16669(t3,C_SCHEME_UNDEFINED);}}
+
+/* k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16669(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_16669,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16672,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fudge(C_fix(24)))){
+t3=(C_word)C_a_i_cons(&a,2,lf[1024],*((C_word*)lf[714]+1));
+t4=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t3);
+t5=t2;
+f_16672(t5,t4);}
+else{
+t3=t2;
+f_16672(t3,C_SCHEME_UNDEFINED);}}
+
+/* k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16672(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_16672,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16675,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fudge(C_fix(28)))){
+t3=(C_word)C_a_i_cons(&a,2,lf[1023],*((C_word*)lf[714]+1));
+t4=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t3);
+t5=t2;
+f_16675(t5,t4);}
+else{
+t3=t2;
+f_16675(t3,C_SCHEME_UNDEFINED);}}
+
+/* k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16675(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_16675,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16678,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fudge(C_fix(39)))){
+t3=(C_word)C_a_i_cons(&a,2,lf[1022],*((C_word*)lf[714]+1));
+t4=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t3);
+t5=t2;
+f_16678(t5,t4);}
+else{
+t3=t2;
+f_16678(t3,C_SCHEME_UNDEFINED);}}
+
+/* k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16678(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_16678,NULL,2,t0,t1);}
+t2=C_mutate((C_word*)lf[716]+1 /* (set! register-feature! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16680,a[2]=((C_word)li571),tmp=(C_word)a,a+=3,tmp));
+t3=C_mutate((C_word*)lf[717]+1 /* (set! unregister-feature! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16724,a[2]=((C_word)li574),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[718]+1 /* (set! features ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16800,a[2]=((C_word)li575),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[719]+1 /* (set! feature? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16803,a[2]=((C_word)li577),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[720]+1 /* (set! feature? ...) */,*((C_word*)lf[719]+1));
+t7=C_mutate((C_word*)lf[721]+1 /* (set! get-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16845,a[2]=((C_word)li582),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[724]+1 /* (set! really-print-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17001,a[2]=((C_word)li586),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[729]+1 /* (set! print-call-chain ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17090,a[2]=((C_word)li592),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[731]+1 /* (set! get-call-chain ...) */,*((C_word*)lf[721]+1));
+t11=C_mutate((C_word*)lf[732]+1 /* (set! user-interrupt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17204,a[2]=((C_word)li594),tmp=(C_word)a,a+=3,tmp));
+t12=(C_word)C_fudge(C_fix(25));
+t13=C_mutate((C_word*)lf[735]+1 /* (set! break-on-error ...) */,t12);
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17231,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t15=*((C_word*)lf[172]+1);
+t16=*((C_word*)lf[667]+1);
+t17=*((C_word*)lf[669]+1);
+t18=*((C_word*)lf[729]+1);
+t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21470,a[2]=t16,a[3]=t17,a[4]=t18,a[5]=((C_word)li782),tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3527 make-parameter */
+t20=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t20+1)))(3,t20,t14,t19);}
+
+/* a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21470(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_21470r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_21470r(t0,t1,t2,t3);}}
+
+static void C_ccall f_21470r(C_word 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_21474,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_21619,a[2]=((C_word)li781),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3533 ##sys#error-handler */
+t6=*((C_word*)lf[736]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* a21618 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21619(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_21619,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_halt(lf[1021]));}
+
+/* k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21474(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_21474,2,t0,t1);}
+if(C_truep((C_word)C_fudge(C_fix(4)))){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21483,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: 3535 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[1020],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21570,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: 3556 open-output-string */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}}
+
+/* k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21570(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_21570,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21573,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: 3557 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,t1);}
+else{
+t3=t2;
+f_21573(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21573(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_21573,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21576,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: 3558 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,((C_word*)t0)[3]);}
+
+/* k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21576(C_word c,C_word t0,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_21576,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21579,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_21585,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li780),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_21585(t6,t2,((C_word*)t0)[2]);}
+
+/* loop4158 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21585(C_word t0,C_word 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_21585,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_21593,a[2]=((C_word*)t0)[3],a[3]=((C_word)li779),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21603,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));
+/* g41654166 */
+t6=t3;
+f_21593(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k21601 in loop4158 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21603(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_21585(t3,((C_word*)t0)[2],t2);}
+
+/* g4165 in loop4158 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21593(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_21593,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21597,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3559 ##sys#print */
+t4=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,t2,C_SCHEME_TRUE,((C_word*)t0)[2]);}
+
+/* k21595 in g4165 in loop4158 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21597(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3559 ##sys#print */
+t2=*((C_word*)lf[601]+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]);}
+
+/* k21577 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21579(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_21579,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21583,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3560 get-output-string */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k21581 in k21577 in k21574 in k21571 in k21568 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21583(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_halt(t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21483(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_21483,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21486,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_21564,a[2]=((C_word*)t0)[2],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3537 ##sys#print */
+t4=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,lf[1019],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+else{
+t3=t2;
+f_21486(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k21562 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21564(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3538 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+
+/* k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_21486,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21489,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_length(((C_word*)t0)[2]);
+t4=(C_word)C_eqp(C_fix(1),t3);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21516,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3540 ##sys#print */
+t6=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[1018],C_SCHEME_FALSE,*((C_word*)lf[425]+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_21528,a[2]=t6,a[3]=((C_word)li778),tmp=(C_word)a,a+=4,tmp));
+t8=((C_word*)t6)[1];
+f_21528(t8,t2,((C_word*)t0)[2]);}}
+
+/* loop4128 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21528(C_word t0,C_word 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_21528,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_21546,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_21540,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3545 ##sys#print */
+t6=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k21538 in loop4128 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21540(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3546 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,*((C_word*)lf[425]+1));}
+
+/* k21544 in loop4128 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21546(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_21528(t3,((C_word*)t0)[2],t2);}
+
+/* k21514 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21516(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)[3],C_fix(0));
+/* library.scm: 3541 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[2],t2,C_SCHEME_TRUE,*((C_word*)lf[425]+1));}
+
+/* k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21489(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_21489,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21492,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3548 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+
+/* k21490 in k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21492(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_21492,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21495,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3549 print-call-chain */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,*((C_word*)lf[425]+1));}
+
+/* k21493 in k21490 in k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21495(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_21495,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21501,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep(*((C_word*)lf[735]+1))){
+/* library.scm: 3550 ##sys#symbol-has-toplevel-binding? */
+t3=*((C_word*)lf[882]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,lf[1017]);}
+else{
+t3=t2;
+f_21501(2,t3,C_SCHEME_FALSE);}}
+
+/* k21499 in k21493 in k21490 in k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21501(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_21501,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21504,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3551 repl */
+t3=*((C_word*)lf[1017]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+t2=(C_word)C_halt(C_SCHEME_FALSE);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k21502 in k21499 in k21493 in k21490 in k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21504(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_21504,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21507,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3552 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,C_make_character(10),C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+
+/* k21505 in k21502 in k21499 in k21493 in k21490 in k21487 in k21484 in k21481 in k21472 in a21469 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21507(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_exit_runtime(C_fix((C_word)EX_SOFTWARE));
+t3=(C_word)C_halt(C_SCHEME_FALSE);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17231,2,t0,t1);}
+t2=C_mutate((C_word*)lf[736]+1 /* (set! error-handler ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17235,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: 3563 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a21460 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21461(C_word 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_21461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21465,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3565 ##sys#exit-handler */
+t3=*((C_word*)lf[5]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k21463 in a21460 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21465(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g41754176 */
+t2=t1;
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_fix((C_word)EX_SOFTWARE));}
+
+/* k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17235(C_word c,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_17235,2,t0,t1);}
+t2=C_mutate((C_word*)lf[737]+1 /* (set! reset-handler ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17239,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21442,a[2]=((C_word)li776),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3568 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a21441 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21442(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*)tr2rv,(void*)f_21442r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_21442r(t0,t1,t2);}}
+
+static void C_ccall f_21442r(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_21446,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3570 ##sys#cleanup-before-exit */
+t4=*((C_word*)lf[742]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k21444 in a21441 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21446(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_vemptyp(((C_word*)t0)[3]))){
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_exit_runtime(C_fix(0)));}
+else{
+t2=(C_word)C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
+t3=(C_word)C_i_check_exact(t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_exit_runtime(t2));}}
+
+/* k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17239(C_word c,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_17239,2,t0,t1);}
+t2=C_mutate((C_word*)lf[738]+1 /* (set! exit-handler ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17243,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21436,a[2]=((C_word)li775),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3580 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a21435 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21436(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_21436,2,t0,t1);}
+/* library.scm: 3582 ##sys#cleanup-before-exit */
+t2=*((C_word*)lf[742]+1);
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,t1);}
+
+/* k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17243(C_word c,C_word t0,C_word 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_17243,2,t0,t1);}
+t2=C_mutate((C_word*)lf[739]+1 /* (set! implicit-exit-handler ...) */,t1);
+t3=C_mutate((C_word*)lf[5]+1 /* (set! exit-handler ...) */,*((C_word*)lf[738]+1));
+t4=C_mutate((C_word*)lf[7]+1 /* (set! reset-handler ...) */,*((C_word*)lf[737]+1));
+t5=C_mutate((C_word*)lf[740]+1 /* (set! implicit-exit-handler ...) */,*((C_word*)lf[739]+1));
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17250,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3588 make-parameter */
+t7=*((C_word*)lf[491]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,C_SCHEME_TRUE);}
+
+/* k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17250(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_17250,2,t0,t1);}
+t2=C_mutate((C_word*)lf[741]+1 /* (set! force-finalizers ...) */,t1);
+t3=*((C_word*)lf[741]+1);
+t4=C_mutate((C_word*)lf[742]+1 /* (set! cleanup-before-exit ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17252,a[2]=t3,a[3]=((C_word)li595),tmp=(C_word)a,a+=4,tmp));
+t5=C_mutate((C_word*)lf[745]+1 /* (set! on-exit ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17273,a[2]=((C_word)li597),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_17285,a[2]=((C_word)li599),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[747]+1 /* (set! abort ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17508,a[2]=((C_word)li600),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[781]+1 /* (set! signal ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17525,a[2]=((C_word)li601),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[782]+1 /* (set! abort ...) */,*((C_word*)lf[747]+1));
+t10=C_mutate((C_word*)lf[783]+1 /* (set! signal ...) */,*((C_word*)lf[781]+1));
+t11=C_set_block_item(lf[784] /* last-exception */,0,C_SCHEME_FALSE);
+t12=*((C_word*)lf[172]+1);
+t13=C_mutate((C_word*)lf[780]+1 /* (set! current-exception-handler ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17534,a[2]=t12,a[3]=((C_word)li602),tmp=(C_word)a,a+=4,tmp));
+t14=C_mutate((C_word*)lf[804]+1 /* (set! with-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17694,a[2]=((C_word)li605),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate((C_word*)lf[805]+1 /* (set! current-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17708,a[2]=((C_word)li606),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[806]+1 /* (set! make-property-condition ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17711,a[2]=((C_word)li608),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[807]+1 /* (set! make-composite-condition ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17761,a[2]=((C_word)li612),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[809]+1 /* (set! condition? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17897,a[2]=((C_word)li613),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate((C_word*)lf[810]+1 /* (set! condition-predicate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17903,a[2]=((C_word)li615),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate((C_word*)lf[811]+1 /* (set! condition-property-accessor ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17921,a[2]=((C_word)li617),tmp=(C_word)a,a+=3,tmp));
+t21=*((C_word*)lf[811]+1);
+t22=C_mutate((C_word*)lf[813]+1 /* (set! get-condition-property ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17967,a[2]=t21,a[3]=((C_word)li618),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_17976,a[2]=t23,a[3]=((C_word)li619),tmp=(C_word)a,a+=4,tmp));
+t25=C_mutate((C_word*)lf[853]+1 /* (set! structure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18362,a[2]=((C_word)li620),tmp=(C_word)a,a+=3,tmp));
+t26=C_mutate((C_word*)lf[854]+1 /* (set! generic-structure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18365,a[2]=((C_word)li621),tmp=(C_word)a,a+=3,tmp));
+t27=C_mutate((C_word*)lf[855]+1 /* (set! slot ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18368,a[2]=((C_word)li622),tmp=(C_word)a,a+=3,tmp));
+t28=C_mutate((C_word*)lf[856]+1 /* (set! size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18371,a[2]=((C_word)li623),tmp=(C_word)a,a+=3,tmp));
+t29=C_mutate((C_word*)lf[857]+1 /* (set! make-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_pointer,a[2]=((C_word)li624),tmp=(C_word)a,a+=3,tmp));
+t30=C_mutate((C_word*)lf[858]+1 /* (set! make-tagged-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_make_tagged_pointer,a[2]=((C_word)li625),tmp=(C_word)a,a+=3,tmp));
+t31=C_mutate((C_word*)lf[859]+1 /* (set! pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18376,a[2]=((C_word)li626),tmp=(C_word)a,a+=3,tmp));
+t32=C_mutate((C_word*)lf[860]+1 /* (set! set-pointer-address! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18379,a[2]=((C_word)li627),tmp=(C_word)a,a+=3,tmp));
+t33=C_mutate((C_word*)lf[861]+1 /* (set! bytevector? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18382,a[2]=((C_word)li628),tmp=(C_word)a,a+=3,tmp));
+t34=C_mutate((C_word*)lf[862]+1 /* (set! string->pbytevector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18385,a[2]=((C_word)li629),tmp=(C_word)a,a+=3,tmp));
+t35=C_mutate((C_word*)lf[863]+1 /* (set! permanent? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18388,a[2]=((C_word)li630),tmp=(C_word)a,a+=3,tmp));
+t36=C_mutate((C_word*)lf[864]+1 /* (set! block-address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18391,a[2]=((C_word)li631),tmp=(C_word)a,a+=3,tmp));
+t37=C_mutate((C_word*)lf[865]+1 /* (set! locative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18394,a[2]=((C_word)li632),tmp=(C_word)a,a+=3,tmp));
+t38=C_mutate((C_word*)lf[866]+1 /* (set! null-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18397,a[2]=((C_word)li633),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[867]+1 /* (set! null-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18403,a[2]=((C_word)li634),tmp=(C_word)a,a+=3,tmp));
+t40=C_mutate((C_word*)lf[868]+1 /* (set! address->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18413,a[2]=((C_word)li635),tmp=(C_word)a,a+=3,tmp));
+t41=C_mutate((C_word*)lf[675]+1 /* (set! pointer->address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18419,a[2]=((C_word)li636),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_18426,a[2]=((C_word)li637),tmp=(C_word)a,a+=3,tmp));
+t43=C_mutate((C_word*)lf[869]+1 /* (set! peek-signed-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_peek_signed_integer,a[2]=((C_word)li638),tmp=(C_word)a,a+=3,tmp));
+t44=C_mutate((C_word*)lf[438]+1 /* (set! peek-unsigned-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_peek_unsigned_integer,a[2]=((C_word)li639),tmp=(C_word)a,a+=3,tmp));
+t45=C_mutate((C_word*)lf[870]+1 /* (set! peek-fixnum ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18438,a[2]=((C_word)li640),tmp=(C_word)a,a+=3,tmp));
+t46=C_mutate((C_word*)lf[871]+1 /* (set! peek-byte ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18441,a[2]=((C_word)li641),tmp=(C_word)a,a+=3,tmp));
+t47=C_mutate((C_word*)lf[872]+1 /* (set! vector->structure! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18444,a[2]=((C_word)li642),tmp=(C_word)a,a+=3,tmp));
+t48=C_mutate((C_word*)lf[873]+1 /* (set! peek-double ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18447,a[2]=((C_word)li643),tmp=(C_word)a,a+=3,tmp));
+t49=C_mutate((C_word*)lf[457]+1 /* (set! peek-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18450,a[2]=((C_word)li644),tmp=(C_word)a,a+=3,tmp));
+t50=C_mutate((C_word*)lf[722]+1 /* (set! peek-nonnull-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18466,a[2]=((C_word)li645),tmp=(C_word)a,a+=3,tmp));
+t51=C_mutate((C_word*)lf[874]+1 /* (set! peek-and-free-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18472,a[2]=((C_word)li646),tmp=(C_word)a,a+=3,tmp));
+t52=C_mutate((C_word*)lf[875]+1 /* (set! peek-and-free-nonnull-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18488,a[2]=((C_word)li647),tmp=(C_word)a,a+=3,tmp));
+t53=C_mutate((C_word*)lf[876]+1 /* (set! poke-c-string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18494,a[2]=((C_word)li648),tmp=(C_word)a,a+=3,tmp));
+t54=C_mutate((C_word*)lf[877]+1 /* (set! poke-integer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18501,a[2]=((C_word)li649),tmp=(C_word)a,a+=3,tmp));
+t55=C_mutate((C_word*)lf[878]+1 /* (set! poke-double ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18504,a[2]=((C_word)li650),tmp=(C_word)a,a+=3,tmp));
+t56=C_mutate((C_word*)lf[879]+1 /* (set! peek-c-string-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18524,a[2]=((C_word)li652),tmp=(C_word)a,a+=3,tmp));
+t57=C_mutate((C_word*)lf[880]+1 /* (set! peek-and-free-c-string-list ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18585,a[2]=((C_word)li654),tmp=(C_word)a,a+=3,tmp));
+t58=C_mutate((C_word*)lf[881]+1 /* (set! vector->closure! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18623,a[2]=((C_word)li655),tmp=(C_word)a,a+=3,tmp));
+t59=C_mutate((C_word*)lf[882]+1 /* (set! symbol-has-toplevel-binding? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18626,a[2]=((C_word)li656),tmp=(C_word)a,a+=3,tmp));
+t60=C_mutate((C_word*)lf[661]+1 /* (set! copy-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18644,a[2]=((C_word)li657),tmp=(C_word)a,a+=3,tmp));
+t61=C_mutate((C_word*)lf[883]+1 /* (set! copy-words ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18651,a[2]=((C_word)li658),tmp=(C_word)a,a+=3,tmp));
+t62=C_mutate((C_word*)lf[884]+1 /* (set! compare-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18658,a[2]=((C_word)li659),tmp=(C_word)a,a+=3,tmp));
+t63=C_mutate((C_word*)lf[885]+1 /* (set! zap-strings ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18661,a[2]=((C_word)li660),tmp=(C_word)a,a+=3,tmp));
+t64=C_mutate((C_word*)lf[886]+1 /* (set! block-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18664,a[2]=((C_word)li661),tmp=(C_word)a,a+=3,tmp));
+t65=C_mutate((C_word*)lf[887]+1 /* (set! foreign-char-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18670,a[2]=((C_word)li662),tmp=(C_word)a,a+=3,tmp));
+t66=C_mutate((C_word*)lf[888]+1 /* (set! foreign-fixnum-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18673,a[2]=((C_word)li663),tmp=(C_word)a,a+=3,tmp));
+t67=C_mutate((C_word*)lf[889]+1 /* (set! foreign-flonum-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18676,a[2]=((C_word)li664),tmp=(C_word)a,a+=3,tmp));
+t68=C_mutate((C_word*)lf[890]+1 /* (set! foreign-block-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18679,a[2]=((C_word)li665),tmp=(C_word)a,a+=3,tmp));
+t69=C_mutate((C_word*)lf[891]+1 /* (set! foreign-number-vector-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18682,a[2]=((C_word)li666),tmp=(C_word)a,a+=3,tmp));
+t70=C_mutate((C_word*)lf[892]+1 /* (set! foreign-string-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18685,a[2]=((C_word)li667),tmp=(C_word)a,a+=3,tmp));
+t71=C_mutate((C_word*)lf[893]+1 /* (set! foreign-symbol-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18688,a[2]=((C_word)li668),tmp=(C_word)a,a+=3,tmp));
+t72=C_mutate((C_word*)lf[894]+1 /* (set! foreign-pointer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18691,a[2]=((C_word)li669),tmp=(C_word)a,a+=3,tmp));
+t73=C_mutate((C_word*)lf[895]+1 /* (set! foreign-tagged-pointer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18694,a[2]=((C_word)li670),tmp=(C_word)a,a+=3,tmp));
+t74=C_mutate((C_word*)lf[896]+1 /* (set! foreign-integer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18697,a[2]=((C_word)li671),tmp=(C_word)a,a+=3,tmp));
+t75=C_mutate((C_word*)lf[897]+1 /* (set! foreign-unsigned-integer-argument ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18700,a[2]=((C_word)li672),tmp=(C_word)a,a+=3,tmp));
+t76=C_set_block_item(lf[898] /* default-thread-quantum */,0,C_fix(10000));
+t77=C_mutate((C_word*)lf[899]+1 /* (set! default-exception-handler ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18704,a[2]=((C_word)li673),tmp=(C_word)a,a+=3,tmp));
+t78=C_mutate((C_word*)lf[901]+1 /* (set! make-thread ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18707,a[2]=((C_word)li674),tmp=(C_word)a,a+=3,tmp));
+t79=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18727,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4020 ##sys#make-thread */
+t80=*((C_word*)lf[901]+1);
+((C_proc6)(void*)(*((C_word*)t80+1)))(6,t80,t79,C_SCHEME_FALSE,lf[1015],lf[1016],*((C_word*)lf[898]+1));}
+
+/* k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18727(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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 ab[56],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18727,2,t0,t1);}
+t2=C_mutate((C_word*)lf[734]+1 /* (set! primordial-thread ...) */,t1);
+t3=C_mutate((C_word*)lf[723]+1 /* (set! current-thread ...) */,*((C_word*)lf[734]+1));
+t4=C_mutate((C_word*)lf[902]+1 /* (set! make-mutex ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18730,a[2]=((C_word)li675),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[904]+1 /* (set! abandon-mutexes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18736,a[2]=((C_word)li677),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[905]+1 /* (set! schedule ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18788,a[2]=((C_word)li678),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[906]+1 /* (set! thread-yield! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18797,a[2]=((C_word)li681),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[907]+1 /* (set! context-switch ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_context_switch,a[2]=((C_word)li682),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[908]+1 /* (set! interrupt-hook ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18819,a[2]=((C_word)li683),tmp=(C_word)a,a+=3,tmp));
+t10=C_set_block_item(lf[82] /* update-errno */,0,C_SCHEME_UNDEFINED);
+t11=C_set_block_item(lf[911] /* errno */,0,C_SCHEME_UNDEFINED);
+t12=C_fix(0);
+t13=(*a=C_VECTOR_TYPE|1,a[1]=t12,tmp=(C_word)a,a+=2,tmp);
+t14=C_mutate((C_word*)lf[82]+1 /* (set! update-errno ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18840,a[2]=t13,a[3]=((C_word)li684),tmp=(C_word)a,a+=4,tmp));
+t15=C_mutate((C_word*)lf[911]+1 /* (set! errno ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18844,a[2]=t13,a[3]=((C_word)li685),tmp=(C_word)a,a+=4,tmp));
+t16=*((C_word*)lf[587]+1);
+t17=*((C_word*)lf[667]+1);
+t18=*((C_word*)lf[669]+1);
+t19=*((C_word*)lf[135]+1);
+t20=*((C_word*)lf[499]+1);
+t21=*((C_word*)lf[602]+1);
+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_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18866,a[2]=t17,a[3]=t18,a[4]=((C_word)li687),tmp=(C_word)a,a+=5,tmp));
+t27=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18913,a[2]=t20,a[3]=((C_word)li689),tmp=(C_word)a,a+=4,tmp));
+t28=C_mutate((C_word*)lf[587]+1 /* (set! user-read-hook ...) */,(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18958,a[2]=t16,a[3]=t25,a[4]=t17,a[5]=t21,a[6]=t23,a[7]=t18,a[8]=((C_word)li694),tmp=(C_word)a,a+=9,tmp));
+t29=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19414,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t30=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21419,a[2]=t29,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4201 argv */
+t31=*((C_word*)lf[22]+1);
+((C_proc2)(void*)(*((C_word*)t31+1)))(2,t31,t30);}
+
+/* k21417 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21419(C_word c,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_21419,2,t0,t1);}
+t2=(C_word)C_i_pairp(t1);
+t3=(C_truep(t2)?(C_word)C_i_car(t1):lf[1014]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21424,a[2]=((C_word)li774),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4200 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t3,t4);}
+
+/* a21423 in k21417 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21424(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_21424,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[921]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
+
+/* k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19414(C_word c,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_19414,2,t0,t1);}
+t2=C_mutate((C_word*)lf[921]+1 /* (set! program-name ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19418,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21351,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4209 argv */
+t5=*((C_word*)lf[22]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+
+/* k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21351(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_21351,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21354,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_pairp(t1))){
+t3=(C_word)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_21372,a[2]=t5,a[3]=((C_word)li772),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_21372(t7,t2,t3);}
+else{
+t3=t1;
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f25416,a[2]=((C_word)li773),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4208 make-parameter */
+t5=*((C_word*)lf[491]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,((C_word*)t0)[2],t3,t4);}}
+
+/* f25416 in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f25416(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*)f25416,3,t0,t1,t2);}
+t3=(C_word)C_i_check_list_2(t2,lf[922]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
+
+/* loop in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21372(C_word t0,C_word 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_21372,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_slot(t2,C_fix(0));
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21391,a[2]=t3,a[3]=t4,a[4]=t1,a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_block_size(t3);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t6,C_fix(3)))){
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21411,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4217 ##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_21391(t7,C_SCHEME_FALSE);}}}
+
+/* k21409 in loop in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21411(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_21391(t2,(C_word)C_i_string_equal_p(lf[1013],t1));}
+
+/* k21389 in loop in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21391(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_21391,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* library.scm: 4218 loop */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_21372(t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21401,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4219 loop */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_21372(t3,t2,((C_word*)t0)[3]);}}
+
+/* k21399 in k21389 in loop in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21401(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_21401,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));}
+
+/* k21352 in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21354(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_21354,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21356,a[2]=((C_word)li771),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4208 make-parameter */
+t3=*((C_word*)lf[491]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],t1,t2);}
+
+/* a21355 in k21352 in k21349 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21356(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_21356,3,t0,t1,t2);}
+t3=(C_word)C_i_check_list_2(t2,lf[922]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
+
+/* k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19418(C_word c,C_word t0,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_19418,2,t0,t1);}
+t2=C_mutate((C_word*)lf[922]+1 /* (set! command-line-arguments ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19422,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
+t5=(C_word)C_fixnum_plus(t4,C_fix(1));
+/* library.scm: 4231 ##sys#make-vector */
+t6=*((C_word*)lf[355]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t3,t5,C_SCHEME_UNDEFINED);}
+
+/* k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19422(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_19422,2,t0,t1);}
+t2=C_mutate((C_word*)lf[909]+1 /* (set! pending-finalizers ...) */,t1);
+t3=(C_word)C_i_set_i_slot(*((C_word*)lf[909]+1),C_fix(0),C_fix(0));
+t4=C_mutate((C_word*)lf[923]+1 /* (set! set-finalizer! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)C_register_finalizer,a[2]=((C_word)li695),tmp=(C_word)a,a+=3,tmp));
+t5=*((C_word*)lf[603]+1);
+t6=C_mutate((C_word*)lf[924]+1 /* (set! set-finalizer! ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19428,a[2]=t5,a[3]=((C_word)li696),tmp=(C_word)a,a+=4,tmp));
+t7=*((C_word*)lf[362]+1);
+t8=*((C_word*)lf[603]+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[910]+1 /* (set! run-pending-finalizers ...) */,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19492,a[2]=t8,a[3]=t7,a[4]=t10,a[5]=((C_word)li698),tmp=(C_word)a,a+=6,tmp));
+t12=C_mutate((C_word*)lf[743]+1 /* (set! force-finalizers ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19575,a[2]=((C_word)li700),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[934]+1 /* (set! gc ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19603,a[2]=((C_word)li701),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[361]+1 /* (set! list->vector ...) */,*((C_word*)lf[358]+1));
+t15=C_mutate((C_word*)lf[935]+1 /* (set! list ...) */,*((C_word*)lf[127]+1));
+t16=C_mutate((C_word*)lf[936]+1 /* (set! cons ...) */,*((C_word*)lf[93]+1));
+t17=C_mutate((C_word*)lf[808]+1 /* (set! append ...) */,*((C_word*)lf[134]+1));
+t18=C_mutate((C_word*)lf[937]+1 /* (set! vector ...) */,*((C_word*)lf[360]+1));
+t19=C_mutate((C_word*)lf[938]+1 /* (set! apply ...) */,*((C_word*)lf[390]+1));
+t20=C_mutate((C_word*)lf[939]+1 /* (set! values ...) */,*((C_word*)lf[395]+1));
+t21=C_mutate((C_word*)lf[940]+1 /* (set! equal? ...) */,*((C_word*)lf[91]+1));
+t22=C_mutate((C_word*)lf[941]+1 /* (set! car ...) */,*((C_word*)lf[94]+1));
+t23=C_mutate((C_word*)lf[942]+1 /* (set! cdr ...) */,*((C_word*)lf[95]+1));
+t24=C_mutate((C_word*)lf[943]+1 /* (set! pair? ...) */,*((C_word*)lf[92]+1));
+t25=C_mutate((C_word*)lf[944]+1 /* (set! vector? ...) */,*((C_word*)lf[351]+1));
+t26=C_mutate((C_word*)lf[945]+1 /* (set! vector->list ...) */,*((C_word*)lf[359]+1));
+t27=C_mutate((C_word*)lf[946]+1 /* (set! vector-length ...) */,*((C_word*)lf[352]+1));
+t28=C_mutate((C_word*)lf[947]+1 /* (set! vector-ref ...) */,*((C_word*)lf[353]+1));
+t29=C_mutate((C_word*)lf[948]+1 /* (set! >= ...) */,*((C_word*)lf[245]+1));
+t30=C_mutate((C_word*)lf[949]+1 /* (set! = ...) */,*((C_word*)lf[242]+1));
+t31=C_mutate((C_word*)lf[950]+1 /* (set! + ...) */,*((C_word*)lf[240]+1));
+t32=C_mutate((C_word*)lf[951]+1 /* (set! eq? ...) */,*((C_word*)lf[89]+1));
+t33=C_mutate((C_word*)lf[952]+1 /* (set! eqv? ...) */,*((C_word*)lf[90]+1));
+t34=C_mutate((C_word*)lf[953]+1 /* (set! list? ...) */,*((C_word*)lf[142]+1));
+t35=C_mutate((C_word*)lf[954]+1 /* (set! null? ...) */,*((C_word*)lf[126]+1));
+t36=C_mutate((C_word*)lf[955]+1 /* (set! map-n ...) */,*((C_word*)lf[401]+1));
+t37=C_mutate((C_word*)lf[956]+1 /* (set! list-ref ...) */,*((C_word*)lf[130]+1));
+t38=C_mutate((C_word*)lf[957]+1 /* (set! make-promise ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19648,a[2]=((C_word)li704),tmp=(C_word)a,a+=3,tmp));
+t39=C_mutate((C_word*)lf[958]+1 /* (set! promise? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19680,a[2]=((C_word)li705),tmp=(C_word)a,a+=3,tmp));
+t40=*((C_word*)lf[665]+1);
+t41=C_mutate((C_word*)lf[959]+1 /* (set! read-from-string ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19686,a[2]=t40,a[3]=((C_word)li706),tmp=(C_word)a,a+=4,tmp));
+t42=*((C_word*)lf[602]+1);
+t43=*((C_word*)lf[599]+1);
+t44=*((C_word*)lf[600]+1);
+t45=*((C_word*)lf[172]+1);
+t46=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19697,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: 4361 condition-property-accessor */
+t47=*((C_word*)lf[811]+1);
+((C_proc5)(void*)(*((C_word*)t47+1)))(5,t47,t46,lf[787],lf[1012],C_SCHEME_FALSE);}
+
+/* k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19697(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_19697,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19700,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: 4362 condition-property-accessor */
+t3=*((C_word*)lf[811]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[787],lf[574],C_SCHEME_FALSE);}
+
+/* k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19700(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_19700,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19703,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: 4363 condition-property-accessor */
+t3=*((C_word*)lf[811]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[787],lf[1011],C_SCHEME_FALSE);}
+
+/* k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19703(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_19703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19704,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],a[4]=((C_word)li710),tmp=(C_word)a,a+=5,tmp);
+t3=C_mutate((C_word*)lf[960]+1 /* (set! print-error-message ...) */,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19746,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)li715),tmp=(C_word)a,a+=10,tmp));
+t4=C_mutate((C_word*)lf[971]+1 /* (set! make-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19944,a[2]=((C_word)li716),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[982]+1 /* (set! find-symbol-table ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20166,a[2]=((C_word)li717),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[983]+1 /* (set! import ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20189,a[2]=((C_word)li725),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[987]+1 /* (set! namespace-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20412,a[2]=((C_word)li726),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[990]+1 /* (set! walk-namespace ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20464,a[2]=((C_word)li728),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[993]+1 /* (set! memory-statistics ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20515,a[2]=((C_word)li729),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[994]+1 /* (set! decorate-lambda ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20538,a[2]=((C_word)li732),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[995]+1 /* (set! lambda-decoration ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20615,a[2]=((C_word)li734),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[646]+1 /* (set! lambda-info ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20654,a[2]=((C_word)li736),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[634]+1 /* (set! lambda-info->string ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20673,a[2]=((C_word)li737),tmp=(C_word)a,a+=3,tmp));
+t14=*((C_word*)lf[665]+1);
+t15=C_mutate((C_word*)lf[996]+1 /* (set! procedure-information ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20682,a[2]=t14,a[3]=((C_word)li738),tmp=(C_word)a,a+=4,tmp));
+t16=(C_word)C_a_i_vector(&a,1,lf[997]);
+t17=C_mutate(&lf[998] /* (set! setter-tag ...) */,t16);
+t18=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20711,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t19=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21217,a[2]=((C_word)li765),tmp=(C_word)a,a+=3,tmp);
+t20=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21257,a[2]=((C_word)li766),tmp=(C_word)a,a+=3,tmp);
+t21=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21273,a[2]=((C_word)li770),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4610 ##sys#decorate-lambda */
+t22=*((C_word*)lf[994]+1);
+((C_proc5)(void*)(*((C_word*)t22+1)))(5,t22,t18,t19,t20,t21);}
+
+/* a21272 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21273(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_21273,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21283,a[2]=((C_word)li769),tmp=(C_word)a,a+=3,tmp);
+t5=(C_word)C_a_i_cons(&a,2,lf[998],t4);
+t6=(C_word)C_i_setslot(t2,t3,t5);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t2);}
+
+/* a21282 in a21272 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21283(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_21283,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_closurep(t2))){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21293,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21312,a[2]=((C_word)li767),tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21328,a[2]=t3,a[3]=((C_word)li768),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4624 ##sys#decorate-lambda */
+t7=*((C_word*)lf[994]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t4,t2,t5,t6);}
+else{
+/* library.scm: 4631 error */
+t4=*((C_word*)lf[15]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[1010],t2);}}
+
+/* a21327 in a21282 in a21272 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21328(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_21328,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_cons(&a,2,lf[998],((C_word*)t0)[2]);
+t5=(C_word)C_i_setslot(t2,t3,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
+
+/* a21311 in a21282 in a21272 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21312(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_21312,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[998],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k21291 in a21282 in a21272 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21293(C_word c,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_21293,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+t4=(C_word)C_a_i_list(&a,1,t3);
+/* library.scm: 4630 ##sys#become! */
+t5=*((C_word*)lf[49]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,((C_word*)t0)[2],t4);}}
+
+/* a21256 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21257(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_21257,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[998],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* a21216 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21217(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_21217,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_closurep(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21233,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21241,a[2]=((C_word)li764),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4613 ##sys#lambda-decoration */
+t5=*((C_word*)lf[995]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t2,t4);}
+else{
+/* library.scm: 4615 ##sys#error */
+t3=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,lf[997],lf[1009],t2);}}
+
+/* a21240 in a21216 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21241(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_21241,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[998],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k21231 in a21216 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21233(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(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: 4615 ##sys#error */
+t3=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],lf[997],lf[1009],((C_word*)t0)[2]);}}
+else{
+/* library.scm: 4615 ##sys#error */
+t2=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[997],lf[1009],((C_word*)t0)[2]);}}
+
+/* k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_20711,2,t0,t1);}
+t2=C_mutate((C_word*)lf[999]+1 /* (set! setter ...) */,t1);
+t3=C_mutate((C_word*)lf[997]+1 /* (set! setter ...) */,*((C_word*)lf[999]+1));
+t4=C_mutate((C_word*)lf[1000]+1 /* (set! getter-with-setter ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20714,a[2]=((C_word)li741),tmp=(C_word)a,a+=3,tmp));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20748,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4644 getter-with-setter */
+t6=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,*((C_word*)lf[94]+1),*((C_word*)lf[96]+1));}
+
+/* k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20748(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_20748,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_20752,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4645 getter-with-setter */
+t4=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[95]+1),*((C_word*)lf[97]+1));}
+
+/* k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20752(C_word c,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_20752,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_20756,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21207,a[2]=((C_word)li763),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4646 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[102]+1),t4);}
+
+/* a21206 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21207(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_21207,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_car(t4,t3));}
+
+/* k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20756(C_word c,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_20756,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_20760,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21197,a[2]=((C_word)li762),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4647 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[98]+1),t4);}
+
+/* a21196 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21197(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_21197,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cdr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_car(t4,t3));}
+
+/* k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20760(C_word c,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_20760,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_20764,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21187,a[2]=((C_word)li761),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4648 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[103]+1),t4);}
+
+/* a21186 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21187(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_21187,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_cdr(t4,t3));}
+
+/* k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20764(C_word c,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_20764,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_20768,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21177,a[2]=((C_word)li760),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4649 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[104]+1),t4);}
+
+/* a21176 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21177(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_21177,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cdr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_cdr(t4,t3));}
+
+/* k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20768(C_word c,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_20768,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_20772,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21167,a[2]=((C_word)li759),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4650 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[105]+1),t4);}
+
+/* a21166 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21167(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_21167,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21175,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4650 caar */
+t5=*((C_word*)lf[102]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k21173 in a21166 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21175(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(t1,((C_word*)t0)[2]));}
+
+/* k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20772(C_word c,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_20772,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_20776,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21157,a[2]=((C_word)li758),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4651 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[106]+1),t4);}
+
+/* a21156 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21157(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_21157,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cadr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_car(t4,t3));}
+
+/* k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20776(C_word c,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_20776,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_20780,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21147,a[2]=((C_word)li757),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4652 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[107]+1),t4);}
+
+/* a21146 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21147(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_21147,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21155,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4652 cdar */
+t5=*((C_word*)lf[103]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k21153 in a21146 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21155(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(t1,((C_word*)t0)[2]));}
+
+/* k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20780(C_word c,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_20780,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_20784,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21137,a[2]=((C_word)li756),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4653 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[99]+1),t4);}
+
+/* a21136 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21137(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_21137,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cddr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_car(t4,t3));}
+
+/* k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20784(C_word c,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_20784,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_20788,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21127,a[2]=((C_word)li755),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4654 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[108]+1),t4);}
+
+/* a21126 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21127(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_21127,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21135,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4654 caar */
+t5=*((C_word*)lf[102]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k21133 in a21126 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21135(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(t1,((C_word*)t0)[2]));}
+
+/* k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20788(C_word c,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_20788,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_20792,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21117,a[2]=((C_word)li754),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4655 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[109]+1),t4);}
+
+/* a21116 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21117(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_21117,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cadr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_cdr(t4,t3));}
+
+/* k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20792(C_word c,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_20792,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_20796,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21107,a[2]=((C_word)li753),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4656 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[110]+1),t4);}
+
+/* a21106 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21107(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_21107,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_21115,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4656 cdar */
+t5=*((C_word*)lf[103]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k21113 in a21106 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21115(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(t1,((C_word*)t0)[2]));}
+
+/* k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20796(C_word c,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_20796,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_20800,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21097,a[2]=((C_word)li752),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4657 getter-with-setter */
+t5=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,*((C_word*)lf[111]+1),t4);}
+
+/* a21096 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21097(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_21097,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cddr(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_cdr(t4,t3));}
+
+/* k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20800(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_20800,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_20804,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4658 getter-with-setter */
+t4=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[145]+1),*((C_word*)lf[146]+1));}
+
+/* k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20804(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_20804,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_20808,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4659 getter-with-setter */
+t4=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,*((C_word*)lf[353]+1),*((C_word*)lf[354]+1));}
+
+/* k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20808(C_word c,C_word t0,C_word 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_20808,2,t0,t1);}
+t2=C_mutate((C_word*)lf[353]+1 /* (set! vector-ref ...) */,t1);
+t3=C_mutate((C_word*)lf[1001]+1 /* (set! put! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20810,a[2]=((C_word)li743),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[1002]+1 /* (set! put! ...) */,*((C_word*)lf[1001]+1));
+t5=C_mutate((C_word*)lf[1003]+1 /* (set! get ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20876,a[2]=((C_word)li745),tmp=(C_word)a,a+=3,tmp));
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20950,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4681 getter-with-setter */
+t7=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,*((C_word*)lf[1003]+1),*((C_word*)lf[1002]+1));}
+
+/* k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20950(C_word c,C_word t0,C_word 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_20950,2,t0,t1);}
+t2=C_mutate((C_word*)lf[1004]+1 /* (set! get ...) */,t1);
+t3=C_mutate((C_word*)lf[1005]+1 /* (set! remprop! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20952,a[2]=((C_word)li747),tmp=(C_word)a,a+=3,tmp));
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21011,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21076,a[2]=((C_word)li750),tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21085,a[2]=((C_word)li751),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4698 getter-with-setter */
+t7=*((C_word*)lf[1000]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t4,t5,t6);}
+
+/* a21084 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21085(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_21085,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_symbol_2(t2,lf[1006]);
+t5=(C_word)C_i_check_list_2(t3,lf[1008]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_setslot(t2,C_fix(2),t3));}
+
+/* a21075 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21076(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_21076,3,t0,t1,t2);}
+t3=(C_word)C_i_check_symbol_2(t2,lf[1006]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(t2,C_fix(2)));}
+
+/* k21009 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21011(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_21011,2,t0,t1);}
+t2=C_mutate((C_word*)lf[1006]+1 /* (set! symbol-plist ...) */,t1);
+t3=C_mutate((C_word*)lf[1007]+1 /* (set! get-properties ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_21013,a[2]=((C_word)li749),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 k21009 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21013(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_21013,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_symbol_2(t2,lf[1007]);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21020,a[2]=t1,a[3]=t2,a[4]=t4,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_symbolp(((C_word*)t4)[1]))){
+t7=(C_word)C_a_i_list(&a,1,((C_word*)t4)[1]);
+t8=C_set_block_item(t4,0,t7);
+t9=t6;
+f_21020(t9,t8);}
+else{
+t7=t6;
+f_21020(t7,C_SCHEME_UNDEFINED);}}
+
+/* k21018 in get-properties in k21009 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21020(C_word t0,C_word 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_21020,NULL,2,t0,t1);}
+t2=(C_word)C_i_check_list_2(((C_word*)((C_word*)t0)[4])[1],lf[1007]);
+t3=(C_word)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_21032,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=((C_word)li748),tmp=(C_word)a,a+=5,tmp));
+t7=((C_word*)t5)[1];
+f_21032(t7,((C_word*)t0)[2],t3);}
+
+/* loop in k21018 in get-properties in k21009 in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21032(C_word t0,C_word 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_21032,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+/* library.scm: 4714 values */
+C_values(5,0,t1,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(C_word)C_slot(t4,C_fix(1));
+if(C_truep((C_word)C_i_memq(t3,((C_word*)((C_word*)t0)[3])[1]))){
+t6=(C_word)C_slot(t4,C_fix(0));
+/* library.scm: 4719 values */
+C_values(5,0,t1,t3,t6,t5);}
+else{
+/* library.scm: 4720 loop */
+t8=t1;
+t9=t5;
+t1=t8;
+t2=t9;
+goto loop;}}}
+
+/* remprop! in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20952(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_20952,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_symbol_2(t2,lf[1005]);
+t5=(C_word)C_slot(t2,C_fix(2));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20965,a[2]=t2,a[3]=t3,a[4]=((C_word)li746),tmp=(C_word)a,a+=5,tmp);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_20965(t6,t5,C_SCHEME_FALSE));}
+
+/* loop in remprop! in k20948 in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_20965(C_word t0,C_word 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_word)C_i_nullp(t1))){
+return(C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(t1,C_fix(1));
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(C_word)C_slot(t1,C_fix(0));
+t6=(C_word)C_eqp(t5,((C_word*)t0)[3]);
+if(C_truep(t6)){
+t7=(C_truep(t2)?(C_word)C_i_setslot(t2,C_fix(1),t4):(C_word)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 k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20876(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_20876r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_20876r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_20876r(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_word)C_i_check_symbol_2(t2,lf[1004]);
+t6=(C_word)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_20889,a[2]=t8,a[3]=t3,a[4]=t4,a[5]=((C_word)li744),tmp=(C_word)a,a+=6,tmp));
+t10=((C_word*)t8)[1];
+f_20889(t10,t1,t6);}
+
+/* loop in ##sys#get in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20889(C_word t0,C_word 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_20889,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=((C_word*)t0)[4];
+if(C_truep((C_word)C_i_nullp(t3))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)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_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_eqp(t3,((C_word*)t0)[3]);
+if(C_truep(t4)){
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_slot(t5,C_fix(0)));}
+else{
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(C_word)C_slot(t5,C_fix(1));
+/* library.scm: 4679 loop */
+t11=t1;
+t12=t6;
+t1=t11;
+t2=t12;
+goto loop;}}}
+
+/* ##sys#put! in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20810(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_20810,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_i_check_symbol_2(t2,lf[1002]);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20817,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)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_20823,a[2]=t9,a[3]=t3,a[4]=t4,a[5]=t2,a[6]=((C_word)li742),tmp=(C_word)a,a+=7,tmp));
+t11=((C_word*)t9)[1];
+f_20823(t11,t6,t7);}
+
+/* loop in ##sys#put! in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20823(C_word t0,C_word 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_20823,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(2));
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t3);
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_setslot(((C_word*)t0)[5],C_fix(2),t5));}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_eqp(t3,((C_word*)t0)[3]);
+if(C_truep(t4)){
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_setslot(t5,C_fix(0),((C_word*)t0)[4]));}
+else{
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(C_word)C_slot(t5,C_fix(1));
+/* library.scm: 4669 loop */
+t12=t1;
+t13=t6;
+t1=t12;
+t2=t13;
+goto loop;}}}
+
+/* k20815 in ##sys#put! in k20806 in k20802 in k20798 in k20794 in k20790 in k20786 in k20782 in k20778 in k20774 in k20770 in k20766 in k20762 in k20758 in k20754 in k20750 in k20746 in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20817(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 k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20714(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_20714,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20720,a[2]=((C_word)li739),tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20736,a[2]=t3,a[3]=((C_word)li740),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4637 ##sys#decorate-lambda */
+t6=*((C_word*)lf[994]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t1,t2,t4,t5);}
+
+/* a20735 in getter-with-setter in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20736(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_20736,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_cons(&a,2,lf[998],((C_word*)t0)[2]);
+t5=(C_word)C_i_setslot(t2,t3,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
+
+/* a20719 in getter-with-setter in k20709 in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20720(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_20720,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[998],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* procedure-information in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20682(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_20682,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20686,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4597 ##sys#check-closure */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[75]+1)))(4,*((C_word*)lf[75]+1),t3,t2,lf[996]);}
+
+/* k20684 in procedure-information in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20686(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_20686,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20689,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4598 ##sys#lambda-info */
+t3=*((C_word*)lf[646]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k20687 in k20684 in procedure-information in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20689(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_20689,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20699,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20703,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4599 ##sys#lambda-info->string */
+t4=*((C_word*)lf[634]+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);}}
+
+/* k20701 in k20687 in k20684 in procedure-information in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20703(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4599 open-input-string */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k20697 in k20687 in k20684 in procedure-information in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20699(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4599 ##sys#read */
+t2=*((C_word*)lf[500]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_SCHEME_FALSE);}
+
+/* ##sys#lambda-info->string in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20673(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_20673,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20680,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4590 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k20678 in ##sys#lambda-info->string in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20680(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_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 k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20654(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_20654,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20660,a[2]=((C_word)li735),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4584 ##sys#lambda-decoration */
+t4=*((C_word*)lf[995]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,t2,t3);}
+
+/* a20659 in ##sys#lambda-info in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20660(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_20660,3,t0,t1,t2);}
+if(C_truep((C_word)C_immp(t2))){
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_lambdainfop(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* ##sys#lambda-decoration in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20615(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_20615,4,t0,t1,t2,t3);}
+t4=(C_word)C_block_size(t2);
+t5=(C_word)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_20625,a[2]=t3,a[3]=t7,a[4]=t2,a[5]=((C_word)li733),tmp=(C_word)a,a+=6,tmp));
+t9=((C_word*)t7)[1];
+f_20625(t9,t1,t5);}
+
+/* loop in ##sys#lambda-decoration in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20625(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_20625,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
+t3=(C_word)C_slot(((C_word*)t0)[4],t2);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20641,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 4576 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);}}
+
+/* k20639 in loop in ##sys#lambda-decoration in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20641(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_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 4578 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_20625(t3,((C_word*)t0)[5],t2);}}
+
+/* ##sys#decorate-lambda in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20538(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_20538,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_block_size(t2);
+t6=(C_word)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_20551,a[2]=t3,a[3]=t8,a[4]=t4,a[5]=t2,a[6]=t5,a[7]=((C_word)li731),tmp=(C_word)a,a+=8,tmp));
+t10=((C_word*)t8)[1];
+f_20551(t10,t1,t6);}
+
+/* loop in ##sys#decorate-lambda in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20551(C_word t0,C_word 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_20551,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_zerop(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20561,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_word)C_fixnum_plus(((C_word*)t0)[6],C_fix(1));
+/* library.scm: 4559 make-vector */
+t5=*((C_word*)lf[356]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[5],t2);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20603,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: 4568 pred */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t3);}}
+
+/* k20601 in loop in ##sys#decorate-lambda in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20603(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: 4569 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_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 4570 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_20551(t3,((C_word*)t0)[5],t2);}}
+
+/* k20559 in loop in ##sys#decorate-lambda in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20561(C_word c,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_20561,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_20566,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)li730),tmp=(C_word)a,a+=8,tmp));
+t5=((C_word*)t3)[1];
+f_20566(t5,((C_word*)t0)[2],C_fix(1));}
+
+/* doloop5231 in k20559 in loop in ##sys#decorate-lambda in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20566(C_word t0,C_word 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_20566,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
+t3=(C_word)C_vector_to_closure(((C_word*)t0)[5]);
+t4=(C_word)C_copy_pointer(((C_word*)t0)[4],((C_word*)t0)[5]);
+/* library.scm: 4564 decorator */
+t5=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t1,((C_word*)t0)[5],t2);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[4],t2);
+t4=(C_word)C_i_setslot(((C_word*)t0)[5],t2,t3);
+t5=(C_word)C_fixnum_plus(t2,C_fix(1));
+t9=t1;
+t10=t5;
+t1=t9;
+t2=t10;
+goto loop;}}
+
+/* memory-statistics in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20515(C_word 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_20515,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20519,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4547 ##sys#gc */
+t3=*((C_word*)lf[18]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_SCHEME_TRUE);}
+
+/* k20517 in memory-statistics in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20519(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_20519,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20522,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4548 ##sys#memory-info */
+t3=*((C_word*)lf[31]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k20520 in k20517 in memory-statistics in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20522(C_word c,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_20522,2,t0,t1);}
+t2=(C_word)C_slot(t1,C_fix(0));
+t3=(C_word)C_fixnum_difference(t2,((C_word*)t0)[3]);
+t4=(C_word)C_slot(t1,C_fix(1));
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_vector(&a,3,t2,t3,t4));}
+
+/* ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20464(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*)tr3rv,(void*)f_20464r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_20464r(t0,t1,t2,t3);}}
+
+static void C_ccall f_20464r(C_word t0,C_word 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_word)C_notvemptyp(t3);
+t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):lf[991]);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20471,a[2]=t5,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4534 ##sys#find-symbol-table */
+t7=*((C_word*)lf[982]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t5);}
+
+/* k20469 in ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20471(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_20471,2,t0,t1);}
+t2=(C_word)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_20486,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_20486(2,t4,C_SCHEME_UNDEFINED);}
+else{
+/* library.scm: 4537 ##sys#error */
+t4=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[992],((C_word*)t0)[2]);}}
+
+/* k20484 in k20469 in ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20486(C_word c,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_20486,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_20491,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)li727),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_20491(t5,((C_word*)t0)[2]);}
+
+/* loop in k20484 in k20469 in ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20491(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_20491,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20495,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_word)C_i_foreign_pointer_argumentp(t3);
+t5=t2;
+f_20495(t5,(C_word)stub5197(C_SCHEME_UNDEFINED,t4,((C_word*)t0)[2]));}
+else{
+t4=t2;
+f_20495(t4,(C_word)stub5197(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,((C_word*)t0)[2]));}}
+
+/* k20493 in loop in k20484 in k20469 in ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20495(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_20495,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20501,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4541 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);}}
+
+/* k20499 in k20493 in loop in k20484 in k20469 in ##sys#walk-namespace in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20501(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4542 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_20491(t2,((C_word*)t0)[2]);}
+
+/* ##sys#namespace-ref in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20412(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*)tr4rv,(void*)f_20412r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_20412r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_20412r(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_20416,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_20435,a[2]=t2,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_symbolp(t3))){
+t7=t6;
+f_20435(2,t7,(C_word)C_slot(t3,C_fix(1)));}
+else{
+if(C_truep((C_word)C_i_stringp(t3))){
+t7=t3;
+t8=t6;
+f_20435(2,t8,t7);}
+else{
+/* library.scm: 4526 ##sys#signal-hook */
+t7=*((C_word*)lf[9]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[56],lf[989],t3);}}}
+
+/* k20433 in ##sys#namespace-ref in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20435(C_word c,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_20435,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20439,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_20443,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
+/* library.scm: 4527 ##sys#make-c-string */
+t5=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* k20441 in k20433 in ##sys#namespace-ref in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20443(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4527 ##sys#find-symbol-table */
+t2=*((C_word*)lf[982]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k20437 in k20433 in ##sys#namespace-ref in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20439(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_word)C_i_foreign_pointer_argumentp(t1);
+t4=((C_word*)t0)[2];
+f_20416(t4,(C_word)stub5072(C_SCHEME_UNDEFINED,t2,t3));}
+else{
+t3=((C_word*)t0)[2];
+f_20416(t3,(C_word)stub5072(C_SCHEME_UNDEFINED,t2,C_SCHEME_FALSE));}}
+
+/* k20414 in ##sys#namespace-ref in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20416(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_retrieve(t1);
+t3=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+if(C_truep((C_word)C_notvemptyp(((C_word*)t0)[4]))){
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_i_vector_ref(((C_word*)t0)[4],C_fix(0)));}
+else{
+/* library.scm: 4530 ##sys#error */
+t2=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],lf[988],((C_word*)t0)[3],((C_word*)t0)[2]);}}}
+
+/* ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20189(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_20189r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_20189r(t0,t1,t2,t3);}}
+
+static void C_ccall f_20189r(C_word t0,C_word 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_20191,a[2]=t2,a[3]=((C_word)li722),tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20359,a[2]=t4,a[3]=((C_word)li723),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20364,a[2]=t5,a[3]=((C_word)li724),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+/* def-syms51035166 */
+t7=t6;
+f_20364(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-prefix51045164 */
+t9=t5;
+f_20359(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))){
+/* body51015109 */
+t11=t4;
+f_20191(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-syms5103 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20364(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_20364,NULL,2,t0,t1);}
+/* def-prefix51045164 */
+t2=((C_word*)t0)[2];
+f_20359(t2,t1,C_SCHEME_END_OF_LIST);}
+
+/* def-prefix5104 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20359(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_20359,NULL,3,t0,t1,t2);}
+/* body51015109 */
+t3=((C_word*)t0)[2];
+f_20191(t3,t1,t2,C_SCHEME_FALSE);}
+
+/* body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20191(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_20191,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20195,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_word)C_i_symbolp(t3))){
+t5=t4;
+f_20195(2,t5,(C_word)C_slot(t3,C_fix(1)));}
+else{
+if(C_truep((C_word)C_i_stringp(t3))){
+t5=t4;
+f_20195(2,t5,t3);}
+else{
+/* library.scm: 4488 ##sys#signal-hook */
+t5=*((C_word*)lf[9]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,lf[56],lf[986],t3);}}}
+else{
+t5=t4;
+f_20195(2,t5,C_SCHEME_FALSE);}}
+
+/* k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20195(C_word c,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_20195,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20198,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_20336,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_slot(((C_word*)t0)[2],C_fix(1));
+/* library.scm: 4489 ##sys#make-c-string */
+t5=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* k20334 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20336(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4489 ##sys#find-symbol-table */
+t2=*((C_word*)lf[982]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20198(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_20198,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20200,a[2]=((C_word*)t0)[5],a[3]=((C_word)li718),tmp=(C_word)a,a+=4,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20221,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_20221(2,t4,C_SCHEME_UNDEFINED);}
+else{
+/* library.scm: 4496 ##sys#error */
+t4=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[985],((C_word*)t0)[2]);}}
+
+/* k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20221(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_20221,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[6]))){
+t2=(C_word)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_20235,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word)li719),tmp=(C_word)a,a+=7,tmp));
+t6=((C_word*)t4)[1];
+f_20235(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_20257,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)li721),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_20257(t5,((C_word*)t0)[3],((C_word*)t0)[6]);}}
+
+/* loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20257(C_word t0,C_word 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_20257,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_20265,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li720),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20318,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));
+/* g51445145 */
+t6=t3;
+f_20265(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k20316 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20318(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_20257(t3,((C_word*)t0)[2],t2);}
+
+/* g5144 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20265(C_word t0,C_word 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_20265,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_20269,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_20291,a[2]=t7,a[3]=t6,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+if(C_truep((C_word)C_i_pairp(t2))){
+t9=(C_word)C_slot(t2,C_fix(1));
+t10=t8;
+f_20291(t10,(C_word)C_i_pairp(t9));}
+else{
+t9=t8;
+f_20291(t9,C_SCHEME_FALSE);}}
+
+/* k20289 in g5144 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20291(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_slot(((C_word*)t0)[5],C_fix(0));
+t3=C_mutate(((C_word *)((C_word*)t0)[4])+1,t2);
+t4=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+t5=(C_word)C_slot(t4,C_fix(0));
+t6=C_mutate(((C_word *)((C_word*)t0)[3])+1,t5);
+t7=((C_word*)t0)[2];
+f_20269(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_20269(t4,t3);}}
+
+/* k20267 in g5144 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20269(C_word t0,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_20269,NULL,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)((C_word*)t0)[8])[1],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_20275,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_word)C_i_foreign_pointer_argumentp(t4);
+t6=t3;
+f_20275(t6,(C_word)stub5072(C_SCHEME_UNDEFINED,t2,t5));}
+else{
+t5=t3;
+f_20275(t5,(C_word)stub5072(C_SCHEME_UNDEFINED,t2,C_SCHEME_FALSE));}}
+
+/* k20273 in k20267 in g5144 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20275(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_20275,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20278,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_word)C_slot(((C_word*)((C_word*)t0)[6])[1],C_fix(1));
+/* library.scm: 4519 copy */
+t4=((C_word*)t0)[5];
+f_20200(t4,((C_word*)t0)[4],t1,t3);}
+else{
+/* library.scm: 4518 ##sys#error */
+t3=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[984],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k20276 in k20273 in k20267 in g5144 in loop5137 in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20278(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*)((C_word*)t0)[5])[1],C_fix(1));
+/* library.scm: 4519 copy */
+t3=((C_word*)t0)[4];
+f_20200(t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* loop in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20235(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_20235,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_20239,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_word)C_i_foreign_pointer_argumentp(t3);
+t5=t2;
+f_20239(t5,(C_word)stub5088(C_SCHEME_UNDEFINED,t4,((C_word*)t0)[2]));}
+else{
+t4=t2;
+f_20239(t4,(C_word)stub5088(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,((C_word*)t0)[2]));}}
+
+/* k20237 in loop in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20239(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_20239,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20245,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_slot(t1,C_fix(1));
+/* library.scm: 4502 copy */
+t4=((C_word*)t0)[2];
+f_20200(t4,t2,t1,t3);}
+else{
+t2=C_SCHEME_UNDEFINED;
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k20243 in k20237 in loop in k20219 in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20245(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4503 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_20235(t2,((C_word*)t0)[2]);}
+
+/* copy in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_20200(C_word t0,C_word 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_20200,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20204,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_20215,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(((C_word*)t0)[2])){
+/* library.scm: 4493 ##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: 4491 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t4,t6);}}
+
+/* k20213 in copy in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20215(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4491 ##sys#intern-symbol */
+C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* k20202 in copy in k20196 in k20193 in body5101 in ##sys#import in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20204(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)[3],C_fix(0));
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_setslot(t1,C_fix(0),t2));}
+
+/* ##sys#find-symbol-table in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20166(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_20166,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_20171,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(t2)){
+t5=(C_word)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,(C_word)stub5079(t3,C_SCHEME_FALSE));}}
+
+/* k20169 in ##sys#find-symbol-table in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20171(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)stub5079(((C_word*)t0)[2],t1));}
+
+/* ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19944(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_19944,6,t0,t1,t2,t3,t4,t5);}
+if(C_truep((C_word)C_immp(t2))){
+/* library.scm: 4412 ##sys#signal-hook */
+t6=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t6+1)))(6,t6,t1,lf[56],t5,lf[972],t2);}
+else{
+t6=(C_word)C_i_vectorp(t2);
+t7=(C_truep(t6)?t6:(C_word)C_i_pairp(t2));
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19966,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t9=(C_word)C_block_size(t2);
+/* library.scm: 4414 ##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_word)C_blockp(t2))?(C_word)C_bytevectorp(t2):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19979,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t10=(C_word)C_block_size(t2);
+/* library.scm: 4421 ##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_word)C_structurep(t2))){
+t9=(C_word)C_slot(t2,C_fix(0));
+t10=(C_word)C_eqp(t9,lf[973]);
+if(C_truep(t10)){
+t11=(C_word)C_slot(t2,C_fix(1));
+t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20004,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t11,tmp=(C_word)a,a+=6,tmp);
+t13=(C_word)C_block_size(t11);
+/* library.scm: 4427 ##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_word)C_eqp(t9,lf[974]);
+if(C_truep(t11)){
+t12=(C_word)C_slot(t2,C_fix(1));
+t13=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20020,a[2]=t4,a[3]=t3,a[4]=t12,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t14=(C_word)C_block_size(t12);
+/* library.scm: 4431 ##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_word)C_eqp(t9,lf[975]);
+if(C_truep(t12)){
+t13=(C_word)C_slot(t2,C_fix(1));
+t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20036,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t13,tmp=(C_word)a,a+=6,tmp);
+t15=(C_word)C_block_size(t13);
+/* library.scm: 4435 ##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_word)C_eqp(t9,lf[976]);
+if(C_truep(t13)){
+t14=(C_word)C_slot(t2,C_fix(1));
+t15=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20052,a[2]=t4,a[3]=t3,a[4]=t14,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t16=(C_word)C_block_size(t14);
+/* library.scm: 4439 ##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_word)C_eqp(t9,lf[977]);
+if(C_truep(t14)){
+t15=(C_word)C_slot(t2,C_fix(1));
+t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20068,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t15,tmp=(C_word)a,a+=6,tmp);
+t17=(C_word)C_block_size(t15);
+/* library.scm: 4443 ##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_word)C_eqp(t9,lf[978]);
+if(C_truep(t15)){
+t16=(C_word)C_slot(t2,C_fix(1));
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20084,a[2]=t4,a[3]=t3,a[4]=t16,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t18=(C_word)C_block_size(t16);
+/* library.scm: 4447 ##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_word)C_eqp(t9,lf[979]);
+if(C_truep(t16)){
+t17=(C_word)C_slot(t2,C_fix(1));
+t18=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20100,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t17,tmp=(C_word)a,a+=6,tmp);
+t19=(C_word)C_block_size(t17);
+/* library.scm: 4451 ##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_word)C_eqp(t9,lf[980]);
+if(C_truep(t17)){
+t18=(C_word)C_slot(t2,C_fix(1));
+t19=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20116,a[2]=t4,a[3]=t3,a[4]=t18,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t20=(C_word)C_block_size(t18);
+/* library.scm: 4455 ##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_20123,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t19=(C_word)C_block_size(t2);
+t20=(C_word)C_fixnum_difference(t19,C_fix(1));
+/* library.scm: 4458 ##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_word)C_i_stringp(t2))){
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_20144,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t10=(C_word)C_block_size(t2);
+/* library.scm: 4461 ##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: 4464 ##sys#signal-hook */
+t9=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t5,lf[981],t2);}}}}}}
+
+/* k20142 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20144(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_20144,2,t0,t1);}
+t2=(C_word)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);}
+
+/* k20121 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20123(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_20123,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_make_locative(&a,4,C_fix(0),((C_word*)t0)[3],t2,((C_word*)t0)[2]));}
+
+/* k20114 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20116(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_20116,2,t0,t1);}
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_make_locative(&a,4,C_fix(9),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* k20098 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20100(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_20100,2,t0,t1);}
+t2=(C_word)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);}
+
+/* k20082 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20084(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_20084,2,t0,t1);}
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_make_locative(&a,4,C_fix(7),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* k20066 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20068(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_20068,2,t0,t1);}
+t2=(C_word)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);}
+
+/* k20050 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20052(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_20052,2,t0,t1);}
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_make_locative(&a,4,C_fix(5),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* k20034 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20036(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_20036,2,t0,t1);}
+t2=(C_word)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);}
+
+/* k20018 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_20020(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_20020,2,t0,t1);}
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_make_locative(&a,4,C_fix(3),((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* k20002 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_word)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);}
+
+/* k19977 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19979(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_19979,2,t0,t1);}
+t2=(C_word)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);}
+
+/* k19964 in ##sys#make-locative in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19966(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_19966,2,t0,t1);}
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)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 k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19746(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_19746r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_19746r(t0,t1,t2,t3);}}
+
+static void C_ccall f_19746r(C_word t0,C_word 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_19748,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)li712),tmp=(C_word)a,a+=11,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19891,a[2]=t4,a[3]=((C_word)li713),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19896,a[2]=t5,a[3]=((C_word)li714),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+/* def-port49715022 */
+t7=t6;
+f_19896(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-header49725020 */
+t9=t5;
+f_19891(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))){
+/* body49694977 */
+t11=t4;
+f_19748(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-port4971 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19896(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_19896,NULL,2,t0,t1);}
+/* def-header49725020 */
+t2=((C_word*)t0)[2];
+f_19891(t2,t1,*((C_word*)lf[424]+1));}
+
+/* def-header4972 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19891(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_19891,NULL,3,t0,t1,t2);}
+/* body49694977 */
+t3=((C_word*)t0)[2];
+f_19748(t3,t1,t2,lf[970]);}
+
+/* body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19748(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_19748,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_19752,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: 4374 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[960]);}
+
+/* k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19752(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_19752,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19755,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: 4375 display */
+t3=((C_word*)t0)[9];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[10]);}
+
+/* k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19755(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_19755,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_19761,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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)C_immp(((C_word*)t0)[5]))){
+t3=t2;
+f_19761(t3,C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(0));
+t4=t2;
+f_19761(t4,(C_word)C_eqp(lf[649],t3));}}
+
+/* k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19761(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_19761,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_19764,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: 4377 errmsg */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[5]);}
+else{
+if(C_truep((C_word)C_i_stringp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19860,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: 4400 display */
+t3=((C_word*)t0)[8];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[968],((C_word*)t0)[9]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19869,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: 4404 display */
+t3=((C_word*)t0)[8];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[969],((C_word*)t0)[9]);}}}
+
+/* k19867 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_19869,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[5]);
+/* library.scm: 4405 writeargs */
+t3=((C_word*)t0)[4];
+f_19704(t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* k19858 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19860(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_19860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19863,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: 4401 display */
+t3=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[2],((C_word*)t0)[4]);}
+
+/* k19861 in k19858 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19863(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4402 newline */
+t2=((C_word*)t0)[4];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19764(C_word c,C_word t0,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_19764,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19767,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_19796,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)li711),tmp=(C_word)a,a+=8,tmp);
+/* g49964997 */
+t4=t3;
+f_19796(t4,t2,t1);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+if(C_truep((C_word)C_i_equalp(lf[965],t3))){
+/* library.scm: 4387 display */
+t4=((C_word*)t0)[7];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t2,lf[966],((C_word*)t0)[8]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19844,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: 4389 display */
+t5=((C_word*)t0)[7];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,lf[967],((C_word*)t0)[8]);}}}
+
+/* k19842 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19844(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)[5],C_fix(1));
+/* library.scm: 4390 display */
+t3=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t3))(4,t3,((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+
+/* g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19796(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_19796,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19800,a[2]=((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: 4379 display */
+t4=((C_word*)t0)[6];
+((C_proc4)C_retrieve_proc(t4))(4,t4,t3,lf[964],((C_word*)t0)[5]);}
+
+/* k19798 in g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19800(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_19800,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19803,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: 4380 errloc */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k19801 in k19798 in g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19803(C_word c,C_word t0,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_19803,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19806,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_word)C_i_symbolp(t1):C_SCHEME_FALSE);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19819,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_19823,a[2]=t4,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4382 ##sys#symbol->qualified-string */
+t6=*((C_word*)lf[325]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t1);}
+else{
+/* library.scm: 4383 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]);}}
+
+/* k19821 in k19801 in k19798 in g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19823(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4382 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[962],t1,lf[963]);}
+
+/* k19817 in k19801 in k19798 in g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19819(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4382 display */
+t2=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t2))(4,t2,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k19804 in k19801 in k19798 in g4996 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19806(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4383 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]);}
+
+/* k19765 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19767(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_19767,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19770,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: 4391 errargs */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k19768 in k19765 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19770(C_word c,C_word t0,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_19770,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|5,a[1]=(C_word)f_19782,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: 4394 display */
+t5=((C_word*)t0)[3];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,lf[961],((C_word*)t0)[4]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19788,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: 4397 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);}}
+
+/* k19786 in k19768 in k19765 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19788(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4398 writeargs */
+t2=((C_word*)t0)[5];
+f_19704(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19780 in k19768 in k19765 in k19762 in k19759 in k19753 in k19750 in body4969 in print-error-message in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19782(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4395 writeargs */
+t2=((C_word*)t0)[5];
+f_19704(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19704(C_word t0,C_word 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_19704,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_19710,a[2]=t5,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=((C_word*)t0)[3],a[6]=((C_word)li709),tmp=(C_word)a,a+=7,tmp));
+t7=((C_word*)t5)[1];
+f_19710(t7,t1,t2);}
+
+/* loop4949 in writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19710(C_word t0,C_word 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_19710,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_19718,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li708),tmp=(C_word)a,a+=6,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19734,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));
+/* g49564957 */
+t6=t3;
+f_19718(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k19732 in loop4949 in writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19734(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_19710(t3,((C_word*)t0)[2],t2);}
+
+/* g4956 in loop4949 in writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19718(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_19718,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19722,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_19727,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word)li707),tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 4368 ##sys#with-print-length-limit */
+t5=*((C_word*)lf[654]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,C_fix(80),t4);}
+
+/* a19726 in g4956 in loop4949 in writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19727(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_19727,2,t0,t1);}
+/* library.scm: 4368 write */
+t2=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t2))(4,t2,t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19720 in g4956 in loop4949 in writeargs in k19701 in k19698 in k19695 in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19722(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4369 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 k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19686(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_19686,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19690,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4350 open-input-string */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k19688 in ##sys#read-from-string in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19690(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4351 read */
+t2=*((C_word*)lf[499]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* promise? in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19680(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_19680,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[77]));}
+
+/* ##sys#make-promise in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19648(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_19648,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_19654,a[2]=t2,a[3]=t6,a[4]=t4,a[5]=((C_word)li703),tmp=(C_word)a,a+=6,tmp);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_a_i_record(&a,2,lf[77],t7));}
+
+/* a19653 in ##sys#make-promise in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19654(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_19654,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_19666,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li702),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4331 ##sys#call-with-values */
+C_call_with_values(4,0,t1,((C_word*)t0)[2],t2);}}
+
+/* a19665 in a19653 in ##sys#make-promise in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19666(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_19666r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_19666r(t0,t1,t2);}}
+
+static void C_ccall f_19666r(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 k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19603(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_19603r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_19603r(t0,t1,t2);}}
+
+static void C_ccall f_19603r(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+if(C_truep((C_word)C_i_pairp(t2))){
+if(C_truep((C_word)C_i_car(t2))){
+/* library.scm: 4289 ##sys#force-finalizers */
+t3=*((C_word*)lf[743]+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 k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19575(C_word c,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_19575,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_19581,a[2]=t3,a[3]=((C_word)li699),tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_19581(t5,t1);}
+
+/* loop in ##sys#force-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19581(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_19581,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19585,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4279 ##sys#gc */
+t3=*((C_word*)lf[18]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k19583 in loop in ##sys#force-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19585(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_19585,2,t0,t1);}
+t2=(C_word)C_slot(*((C_word*)lf[909]+1),C_fix(0));
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19594,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4282 ##sys#run-pending-finalizers */
+t4=*((C_word*)lf[910]+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);}}
+
+/* k19592 in k19583 in loop in ##sys#force-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19594(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4283 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_19581(t2,((C_word*)t0)[2]);}
+
+/* ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19492(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_19492,3,t0,t1,t2);}
+if(C_truep(((C_word*)((C_word*)t0)[4])[1])){
+if(C_truep(t2)){
+/* library.scm: 4275 ##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_word)C_block_size(*((C_word*)lf[909]+1));
+t5=(C_word)C_slot(*((C_word*)lf[909]+1),C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19512,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_word)C_fudge(C_fix(13)))){
+t7=(C_word)C_fudge(C_fix(26));
+t8=(C_word)C_fudge(C_fix(27));
+/* library.scm: 4265 print */
+t9=((C_word*)t0)[2];
+((C_proc9)C_retrieve_proc(t9))(9,t9,t6,lf[930],t5,lf[931],t7,lf[932],t8,lf[933]);}
+else{
+t7=t6;
+f_19512(2,t7,C_SCHEME_UNDEFINED);}}}
+
+/* k19510 in ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19512(C_word c,C_word t0,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_19512,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19515,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_19524,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word)li697),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_19524(t6,t2,C_fix(0));}
+
+/* doloop4896 in k19510 in ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19524(C_word t0,C_word 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_19524,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_word)C_fixnum_times(t2,C_fix(2));
+t4=(C_word)C_fixnum_plus(C_fix(1),t3);
+t5=(C_word)C_fixnum_plus(t4,C_fix(1));
+t6=(C_word)C_slot(*((C_word*)lf[909]+1),t5);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19540,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t8=(C_word)C_slot(*((C_word*)lf[909]+1),t4);
+/* g49024903 */
+t9=t6;
+((C_proc3)C_retrieve_proc(t9))(3,t9,t7,t8);}}
+
+/* k19538 in doloop4896 in k19510 in ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_19524(t3,((C_word*)t0)[2],t2);}
+
+/* k19513 in k19510 in ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19515(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_19515,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19518,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: 4272 vector-fill! */
+t3=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,*((C_word*)lf[909]+1),C_SCHEME_UNDEFINED);}
+
+/* k19516 in k19513 in k19510 in ##sys#run-pending-finalizers in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19518(C_word 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_set_i_slot(*((C_word*)lf[909]+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: 4275 ##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 k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19428(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_19428,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19432,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_fudge(C_fix(26));
+if(C_truep((C_word)C_fixnum_greaterp(t5,C_fix((C_word)C_max_pending_finalizers)))){
+t6=(C_word)C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
+if(C_truep((C_word)C_resize_pending_finalizers(t6))){
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19449,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_word)C_fixnum_times(C_fix(2),C_fix((C_word)C_max_pending_finalizers));
+t9=(C_word)C_fixnum_plus(t8,C_fix(1));
+/* library.scm: 4243 ##sys#grow-vector */
+f_9589(t7,*((C_word*)lf[909]+1),t9,C_SCHEME_UNDEFINED);}
+else{
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19473,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_fudge(C_fix(13)))){
+t8=(C_word)C_fudge(C_fix(26));
+/* library.scm: 4251 print */
+t9=((C_word*)t0)[2];
+((C_proc5)C_retrieve_proc(t9))(5,t9,t7,lf[928],t8,lf[929]);}
+else{
+/* library.scm: 4252 ##sys#force-finalizers */
+t8=*((C_word*)lf[743]+1);
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t4);}}}
+else{
+/* library.scm: 4253 ##sys#set-finalizer! */
+t6=*((C_word*)lf[923]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t1,t2,t3);}}
+
+/* k19471 in set-finalizer! in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19473(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4252 ##sys#force-finalizers */
+t2=*((C_word*)lf[743]+1);
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* k19447 in set-finalizer! in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19449(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[909]+1 /* (set! pending-finalizers ...) */,t1);
+if(C_truep((C_word)C_fudge(C_fix(13)))){
+t3=(C_word)C_fudge(C_fix(26));
+/* library.scm: 4247 print */
+t4=((C_word*)t0)[6];
+((C_proc7)C_retrieve_proc(t4))(7,t4,((C_word*)t0)[5],lf[925],t3,lf[926],C_fix((C_word)C_max_pending_finalizers),lf[927]);}
+else{
+/* library.scm: 4253 ##sys#set-finalizer! */
+t3=*((C_word*)lf[923]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k19430 in set-finalizer! in k19420 in k19416 in k19412 in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19432(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4253 ##sys#set-finalizer! */
+t2=*((C_word*)lf[923]+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 k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18958(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_18958,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(C_make_character(60),t2);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18971,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[495]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
+else{
+/* library.scm: 4109 old */
+t5=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t1,t2,t3);}}
+
+/* k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18971(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_18971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_18974,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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: 4112 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}
+
+/* k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18974(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_18974,2,t0,t1);}
+switch(t1){
+case C_make_character(60):
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18983,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: 4114 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_19096,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: 4139 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);
+default:
+/* library.scm: 4194 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[7],lf[920]);}}
+
+/* k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19096(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_19096,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19099,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: 4140 readln */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18866(t3,t2,((C_word*)t0)[5]);}
+
+/* k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19099(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_19099,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19102,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: 4141 open-output-string */
+t3=((C_word*)t0)[6];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19102(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_19102,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_19104,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=t3,a[5]=((C_word)li691),tmp=(C_word)a,a+=6,tmp);
+t5=(C_word)C_i_string_length(((C_word*)t0)[5]);
+t6=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19118,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_word)C_eqp(t5,C_fix(0));
+if(C_truep(t7)){
+/* library.scm: 4150 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t6,((C_word*)t0)[4],lf[918]);}
+else{
+t8=(C_word)C_fixnum_difference(t5,C_fix(1));
+t9=(C_word)C_i_string_ref(((C_word*)t0)[5],t8);
+t10=(C_word)C_eqp(t9,C_make_character(32));
+if(C_truep(t10)){
+if(C_truep(t10)){
+/* library.scm: 4154 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t6,((C_word*)t0)[4],lf[919]);}
+else{
+t11=C_SCHEME_UNDEFINED;
+t12=t6;
+f_19118(2,t12,t11);}}
+else{
+t11=(C_word)C_fixnum_difference(t5,C_fix(1));
+t12=(C_word)C_i_string_ref(((C_word*)t0)[5],t11);
+t13=(C_word)C_eqp(t12,C_make_character(9));
+if(C_truep(t13)){
+/* library.scm: 4154 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t6,((C_word*)t0)[4],lf[919]);}
+else{
+t14=C_SCHEME_UNDEFINED;
+t15=t6;
+f_19118(2,t15,t14);}}}}
+
+/* k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19118(C_word c,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_19118,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_19123,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)li693),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_19123(t5,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19123(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_19123,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|9,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]=((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: 4159 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
+
+/* k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[9],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_19127,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_make_character(10));
+t3=(C_truep(t2)?t2:(C_word)C_eqp(t1,C_SCHEME_END_OF_FILE));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_19139,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: 4162 get/clear-str */
+t5=((C_word*)t0)[4];
+f_19104(t5,t4);}
+else{
+t4=(C_word)C_eqp(t1,C_make_character(35));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_19297,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: 4182 ##sys#peek-char-0 */
+t6=*((C_word*)lf[497]+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_19360,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: 4192 ##sys#write-char-0 */
+t6=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t1,((C_word*)((C_word*)t0)[3])[1]);}}}
+
+/* k19358 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19360(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4193 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_19123(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19297(C_word c,C_word t0,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_19297,2,t0,t1);}
+switch(t1){
+case C_make_character(35):
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19306,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_19313,a[2]=((C_word*)t0)[5],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4185 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_19330,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: 4187 read-escaped-sexp */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18913(t3,t2,((C_word*)t0)[4],C_SCHEME_TRUE);
+default:
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19349,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: 4189 read-escaped-sexp */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18913(t3,t2,((C_word*)t0)[4],C_SCHEME_FALSE);}}
+
+/* k19347 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19349(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_19349,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19357,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: 4190 get/clear-str */
+t3=((C_word*)t0)[2];
+f_19104(t3,t2);}
+
+/* k19355 in k19347 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19357(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_19357,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+/* library.scm: 4189 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_19123(t4,((C_word*)t0)[2],t3);}
+
+/* k19328 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19330(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_19330,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19338,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: 4188 get/clear-str */
+t3=((C_word*)t0)[2];
+f_19104(t3,t2);}
+
+/* k19336 in k19328 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19338(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_19338,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[5]);
+t3=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t2);
+/* library.scm: 4187 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_19123(t4,((C_word*)t0)[2],t3);}
+
+/* k19311 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19313(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4185 ##sys#write-char-0 */
+t2=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k19304 in k19295 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19306(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4186 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_19123(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19139(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_19139,2,t0,t1);}
+t2=(C_word)C_eofp(((C_word*)t0)[7]);
+t3=(C_truep(t2)?t2:(C_word)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_19151,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_eofp(((C_word*)t0)[7]))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19274,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+t6=((C_word*)t0)[6];
+t7=(C_word)C_a_i_cons(&a,2,lf[913],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[914],t8);
+/* library.scm: 4079 ##sys#print-to-string */
+t10=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t5,t9);}
+else{
+t5=t4;
+f_19151(2,t5,C_SCHEME_UNDEFINED);}}
+else{
+t4=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+t5=(C_word)C_a_i_cons(&a,2,C_make_character(10),t4);
+/* library.scm: 4180 loop */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_19123(t6,((C_word*)t0)[5],t5);}}
+
+/* k19272 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19274(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4165 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19151(C_word c,C_word t0,C_word 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_19151,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_19162,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)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_19168,a[2]=t5,a[3]=((C_word)li692),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_19168(t7,t2,t3,C_SCHEME_END_OF_LIST,lf[917]);}
+
+/* loop2 in k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19168(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_19168,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19186,a[2]=t1,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4172 ##sys#print-to-string */
+t6=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
+else{
+t5=(C_word)C_i_car(t2);
+t6=(C_word)C_i_stringp(t5);
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19199,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_19199(t8,t6);}
+else{
+t8=(C_word)C_i_car(t2);
+t9=t7;
+f_19199(t9,(C_word)C_charp(t8));}}}
+
+/* k19197 in loop2 in k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19199(C_word t0,C_word t1){
+C_word 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_19199,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_i_car(((C_word*)t0)[6]);
+t4=(C_word)C_a_i_cons(&a,2,t3,((C_word*)t0)[5]);
+/* library.scm: 4174 loop2 */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_19168(t5,((C_word*)t0)[3],t2,t4,((C_word*)t0)[2]);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[6]);
+t3=(C_word)C_i_car(((C_word*)t0)[6]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_19249,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: 4179 ##sys#print-to-string */
+t5=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}}
+
+/* k19247 in k19197 in loop2 in k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19249(C_word c,C_word t0,C_word t1){
+C_word 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_19249,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,lf[93],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)[5],t5);
+t7=(C_word)C_a_i_cons(&a,2,lf[93],t6);
+/* library.scm: 4176 loop2 */
+t8=((C_word*)((C_word*)t0)[4])[1];
+f_19168(t8,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST,t7);}
+
+/* k19184 in loop2 in k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19186(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_19186,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],C_SCHEME_END_OF_LIST);
+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[93],t3));}
+
+/* k19160 in k19149 in k19137 in k19125 in loop in k19116 in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19162(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_19162,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[671],t2));}
+
+/* get/clear-str in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19104(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_19104,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19108,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4143 get-output-string */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k19106 in get/clear-str in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19108(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_19108,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_19112,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4144 open-output-string */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k19110 in k19106 in get/clear-str in k19100 in k19097 in k19094 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19112(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]);}
+
+/* k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18983(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_18983,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18986,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: 4115 open-output-string */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18986(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_18986,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_18989,a[2]=((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: 4116 readln */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_18866(t3,t2,((C_word*)t0)[5]);}
+
+/* k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18989(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_18989,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_word)C_i_string_length(t1);
+t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_18995,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_word)C_eqp(t4,C_fix(0));
+if(C_truep(t6)){
+/* library.scm: 4121 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t5,((C_word*)t0)[5],lf[915]);}
+else{
+t7=(C_word)C_fixnum_difference(t4,C_fix(1));
+t8=(C_word)C_i_string_ref(t1,t7);
+t9=(C_word)C_eqp(t8,C_make_character(32));
+if(C_truep(t9)){
+if(C_truep(t9)){
+/* library.scm: 4125 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t5,((C_word*)t0)[5],lf[916]);}
+else{
+t10=C_SCHEME_UNDEFINED;
+t11=t5;
+f_18995(2,t11,t10);}}
+else{
+t10=(C_word)C_fixnum_difference(t4,C_fix(1));
+t11=(C_word)C_i_string_ref(t1,t10);
+t12=(C_word)C_eqp(t11,C_make_character(9));
+if(C_truep(t12)){
+/* library.scm: 4125 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),t5,((C_word*)t0)[5],lf[916]);}
+else{
+t13=C_SCHEME_UNDEFINED;
+t14=t5;
+f_18995(2,t14,t13);}}}}
+
+/* k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18995(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_18995,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_19002,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 4128 readln */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_18866(t3,t2,((C_word*)t0)[6]);}
+
+/* k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19002(C_word c,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_19002,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_19004,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)li690),tmp=(C_word)a,a+=11,tmp));
+t5=((C_word*)t3)[1];
+f_19004(t5,((C_word*)t0)[2],t1);}
+
+/* doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_19004(C_word t0,C_word 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_19004,NULL,3,t0,t1,t2);}
+t3=(C_word)C_eofp(t2);
+t4=(C_truep(t3)?t3:(C_word)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_19017,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_word)C_eofp(t2))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19030,a[2]=((C_word*)t0)[6],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=((C_word*)t0)[9];
+t8=(C_word)C_a_i_cons(&a,2,lf[913],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,lf[914],t9);
+/* library.scm: 4079 ##sys#print-to-string */
+t11=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t6,t10);}
+else{
+/* library.scm: 4133 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_19033,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: 4135 ##sys#write-char-0 */
+t6=*((C_word*)lf[596]+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_19033(2,t7,t6);}}}
+
+/* k19031 in doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19033(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_19033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_19036,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: 4137 display */
+t3=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k19034 in k19031 in doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19036(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_19036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_19043,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4128 readln */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_18866(t3,t2,((C_word*)t0)[2]);}
+
+/* k19041 in k19034 in k19031 in doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19043(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_19004(t2,((C_word*)t0)[2],t1);}
+
+/* k19028 in doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19030(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4131 ##sys#read-warning */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[514]+1)))(4,*((C_word*)lf[514]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k19015 in doloop4753 in k19000 in k18993 in k18987 in k18984 in k18981 in k18972 in k18969 in ##sys#user-read-hook in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_19017(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 4133 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 k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18913(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_18913,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18917,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: 4098 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+else{
+t5=t4;
+f_18917(2,t5,C_SCHEME_UNDEFINED);}}
+
+/* k18915 in read-escaped-sexp in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18917(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_18917,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18920,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: 4099 read */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k18918 in k18915 in read-escaped-sexp in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18920(C_word c,C_word t0,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_18920,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18923,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_18928,a[2]=t4,a[3]=((C_word*)t0)[2],a[4]=((C_word)li688),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_18928(t6,t2);}
+else{
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}}
+
+/* loop in k18918 in k18915 in read-escaped-sexp in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18928(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_18928,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18932,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4103 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k18930 in loop in k18918 in k18915 in read-escaped-sexp in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18932(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))){
+/* library.scm: 4105 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[912]);}
+else{
+t2=(C_word)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: 4106 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_18928(t3,((C_word*)t0)[4]);}}}
+
+/* k18921 in k18918 in k18915 in read-escaped-sexp in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18923(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 k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18866(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_18866,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18870,a[2]=t1,a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4091 open-output-string */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k18868 in readln in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18870(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_18870,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18877,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: 4092 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k18875 in k18868 in readln in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18877(C_word c,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_18877,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_18879,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)li686),tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_18879(t5,((C_word*)t0)[2],t1);}
+
+/* doloop4688 in k18875 in k18868 in readln in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18879(C_word 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_18879,NULL,3,t0,t1,t2);}
+t3=(C_word)C_eofp(t2);
+t4=(C_truep(t3)?t3:(C_word)C_eqp(C_make_character(10),t2));
+if(C_truep(t4)){
+if(C_truep((C_word)C_charp(t2))){
+/* library.scm: 4094 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_18901,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 4096 ##sys#write-char-0 */
+t6=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,((C_word*)t0)[4]);}}
+
+/* k18899 in doloop4688 in k18875 in k18868 in readln in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18901(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_18901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18908,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 4092 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k18906 in k18899 in doloop4688 in k18875 in k18868 in readln in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18908(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_18879(t2,((C_word*)t0)[2],t1);}
+
+/* errno in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18844(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_18844,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 k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18840(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_18840,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 k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18819(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_18819,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(*((C_word*)lf[909]+1),C_fix(0));
+if(C_truep((C_word)C_fixnum_greaterp(t4,C_fix(0)))){
+/* library.scm: 4060 ##sys#run-pending-finalizers */
+t5=*((C_word*)lf[910]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t3);}
+else{
+/* library.scm: 4061 ##sys#context-switch */
+C_context_switch(3,0,t1,t3);}}
+
+/* ##sys#thread-yield! in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18797(C_word 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_18797,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18803,a[2]=((C_word)li680),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 4047 ##sys#call-with-current-continuation */
+C_call_cc(3,0,t1,t2);}
+
+/* a18802 in ##sys#thread-yield! in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18803(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_18803,3,t0,t1,t2);}
+t3=*((C_word*)lf[723]+1);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18812,a[2]=t2,a[3]=((C_word)li679),tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_i_setslot(t3,C_fix(1),t4);
+/* library.scm: 4051 ##sys#schedule */
+t6=*((C_word*)lf[905]+1);
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t1);}
+
+/* a18811 in a18802 in ##sys#thread-yield! in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18812(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_18812,2,t0,t1);}
+/* library.scm: 4050 return */
+t2=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,C_SCHEME_UNDEFINED);}
+
+/* ##sys#schedule in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18788(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_18788,2,t0,t1);}
+t2=(C_word)C_slot(*((C_word*)lf[723]+1),C_fix(1));
+/* g46544655 */
+t3=t2;
+((C_proc2)C_retrieve_proc(t3))(2,t3,t1);}
+
+/* ##sys#abandon-mutexes in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18736(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_18736,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(8));
+if(C_truep((C_word)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_18751,a[2]=((C_word)li676),tmp=(C_word)a,a+=3,tmp);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,f_18751(t3));}}
+
+/* loop4638 in ##sys#abandon-mutexes in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_18751(C_word t1){
+C_word tmp;
+C_word t2;
+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_i_set_i_slot(t2,C_fix(2),C_SCHEME_FALSE);
+t4=(C_word)C_i_set_i_slot(t2,C_fix(4),C_SCHEME_TRUE);
+t5=(C_word)C_i_set_i_slot(t2,C_fix(5),C_SCHEME_FALSE);
+t6=(C_word)C_i_set_i_slot(t2,C_fix(3),C_SCHEME_END_OF_LIST);
+t7=(C_word)C_slot(t1,C_fix(1));
+t10=t7;
+t1=t10;
+goto loop;}
+else{
+t2=C_SCHEME_UNDEFINED;
+return(t2);}}
+
+/* ##sys#make-mutex in k18725 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18730(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_18730,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,7,lf[903],t2,t3,C_SCHEME_END_OF_LIST,C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_UNDEFINED));}
+
+/* ##sys#make-thread in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18707(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_18707,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_18719,a[2]=t5,a[3]=t4,a[4]=t3,a[5]=t2,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+t7=(C_word)C_block_size(*((C_word*)lf[489]+1));
+/* library.scm: 4010 ##sys#grow-vector */
+f_9589(t6,*((C_word*)lf[489]+1),t7,C_SCHEME_FALSE);}
+
+/* k18717 in ##sys#make-thread in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18719(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_18719,2,t0,t1);}
+t2=(C_word)C_a_i_vector(&a,6,*((C_word*)lf[403]+1),*((C_word*)lf[423]+1),*((C_word*)lf[424]+1),*((C_word*)lf[425]+1),*((C_word*)lf[899]+1),t1);
+t3=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_record(&a,14,lf[651],((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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18704(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_18704,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_halt(lf[900]));}
+
+/* ##sys#foreign-unsigned-integer-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_word)C_i_foreign_unsigned_integer_argumentp(t2));}
+
+/* ##sys#foreign-integer-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_word)C_i_foreign_integer_argumentp(t2));}
+
+/* ##sys#foreign-tagged-pointer-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18694(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_18694,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_foreign_tagged_pointer_argumentp(t2,t3));}
+
+/* ##sys#foreign-pointer-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+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=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_pointer_argumentp(t2));}
+
+/* ##sys#foreign-symbol-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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,(C_word)C_i_foreign_symbol_argumentp(t2));}
+
+/* ##sys#foreign-string-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18685(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_18685,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_string_argumentp(t2));}
+
+/* ##sys#foreign-number-vector-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18682(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_18682,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_foreign_number_vector_argumentp(t2,t3));}
+
+/* ##sys#foreign-block-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18679(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_18679,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_block_argumentp(t2));}
+
+/* ##sys#foreign-flonum-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18676(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_18676,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_flonum_argumentp(t2));}
+
+/* ##sys#foreign-fixnum-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18673(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_18673,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_fixnum_argumentp(t2));}
+
+/* ##sys#foreign-char-argument in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18670(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_18670,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_foreign_char_argumentp(t2));}
+
+/* ##sys#block-pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18664(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_18664,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18668,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3970 ##sys#make-pointer */
+t4=*((C_word*)lf[857]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k18666 in ##sys#block-pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18668(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_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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18661(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_18661,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub4590(C_SCHEME_UNDEFINED,t2));}
+
+/* ##sys#compare-bytes in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18658(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_18658,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_substring_compare(t2,t3,t4,t5,t6));}
+
+/* ##sys#copy-words in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18651(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_18651,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_fixnum_plus(t4,t6);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_subvector_copy(t2,t3,t4,t7,t5));}
+
+/* ##sys#copy-bytes in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18644(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_18644,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_fixnum_plus(t4,t6);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_substring_copy(t2,t3,t4,t7,t5));}
+
+/* ##sys#symbol-has-toplevel-binding? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18626(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_18626,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_slot(lf[618],C_fix(0));
+t5=(C_word)C_eqp(t3,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_not(t5));}
+
+/* ##sys#vector->closure! in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18623(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_18623,4,t0,t1,t2,t3);}
+t4=(C_word)C_vector_to_closure(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_update_pointer(t3,t2));}
+
+/* ##sys#peek-and-free-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18585(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_18585,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18589,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_18594,a[2]=t6,a[3]=t2,a[4]=t3,a[5]=((C_word)li653),tmp=(C_word)a,a+=6,tmp));
+t8=((C_word*)t6)[1];
+f_18594(t8,t4,C_fix(0));}
+
+/* loop in ##sys#peek-and-free-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18594(C_word t0,C_word 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_18594,NULL,3,t0,t1,t2);}
+t3=(C_truep(((C_word*)t0)[4])?(C_word)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_18604,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_word)C_a_i_bytevector(&a,1,C_fix(3));
+t8=(C_truep(t5)?(C_word)C_i_foreign_pointer_argumentp(t5):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t10=(C_word)stub4535(t7,t8,t9);
+/* ##sys#peek-c-string */
+t11=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t4,t10,C_fix(0));}}
+
+/* k18602 in loop in ##sys#peek-and-free-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18604(C_word c,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_18604,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_free_sptr(((C_word*)t0)[5],((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18614,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 3935 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_18594(t5,t3,t4);}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}}
+
+/* k18612 in k18602 in loop in ##sys#peek-and-free-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18614(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_18614,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));}
+
+/* k18587 in ##sys#peek-and-free-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18589(C_word c,C_word 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_word)C_i_foreign_pointer_argumentp(t2);
+t4=(C_word)stub4543(C_SCHEME_UNDEFINED,t3);
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t1);}
+else{
+t3=(C_word)stub4543(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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18524(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_18524,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_18530,a[2]=t2,a[3]=t5,a[4]=t3,a[5]=((C_word)li651),tmp=(C_word)a,a+=6,tmp));
+t7=((C_word*)t5)[1];
+f_18530(t7,t1,C_fix(0));}
+
+/* loop in ##sys#peek-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_18530(C_word t0,C_word 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_18530,NULL,3,t0,t1,t2);}
+t3=(C_truep(((C_word*)t0)[4])?(C_word)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_18540,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_word)C_a_i_bytevector(&a,1,C_fix(3));
+t8=(C_truep(t5)?(C_word)C_i_foreign_pointer_argumentp(t5):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t10=(C_word)stub4516(t7,t8,t9);
+/* ##sys#peek-c-string */
+t11=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t11+1)))(4,t11,t4,t10,C_fix(0));}}
+
+/* k18538 in loop in ##sys#peek-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18540(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_18540,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18550,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));
+/* library.scm: 3922 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_18530(t4,t2,t3);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_END_OF_LIST);}}
+
+/* k18548 in k18538 in loop in ##sys#peek-c-string-list in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18550(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_18550,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));}
+
+/* ##sys#poke-double in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18504(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_18504,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_poke_double(t2,t3,t4));}
+
+/* ##sys#poke-integer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18501(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_18501,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_poke_integer(t2,t3,t4));}
+
+/* ##sys#poke-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18494(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_18494,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18499,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3909 ##sys#make-c-string */
+t6=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
+
+/* k18497 in ##sys#poke-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18499(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_word)C_poke_c_string(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* ##sys#peek-and-free-nonnull-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18488(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_18488,4,t0,t1,t2,t3);}
+t4=(C_word)C_fetch_c_strlen(t2,t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18492,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3903 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
+
+/* k18490 in ##sys#peek-and-free-nonnull-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18492(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_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
+t3=(C_word)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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18472(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_18472,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_null_pointerp(t2))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_fetch_c_strlen(t2,t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18482,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3896 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}}
+
+/* k18480 in ##sys#peek-and-free-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18482(C_word 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_peek_c_string(((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3]);
+t3=(C_word)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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18466(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_18466,4,t0,t1,t2,t3);}
+t4=(C_word)C_fetch_c_strlen(t2,t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18470,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3889 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
+
+/* k18468 in ##sys#peek-nonnull-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18470(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_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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18450(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_18450,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_null_pointerp(t2))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_fetch_c_strlen(t2,t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_18460,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3883 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}}
+
+/* k18458 in ##sys#peek-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18460(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_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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18447(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_18447,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_f64peek(&a,2,t2,t3));}
+
+/* ##sys#vector->structure! in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18444(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_18444,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_vector_to_structure(t2));}
+
+/* ##sys#peek-byte in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18441(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_18441,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_peek_byte(t2,t3));}
+
+/* ##sys#peek-fixnum in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18438(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_18438,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_peek_fixnum(t2,t3));}
+
+/* ##sys#make-c-string in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18426(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_18426,3,t0,t1,t2);}
+t3=(C_word)C_a_i_string(&a,1,(C_word)C_make_character((C_word)C_unfix(C_fix(0))));
+/* library.scm: 3866 ##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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18419(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_18419,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_unsigned_int_to_num(&a,1,t3));}
+
+/* ##sys#address->pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18413(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_18413,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_18417,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3857 ##sys#make-pointer */
+t4=*((C_word*)lf[857]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k18415 in ##sys#address->pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18417(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_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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_18403,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18411,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3854 ##sys#pointer->address */
+t4=*((C_word*)lf[675]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k18409 in ##sys#null-pointer? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18411(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_eqp(C_fix(0),t1));}
+
+/* ##sys#null-pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18397(C_word 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_18397,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_18401,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3849 ##sys#make-pointer */
+t3=*((C_word*)lf[857]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k18399 in ##sys#null-pointer in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18401(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_update_pointer(C_fix(0),t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
+
+/* ##sys#locative? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18394(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_18394,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_locativep(t2));}
+
+/* ##sys#block-address in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18391(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_18391,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_block_address(&a,1,t2));}
+
+/* ##sys#permanent? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18388(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_18388,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_permanentp(t2));}
+
+/* ##sys#string->pbytevector in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18385(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_18385,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_string_to_pbytevector(t2));}
+
+/* ##sys#bytevector? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18382(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_18382,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_bytevectorp(t2));}
+
+/* ##sys#set-pointer-address! in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18379(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_18379,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_update_pointer(t3,t2));}
+
+/* ##sys#pointer? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18376(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_18376,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_anypointerp(t2));}
+
+/* ##sys#size in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18371(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_18371,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_block_size(t2));}
+
+/* ##sys#slot in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18368(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_18368,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(t2,t3));}
+
+/* ##sys#generic-structure? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18365(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_18365,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_structurep(t2));}
+
+/* ##sys#structure? in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18362(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_18362,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_structurep(t2,t3));}
+
+/* ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17976(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_17976r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_17976r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_17976r(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_word)C_i_car(t4);
+t6=(C_word)C_i_cadr(t4);
+t7=(C_word)C_i_caddr(t4);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17999,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_18010,a[2]=t5,a[3]=t8,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3779 ##sys#number->string */
+t10=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t6);
+case C_fix(2):
+t5=(C_word)C_i_car(t4);
+t6=(C_word)C_i_cadr(t4);
+t7=(C_word)C_i_caddr(t4);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18036,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_18047,a[2]=t5,a[3]=t8,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3788 ##sys#number->string */
+t10=*((C_word*)lf[314]+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[818],t4);
+case C_fix(4):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[759],t3,lf[819],t4);
+case C_fix(5):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[820],t4);
+case C_fix(6):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[821],t4);
+case C_fix(7):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[756],t3,lf[822],t4);
+case C_fix(8):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[149],t3,lf[823],t4);
+case C_fix(9):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[824],t4);
+case C_fix(10):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[768],t3,lf[825],t4);
+case C_fix(11):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[826],t4);
+case C_fix(12):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[827],t4);
+case C_fix(13):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[828],t4);
+case C_fix(14):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[829],t4);
+case C_fix(15):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[830],t4);
+case C_fix(16):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[831],t4);
+case C_fix(17):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[832],t4);
+case C_fix(18):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[833],t4);
+case C_fix(19):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[834],t4);
+case C_fix(20):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[835],t4);
+case C_fix(21):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[836],t4);
+case C_fix(22):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[837],t4);
+case C_fix(23):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[766],t3,lf[838],t4);
+case C_fix(24):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[839],t4);
+case C_fix(25):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[840],t4);
+case C_fix(26):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[841],t4);
+case C_fix(27):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[842],t4);
+case C_fix(28):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[843],t4);
+case C_fix(29):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[844],t4);
+case C_fix(30):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[845],t4);
+case C_fix(31):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[846],t4);
+case C_fix(32):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[847],t4);
+case C_fix(33):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[759],t3,lf[848],t4);
+case C_fix(34):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[759],t3,lf[849],t4);
+case C_fix(35):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[850],t4);
+case C_fix(36):
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[56],t3,lf[851],t4);
+default:
+C_apply(7,0,t1,*((C_word*)lf[9]+1),lf[759],t3,lf[852],t4);}}
+
+/* k18045 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18047(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_18047,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18051,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3789 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k18049 in k18045 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18051(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3788 string-append */
+t2=((C_word*)t0)[4];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[816],((C_word*)t0)[2],lf[817],t1);}
+
+/* k18034 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18036(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_18036,2,t0,t1);}
+if(C_truep(((C_word*)t0)[4])){
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+C_apply(7,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[768],((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[768],((C_word*)t0)[2],t1);}}
+
+/* k18008 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18010(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_18010,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_18014,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3780 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k18012 in k18008 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_18014(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3779 string-append */
+t2=((C_word*)t0)[4];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[814],((C_word*)t0)[2],lf[815],t1);}
+
+/* k17997 in ##sys#error-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17999(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17999,2,t0,t1);}
+if(C_truep(((C_word*)t0)[4])){
+t2=(C_word)C_a_i_list(&a,1,((C_word*)t0)[4]);
+C_apply(7,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[768],((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[768],((C_word*)t0)[2],t1);}}
+
+/* get-condition-property in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17967(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_17967r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest(a,C_rest_count(0));
+f_17967r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_17967r(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_17971,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3764 condition-property-accessor */
+t7=((C_word*)t0)[2];
+((C_proc5)C_retrieve_proc(t7))(5,t7,t6,t3,t4,t5);}
+
+/* k17969 in get-condition-property in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17971(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g44014402 */
+t2=t1;
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* condition-property-accessor in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17921(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*)tr4rv,(void*)f_17921r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_17921r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_17921r(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_word)C_vemptyp(t4);
+t6=(C_word)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_17929,a[2]=t4,a[3]=t3,a[4]=t5,a[5]=t6,a[6]=t2,a[7]=((C_word)li616),tmp=(C_word)a,a+=8,tmp));}
+
+/* f_17929 in condition-property-accessor in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17929(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_17929,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[649]);
+t4=(C_word)C_slot(t2,C_fix(1));
+if(C_truep((C_word)C_i_memv(((C_word*)t0)[6],t4))){
+t5=(C_word)C_slot(t2,C_fix(2));
+t6=(C_word)C_i_member(((C_word*)t0)[5],t5);
+if(C_truep(t6)){
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_i_cadr(t6));}
+else{
+if(C_truep(((C_word*)t0)[4])){
+/* library.scm: 3756 ##sys#signal-hook */
+t7=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,lf[56],lf[811],lf[812],((C_word*)t0)[3]);}
+else{
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)C_i_vector_ref(((C_word*)t0)[2],C_fix(0)));}}}
+else{
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,C_SCHEME_FALSE);}}
+
+/* condition-predicate in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17903(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_17903,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_17905,a[2]=t2,a[3]=((C_word)li614),tmp=(C_word)a,a+=4,tmp));}
+
+/* f_17905 in condition-predicate in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17905(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_17905,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure(t2,lf[649]);
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(C_word)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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17897(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_17897,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[649]));}
+
+/* make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17761(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_17761r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_17761r(t0,t1,t2,t3);}}
+
+static void C_ccall f_17761r(C_word t0,C_word 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_word)C_a_i_cons(&a,2,t2,t3);
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17869,a[2]=((C_word)li609),tmp=(C_word)a,a+=3,tmp);
+t6=f_17869(t4);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17775,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_17827,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_17829,a[2]=t9,a[3]=t14,a[4]=t11,a[5]=((C_word)li611),tmp=(C_word)a,a+=6,tmp));
+t16=((C_word*)t14)[1];
+f_17829(t16,t12,t4);}
+
+/* loop4326 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17829(C_word t0,C_word 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_17829,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_slot(t3,C_fix(1));
+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));
+/* loop43264339 */
+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));
+/* loop43264339 */
+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);}}
+
+/* k17825 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17827(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[808]+1),t1);}
+
+/* k17773 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17775(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_17775,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17779,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_17783,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_17785,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li610),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_17785(t11,t7,((C_word*)t0)[2]);}
+
+/* loop4350 in k17773 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17785(C_word t0,C_word 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_17785,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_slot(t3,C_fix(2));
+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));
+/* loop43504363 */
+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));
+/* loop43504363 */
+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);}}
+
+/* k17781 in k17773 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17783(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[808]+1),t1);}
+
+/* k17777 in k17773 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17779(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_17779,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[649],((C_word*)t0)[2],t1));}
+
+/* loop4312 in make-composite-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_17869(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_i_pairp(t1))){
+t2=(C_word)C_slot(t1,C_fix(0));
+t3=(C_word)C_i_check_structure_2(t2,lf[649],lf[807]);
+t4=(C_word)C_slot(t1,C_fix(1));
+t7=t4;
+t1=t7;
+goto loop;}
+else{
+t2=C_SCHEME_UNDEFINED;
+return(t2);}}
+
+/* make-property-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17711(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_17711r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_17711r(t0,t1,t2,t3);}}
+
+static void C_ccall f_17711r(C_word t0,C_word 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_word)C_a_i_list(&a,1,t2);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17723,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_17725,a[2]=t7,a[3]=t2,a[4]=((C_word)li607),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_17725(t9,t5,t3);}
+
+/* loop in make-property-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17725(C_word t0,C_word 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_17725,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_a_i_cons(&a,2,((C_word*)t0)[3],t3);
+t5=(C_word)C_i_cadr(t2);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17751,a[2]=t4,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+t7=(C_word)C_i_cddr(t2);
+/* library.scm: 3731 loop */
+t9=t6;
+t10=t7;
+t1=t9;
+t2=t10;
+goto loop;}}
+
+/* k17749 in loop in make-property-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17751(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_17751,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));}
+
+/* k17721 in make-property-condition in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17723(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_17723,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[649],((C_word*)t0)[2],t1));}
+
+/* current-exception-handler in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17708(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_17708,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[780]+1));}
+
+/* with-exception-handler in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17694(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_17694,4,t0,t1,t2,t3);}
+t4=*((C_word*)lf[780]+1);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17700,a[2]=t2,a[3]=((C_word)li603),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17704,a[2]=t4,a[3]=((C_word)li604),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3718 ##sys#dynamic-wind */
+t7=*((C_word*)lf[405]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t1,t5,t3,t6);}
+
+/* a17703 in with-exception-handler in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17704(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_17704,2,t0,t1);}
+t2=C_mutate((C_word*)lf[780]+1 /* (set! current-exception-handler ...) */,((C_word*)t0)[2]);
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* a17699 in with-exception-handler in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17700(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_17700,2,t0,t1);}
+t2=C_mutate((C_word*)lf[780]+1 /* (set! current-exception-handler ...) */,((C_word*)t0)[2]);
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* f_17534 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17534(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_17534,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17538,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_structurep(t2,lf[649]))){
+t4=C_mutate((C_word*)lf[784]+1 /* (set! last-exception ...) */,t2);
+t5=(C_word)C_slot(t2,C_fix(1));
+if(C_truep((C_word)C_i_memq(lf[787],t5))){
+t6=(C_word)C_slot(t2,C_fix(2));
+t7=(C_word)C_i_member(lf[788],t6);
+t8=(C_word)C_i_member(lf[789],t6);
+t9=(C_word)C_i_member(lf[790],t6);
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17577,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+t11=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17587,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: 3686 ##sys#error-handler */
+t12=*((C_word*)lf[736]+1);
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,t11);}
+else{
+t6=(C_word)C_slot(t5,C_fix(0));
+t7=(C_word)C_eqp(lf[795],t6);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17648,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3703 ##sys#print */
+t9=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t8,lf[796],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+else{
+t8=(C_word)C_slot(t5,C_fix(0));
+t9=(C_word)C_eqp(lf[797],t8);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17663,a[2]=t2,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3706 ##sys#error-handler */
+t11=*((C_word*)lf[736]+1);
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,t10);}
+else{
+t10=(C_word)C_a_i_list(&a,2,lf[800],t2);
+t11=(C_word)C_a_i_record(&a,3,lf[649],lf[801],t10);
+/* library.scm: 3710 ##sys#abort */
+t12=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t12+1)))(3,t12,t1,t11);}}}}
+else{
+t4=(C_word)C_a_i_list(&a,2,lf[802],t2);
+t5=(C_word)C_a_i_record(&a,3,lf[649],lf[803],t4);
+/* library.scm: 3710 ##sys#abort */
+t6=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}}
+
+/* k17661 */
+static void C_ccall f_17663(C_word c,C_word t0,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_17663,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17666,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t4=(C_word)C_i_member(lf[798],t3);
+t5=(C_word)C_i_cadr(t4);
+/* g42884289 */
+t6=t1;
+((C_proc4)C_retrieve_proc(t6))(4,t6,t2,lf[799],t5);}
+
+/* k17664 in k17661 */
+static void C_ccall f_17666(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17669,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3709 ##sys#reset-handler */
+t3=*((C_word*)lf[7]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k17667 in k17664 in k17661 */
+static void C_ccall f_17669(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g42904291 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* k17646 */
+static void C_ccall f_17648(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17648,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17651,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3704 ##sys#reset-handler */
+t3=*((C_word*)lf[7]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k17649 in k17646 */
+static void C_ccall f_17651(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g42854286 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* k17585 */
+static void C_ccall f_17587(C_word c,C_word t0,C_word 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_17587,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17591,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_word)C_i_cadr(((C_word*)t0)[4]);
+t4=(C_truep(((C_word*)t0)[3])?(C_word)C_i_cadr(((C_word*)t0)[3]):C_SCHEME_FALSE);
+t5=(C_truep(t4)?(C_word)C_i_symbolp(t4):C_SCHEME_FALSE);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17617,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3692 ##sys#symbol->qualified-string */
+t7=*((C_word*)lf[325]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,t4);}
+else{
+t6=t2;
+f_17591(2,t6,t3);}}
+else{
+t3=t2;
+f_17591(2,t3,lf[794]);}}
+
+/* k17615 in k17585 */
+static void C_ccall f_17617(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(((C_word*)t0)[4]))){
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 3691 string-append */
+t3=((C_word*)t0)[3];
+((C_proc6)C_retrieve_proc(t3))(6,t3,((C_word*)t0)[2],lf[791],t1,lf[792],t2);}
+else{
+if(C_truep((C_word)C_i_stringp(((C_word*)t0)[4]))){
+/* library.scm: 3691 string-append */
+t2=((C_word*)t0)[3];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[2],lf[791],t1,lf[792],((C_word*)t0)[4]);}
+else{
+/* library.scm: 3691 string-append */
+t2=((C_word*)t0)[3];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[2],lf[791],t1,lf[792],lf[793]);}}}
+
+/* k17589 in k17585 */
+static void C_ccall f_17591(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)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);}}
+
+/* k17575 */
+static void C_ccall f_17577(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17577,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17580,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3701 ##sys#reset-handler */
+t3=*((C_word*)lf[7]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k17578 in k17575 */
+static void C_ccall f_17580(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g42824283 */
+t2=t1;
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* k17536 */
+static void C_ccall f_17538(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_17538,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,2,lf[785],((C_word*)t0)[3]);
+t3=(C_word)C_a_i_record(&a,3,lf[649],lf[786],t2);
+/* library.scm: 3710 ##sys#abort */
+t4=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
+
+/* ##sys#signal in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17525(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_17525,3,t0,t1,t2);}
+/* library.scm: 3666 ##sys#current-exception-handler */
+t3=*((C_word*)lf[780]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
+
+/* ##sys#abort in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17508(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_17508,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17512,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3656 ##sys#current-exception-handler */
+t4=*((C_word*)lf[780]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k17510 in ##sys#abort in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17512(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_17512,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,6,lf[775],lf[776],lf[777],C_SCHEME_END_OF_LIST,lf[778],C_SCHEME_FALSE);
+t3=(C_word)C_a_i_record(&a,3,lf[649],lf[779],t2);
+/* library.scm: 3657 ##sys#abort */
+t4=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
+
+/* ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17285(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_17285r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_17285r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_17285r(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_word)C_dbg_hook(C_SCHEME_FALSE);
+t7=t2;
+t8=(C_word)C_eqp(t7,lf[733]);
+if(C_truep(t8)){
+t9=(C_word)C_a_i_record(&a,3,lf[649],lf[746],C_SCHEME_END_OF_LIST);
+/* library.scm: 3609 ##sys#abort */
+t10=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t1,t9);}
+else{
+t9=(C_word)C_eqp(t7,lf[13]);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17308,a[2]=t5,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3615 ##sys#print */
+t11=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t11+1)))(5,t11,t10,lf[749],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+else{
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17373,a[2]=t1,a[3]=t2,a[4]=t4,a[5]=t5,tmp=(C_word)a,a+=6,tmp);
+t11=(C_word)C_i_symbolp(((C_word*)t5)[1]);
+t12=(C_truep(t11)?(C_word)C_i_nullp(t4):C_SCHEME_FALSE);
+if(C_truep(t12)){
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17500,a[2]=t10,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3628 ##sys#symbol->string */
+t14=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t14+1)))(3,t14,t13,((C_word*)t5)[1]);}
+else{
+t13=t10;
+f_17373(t13,C_SCHEME_UNDEFINED);}}}}
+
+/* k17498 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17500(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_17373(t3,t2);}
+
+/* k17371 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17373(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_17373,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17376,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_i_not(((C_word*)((C_word*)t0)[5])[1]);
+if(C_truep(t3)){
+t4=t2;
+f_17376(t4,(C_truep(t3)?(C_word)C_i_pairp(((C_word*)t0)[4]):C_SCHEME_FALSE));}
+else{
+t4=(C_word)C_i_symbolp(((C_word*)((C_word*)t0)[5])[1]);
+t5=t2;
+f_17376(t5,(C_truep(t4)?(C_word)C_i_pairp(((C_word*)t0)[4]):C_SCHEME_FALSE));}}
+
+/* k17374 in k17371 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17376(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_17376,NULL,2,t0,t1);}
+t2=(C_truep(t1)?((C_word*)((C_word*)t0)[5])[1]:C_SCHEME_FALSE);
+t3=(C_truep(t1)?(C_word)C_slot(((C_word*)t0)[4],C_fix(0)):((C_word*)((C_word*)t0)[5])[1]);
+t4=(C_truep(t1)?(C_word)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_17396,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=t4,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+t7=(C_word)C_eqp(t5,lf[56]);
+if(C_truep(t7)){
+t8=t6;
+f_17396(t8,lf[753]);}
+else{
+t8=(C_word)C_eqp(t5,lf[516]);
+if(C_truep(t8)){
+t9=t6;
+f_17396(t9,lf[754]);}
+else{
+t9=(C_word)C_eqp(t5,lf[149]);
+if(C_truep(t9)){
+t10=t6;
+f_17396(t10,lf[755]);}
+else{
+t10=(C_word)C_eqp(t5,lf[756]);
+if(C_truep(t10)){
+t11=t6;
+f_17396(t11,lf[757]);}
+else{
+t11=(C_word)C_eqp(t5,lf[432]);
+if(C_truep(t11)){
+t12=t6;
+f_17396(t12,lf[758]);}
+else{
+t12=(C_word)C_eqp(t5,lf[759]);
+if(C_truep(t12)){
+t13=t6;
+f_17396(t13,lf[760]);}
+else{
+t13=(C_word)C_eqp(t5,lf[80]);
+if(C_truep(t13)){
+t14=t6;
+f_17396(t14,lf[761]);}
+else{
+t14=(C_word)C_eqp(t5,lf[762]);
+if(C_truep(t14)){
+t15=t6;
+f_17396(t15,lf[763]);}
+else{
+t15=(C_word)C_eqp(t5,lf[764]);
+if(C_truep(t15)){
+t16=t6;
+f_17396(t16,lf[765]);}
+else{
+t16=(C_word)C_eqp(t5,lf[766]);
+if(C_truep(t16)){
+t17=t6;
+f_17396(t17,lf[767]);}
+else{
+t17=(C_word)C_eqp(t5,lf[768]);
+if(C_truep(t17)){
+t18=t6;
+f_17396(t18,lf[769]);}
+else{
+t18=(C_word)C_eqp(t5,lf[770]);
+if(C_truep(t18)){
+t19=t6;
+f_17396(t19,lf[771]);}
+else{
+t19=(C_word)C_eqp(t5,lf[772]);
+t20=t6;
+f_17396(t20,(C_truep(t19)?lf[773]:lf[774]));}}}}}}}}}}}}}
+
+/* k17394 in k17374 in k17371 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17396(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_17396,NULL,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,6,lf[750],((C_word*)t0)[5],lf[751],((C_word*)t0)[4],lf[752],((C_word*)t0)[3]);
+t3=(C_word)C_a_i_record(&a,3,lf[649],t1,t2);
+/* library.scm: 3633 ##sys#abort */
+t4=*((C_word*)lf[747]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
+
+/* k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17308(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_17308,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17311,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3616 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)((C_word*)t0)[2])[1],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}
+
+/* k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17311(C_word c,C_word t0,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_17311,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17314,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_i_nullp(((C_word*)t0)[2]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17357,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t3)){
+t5=t4;
+f_17357(t5,t3);}
+else{
+t5=(C_word)C_i_length(((C_word*)t0)[2]);
+t6=t4;
+f_17357(t6,(C_word)C_fixnum_greaterp(t5,C_fix(1)));}}
+
+/* k17355 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17357(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 3618 ##sys#write-char-0 */
+t2=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[425]+1));}
+else{
+/* library.scm: 3619 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[748],C_SCHEME_FALSE,*((C_word*)lf[425]+1));}}
+
+/* k17312 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17314(C_word c,C_word t0,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_17314,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17317,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_17322,a[2]=t4,a[3]=((C_word)li598),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_17322(t6,t2,((C_word*)t0)[2]);}
+
+/* loop4207 in k17312 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17322(C_word t0,C_word 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_17322,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_17340,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_17334,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3622 ##sys#print */
+t6=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,t4,C_SCHEME_TRUE,*((C_word*)lf[425]+1));}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k17332 in loop4207 in k17312 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17334(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3623 ##sys#write-char-0 */
+t2=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),*((C_word*)lf[425]+1));}
+
+/* k17338 in loop4207 in k17312 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17340(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_17322(t3,((C_word*)t0)[2],t2);}
+
+/* k17315 in k17312 in k17309 in k17306 in ##sys#signal-hook in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17317(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3625 ##sys#flush-output */
+t2=*((C_word*)lf[475]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],*((C_word*)lf[425]+1));}
+
+/* on-exit in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17273(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_17273,3,t0,t1,t2);}
+t3=*((C_word*)lf[742]+1);
+t4=C_mutate((C_word*)lf[742]+1 /* (set! cleanup-before-exit ...) */,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17276,a[2]=t3,a[3]=t2,a[4]=((C_word)li596),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 k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17276(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_17276,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17280,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3600 old */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k17278 in ##sys#cleanup-before-exit in on-exit in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17280(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3600 thunk */
+t2=((C_word*)t0)[3];
+((C_proc2)C_retrieve_proc(t2))(2,t2,((C_word*)t0)[2]);}
+
+/* f_17252 in k17248 in k17241 in k17237 in k17233 in k17229 in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17252(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_17252,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17256,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_fudge(C_fix(13)))){
+/* library.scm: 3594 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[744],C_SCHEME_FALSE,*((C_word*)lf[424]+1));}
+else{
+t3=t2;
+f_17256(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k17254 */
+static void C_ccall f_17256(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_17256,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17262,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3595 ffp */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k17260 in k17254 */
+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 *a;
+if(C_truep(t1)){
+/* library.scm: 3595 ##sys#force-finalizers */
+t2=*((C_word*)lf[743]+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 k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17204(C_word c,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_17204,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_17207,a[2]=((C_word)li593),tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_eqp(*((C_word*)lf[723]+1),*((C_word*)lf[734]+1));
+if(C_truep(t3)){
+t4=t1;
+/* library.scm: 3514 ##sys#signal-hook */
+t5=*((C_word*)lf[9]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,lf[733],C_SCHEME_FALSE);}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_setslot(*((C_word*)lf[734]+1),C_fix(1),t2));}}
+
+/* break in ##sys#user-interrupt-hook in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17207(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_17207,2,t0,t1);}
+/* library.scm: 3514 ##sys#signal-hook */
+t2=*((C_word*)lf[9]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,t1,lf[733],C_SCHEME_FALSE);}
+
+/* print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17090(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_17090r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_17090r(t0,t1,t2);}}
+
+static void C_ccall f_17090r(C_word t0,C_word 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_17092,a[2]=((C_word)li587),tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17110,a[2]=t3,a[3]=((C_word)li588),tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17115,a[2]=t4,a[3]=((C_word)li589),tmp=(C_word)a,a+=4,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17120,a[2]=t5,a[3]=((C_word)li590),tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17125,a[2]=t6,a[3]=((C_word)li591),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+/* def-port40664091 */
+t8=t7;
+f_17125(t8,t1);}
+else{
+t8=(C_word)C_i_car(t2);
+t9=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t9))){
+/* def-start40674089 */
+t10=t6;
+f_17120(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))){
+/* def-thread40684086 */
+t12=t5;
+f_17115(t12,t1,t8,t10);}
+else{
+t12=(C_word)C_i_car(t11);
+t13=(C_word)C_i_cdr(t11);
+if(C_truep((C_word)C_i_nullp(t13))){
+/* def-header40694082 */
+t14=t4;
+f_17110(t14,t1,t8,t10,t12);}
+else{
+t14=(C_word)C_i_car(t13);
+t15=(C_word)C_i_cdr(t13);
+if(C_truep((C_word)C_i_nullp(t15))){
+/* body40644074 */
+f_17092(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-port4066 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17125(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_17125,NULL,2,t0,t1);}
+/* def-start40674089 */
+t2=((C_word*)t0)[2];
+f_17120(t2,t1,*((C_word*)lf[424]+1));}
+
+/* def-start4067 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17120(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_17120,NULL,3,t0,t1,t2);}
+/* def-thread40684086 */
+t3=((C_word*)t0)[2];
+f_17115(t3,t1,t2,C_fix(0));}
+
+/* def-thread4068 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17115(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_17115,NULL,4,t0,t1,t2,t3);}
+/* def-header40694082 */
+t4=((C_word*)t0)[2];
+f_17110(t4,t1,t2,t3,*((C_word*)lf[723]+1));}
+
+/* def-header4069 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17110(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_17110,NULL,5,t0,t1,t2,t3,t4);}
+/* body40644074 */
+f_17092(t1,t2,t3,t4,lf[730]);}
+
+/* body4064 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17092(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_17092,NULL,5,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17096,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t5,a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+/* library.scm: 3503 ##sys#check-port */
+t7=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t2,lf[729]);}
+
+/* k17094 in body4064 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17096(C_word c,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_17096,2,t0,t1);}
+t2=(C_word)C_i_check_exact_2(((C_word*)t0)[6],lf[729]);
+t3=(C_word)C_i_check_string_2(((C_word*)t0)[5],lf[729]);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17109,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: 3506 ##sys#get-call-chain */
+t5=*((C_word*)lf[721]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,((C_word*)t0)[6],((C_word*)t0)[2]);}
+
+/* k17107 in k17094 in body4064 in print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17109(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3506 ##sys#really-print-call-chain */
+t2=*((C_word*)lf[724]+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 k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17001(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_17001,5,t0,t1,t2,t3,t4);}
+if(C_truep((C_word)C_i_pairp(t3))){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17011,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3479 ##sys#print */
+t6=*((C_word*)lf[601]+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);}}
+
+/* k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17011(C_word c,C_word t0,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_17011,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17014,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_17019,a[2]=t4,a[3]=((C_word*)t0)[3],a[4]=((C_word)li585),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_17019(t6,t2,((C_word*)t0)[2]);}
+
+/* loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17019(C_word t0,C_word 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_17019,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_17027,a[2]=((C_word*)t0)[3],a[3]=((C_word)li584),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17077,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));
+/* g40294030 */
+t6=t3;
+f_17027(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k17075 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17077(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_17019(t3,((C_word*)t0)[2],t2);}
+
+/* g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_17027(C_word t0,C_word 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_17027,NULL,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_slot(t2,C_fix(2));
+t5=(C_word)C_slot(t2,C_fix(3));
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_17040,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: 3485 ##sys#print */
+t7=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t7+1)))(5,t7,t6,lf[728],C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17040(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_17040,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17043,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)C_slot(((C_word*)t0)[2],C_fix(0));
+/* library.scm: 3486 ##sys#print */
+t4=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,t3,C_SCHEME_FALSE,((C_word*)t0)[5]);}
+
+/* k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17043(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_17043,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_17046,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: 3487 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[727],C_SCHEME_FALSE,((C_word*)t0)[4]);}
+
+/* k17044 in k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17046(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_17046,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17049,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_17064,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3489 ##sys#write-char-0 */
+t4=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_make_character(91),((C_word*)t0)[4]);}
+else{
+t3=t2;
+f_17049(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k17062 in k17044 in k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17064(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_17064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_17067,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3490 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,((C_word*)t0)[3]);}
+
+/* k17065 in k17062 in k17044 in k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17067(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3491 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[726],C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k17047 in k17044 in k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17049(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_17049,2,t0,t1);}
+if(C_truep(((C_word*)t0)[4])){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_17057,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word)li583),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3493 ##sys#with-print-length-limit */
+t3=*((C_word*)lf[654]+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);}}
+
+/* a17056 in k17047 in k17044 in k17041 in k17038 in g4029 in loop4022 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17057(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_17057,2,t0,t1);}
+/* library.scm: 3496 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,t1,((C_word*)t0)[3],C_SCHEME_TRUE,((C_word*)t0)[2]);}
+
+/* k17012 in k17009 in ##sys#really-print-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_17014(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3498 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],lf[725],C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16845(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_16845r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16845r(t0,t1,t2);}}
+
+static void C_ccall f_16845r(C_word t0,C_word 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_16847,a[2]=((C_word)li579),tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16948,a[2]=t3,a[3]=((C_word)li580),tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16953,a[2]=t4,a[3]=((C_word)li581),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+/* def-start39764009 */
+t6=t5;
+f_16953(t6,t1);}
+else{
+t6=(C_word)C_i_car(t2);
+t7=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t7))){
+/* def-thread39774007 */
+t8=t4;
+f_16948(t8,t1,t6);}
+else{
+t8=(C_word)C_i_car(t7);
+t9=(C_word)C_i_cdr(t7);
+if(C_truep((C_word)C_i_nullp(t9))){
+/* body39743982 */
+f_16847(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-start3976 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16953(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_16953,NULL,2,t0,t1);}
+/* def-thread39774007 */
+t2=((C_word*)t0)[2];
+f_16948(t2,t1,C_fix(0));}
+
+/* def-thread3977 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16948(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_16948,NULL,3,t0,t1,t2);}
+/* body39743982 */
+f_16847(t1,t2,*((C_word*)lf[723]+1));}
+
+/* body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16847(C_word 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_16847,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_16851,a[2]=t1,a[3]=t3,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_fixnum_times(C_fix(4),t4);
+/* library.scm: 3463 ##sys#make-vector */
+t7=*((C_word*)lf[355]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t5,t6,C_SCHEME_FALSE);}
+
+/* k16849 in body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16851(C_word c,C_word t0,C_word t1){
+C_word 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_16851,2,t0,t1);}
+t2=(C_word)C_fetch_trace(((C_word*)t0)[5],t1);
+t3=(C_word)C_fixnump(t2);
+t4=(C_truep(t3)?t2:(C_word)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_16859,a[2]=((C_word*)t0)[3],a[3]=t6,a[4]=t1,a[5]=t4,a[6]=((C_word)li578),tmp=(C_word)a,a+=7,tmp));
+t8=((C_word*)t6)[1];
+f_16859(t8,((C_word*)t0)[2],C_fix(0));}
+
+/* loop in k16849 in body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16859(C_word t0,C_word 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_16859,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_word)C_fixnum_plus(t2,C_fix(3));
+t4=(C_word)C_slot(((C_word*)t0)[4],t3);
+t5=(C_word)C_i_not(t4);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16878,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_16878(t7,t5);}
+else{
+t7=(C_word)C_i_not(((C_word*)t0)[2]);
+t8=t6;
+f_16878(t8,(C_truep(t7)?t7:(C_word)C_eqp(((C_word*)t0)[2],t4)));}}}
+
+/* k16876 in loop in k16849 in body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16878(C_word t0,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_16878,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16897,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_slot(((C_word*)t0)[4],((C_word*)t0)[5]);
+t4=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+/* ##sys#peek-nonnull-c-string */
+t5=*((C_word*)lf[722]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t2,(C_word)stub3958(t4,t3),C_fix(0));}
+else{
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(4));
+/* library.scm: 3475 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_16859(t3,((C_word*)t0)[3],t2);}}
+
+/* k16895 in k16876 in loop in k16849 in body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16897(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_16897,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_slot(((C_word*)t0)[4],t2);
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(2));
+t5=(C_word)C_slot(((C_word*)t0)[4],t4);
+t6=(C_word)C_a_i_vector(&a,3,t1,t3,t5);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16889,a[2]=t6,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(4));
+/* library.scm: 3474 loop */
+t9=((C_word*)((C_word*)t0)[2])[1];
+f_16859(t9,t7,t8);}
+
+/* k16887 in k16895 in k16876 in loop in k16849 in body3974 in ##sys#get-call-chain in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16889(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_16889,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));}
+
+/* ##sys#feature? in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16803(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_16803r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16803r(t0,t1,t2);}}
+
+static void C_ccall f_16803r(C_word 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_16809,a[2]=t4,a[3]=((C_word)li576),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_16809(t6,t1,t2);}
+
+/* loop in ##sys#feature? in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16809(C_word 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_16809,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=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16833,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));
+/* library.scm: 3451 ##sys#->feature-id */
+t6=*((C_word*)lf[712]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}}
+
+/* k16831 in loop in ##sys#feature? in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+if(C_truep((C_word)C_i_memq(t1,*((C_word*)lf[714]+1)))){
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 3452 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_16809(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 k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16800(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_16800,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,*((C_word*)lf[714]+1));}
+
+/* unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16724(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_16724r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16724r(t0,t1,t2);}}
+
+static void C_ccall f_16724r(C_word t0,C_word 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_16728,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_16765,a[2]=t4,a[3]=t9,a[4]=t6,a[5]=((C_word)li573),tmp=(C_word)a,a+=6,tmp));
+t11=((C_word*)t9)[1];
+f_16765(t11,t7,t2);}
+
+/* loop3916 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16765(C_word t0,C_word 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_16765,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=*((C_word*)lf[712]+1);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16794,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));
+/* g39323933 */
+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);}}
+
+/* k16792 in loop3916 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16794(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_16794,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));
+/* loop39163929 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16765(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));
+/* loop39163929 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_16765(t6,((C_word*)t0)[3],t5);}}
+
+/* k16726 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16728(C_word c,C_word t0,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_16728,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16732,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_16734,a[2]=t4,a[3]=t1,a[4]=((C_word)li572),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_16734(t6,t2,*((C_word*)lf[714]+1));}
+
+/* loop in k16726 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16734(C_word t0,C_word 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_16734,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_slot(t2,C_fix(0));
+t4=(C_word)C_slot(t2,C_fix(1));
+if(C_truep((C_word)C_i_memq(t3,((C_word*)t0)[3]))){
+/* library.scm: 3442 loop */
+t7=t1;
+t8=t4;
+t1=t7;
+t2=t8;
+goto loop;}
+else{
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16763,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3443 loop */
+t7=t5;
+t8=t4;
+t1=t7;
+t2=t8;
+goto loop;}}}
+
+/* k16761 in loop in k16726 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16763(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_16763,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));}
+
+/* k16730 in k16726 in unregister-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16732(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[714]+1 /* (set! features ...) */,t1);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}
+
+/* register-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16680(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_16680r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16680r(t0,t1,t2);}}
+
+static void C_ccall f_16680r(C_word t0,C_word 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_16684,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_16686,a[2]=t5,a[3]=((C_word)li570),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_16686(t7,t3,t2);}
+
+/* loop3895 in register-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16686(C_word 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_16686,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|4,a[1]=(C_word)f_16698,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3428 ##sys#->feature-id */
+t5=*((C_word*)lf[712]+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);}}
+
+/* k16696 in loop3895 in register-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16698(C_word c,C_word t0,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_16698,2,t0,t1);}
+if(C_truep((C_word)C_i_memq(t1,*((C_word*)lf[714]+1)))){
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_16686(t3,((C_word*)t0)[2],t2);}
+else{
+t2=(C_word)C_a_i_cons(&a,2,t1,*((C_word*)lf[714]+1));
+t3=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t2);
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_16686(t5,((C_word*)t0)[2],t4);}}
+
+/* k16682 in register-feature! in k16676 in k16673 in k16670 in k16667 in k16664 in k16661 in k16658 in k16655 in k16652 in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16684(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 k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16636(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_16636,NULL,2,t1,t2);}
+t3=(C_word)C_eqp(lf[694],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_16651,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3413 ##sys#->feature-id */
+t5=*((C_word*)lf[712]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
+
+/* k16649 in check in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16651(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_16651,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,t1,*((C_word*)lf[714]+1));
+t3=C_mutate((C_word*)lf[714]+1 /* (set! features ...) */,t2);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* ##sys#->feature-id in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16602(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_16602,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_stringp(t2))){
+/* library.scm: 3400 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_16618,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3401 keyword? */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}}
+
+/* k16616 in ##sys#->feature-id in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16618(C_word c,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_16618,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_word)C_i_symbolp(((C_word*)t0)[3]))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16631,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3402 ##sys#symbol->string */
+t3=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+else{
+t2=((C_word*)t0)[4];
+t3=(C_word)C_a_i_list(&a,1,((C_word*)t0)[3]);
+C_apply(6,0,t2,*((C_word*)lf[9]+1),lf[56],lf[713],t3);}}}
+
+/* k16629 in k16616 in ##sys#->feature-id in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16631(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3402 string->keyword */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16428(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_16428r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16428r(t0,t1,t2);}}
+
+static void C_ccall f_16428r(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_16432,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_16432(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_16432(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);}}}
+
+/* k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16432(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_16432,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_fudge(C_fix(38));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16491,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_fudge(C_fix(3));
+t5=(C_truep(t4)?lf[697]:lf[698]);
+t6=(C_word)C_fudge(C_fix(15));
+t7=(C_truep(t6)?lf[699]:lf[700]);
+t8=(C_word)C_fudge(C_fix(40));
+t9=(C_truep(t8)?lf[701]:lf[702]);
+t10=(C_word)C_fudge(C_fix(24));
+t11=(C_truep(t10)?lf[703]:lf[704]);
+t12=(C_word)C_fudge(C_fix(28));
+t13=(C_truep(t12)?lf[705]:lf[706]);
+t14=(C_word)C_fudge(C_fix(32));
+t15=(C_truep(t14)?lf[707]:lf[708]);
+if(C_truep((C_word)C_fudge(C_fix(39)))){
+/* library.scm: 3367 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[709]);}
+else{
+/* library.scm: 3367 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[710]);}}
+else{
+t2=lf[2];
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,lf[2]);}}
+
+/* k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16491(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_16491,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16498,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_16438,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3356 build-platform */
+t4=*((C_word*)lf[684]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16438(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_16438,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16441,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3357 software-type */
+t3=*((C_word*)lf[680]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16441(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_16441,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16444,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3358 software-version */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[683]+1)))(2,*((C_word*)lf[683]+1),t2);}
+
+/* k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16444(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_16444,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16447,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: 3359 machine-type */
+((C_proc2)C_retrieve_proc(*((C_word*)lf[681]+1)))(2,*((C_word*)lf[681]+1),t2);}
+
+/* k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16447(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_16447,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16449,a[2]=((C_word)li566),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16470,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: 3364 str */
+f_16449(t3,((C_word*)t0)[2]);}
+
+/* k16468 in k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16470,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_16474,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: 3364 str */
+f_16449(t2,((C_word*)t0)[2]);}
+
+/* k16472 in k16468 in k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16474(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_16474,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16478,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: 3364 str */
+f_16449(t2,((C_word*)t0)[2]);}
+
+/* k16476 in k16472 in k16468 in k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16478(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_16478,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_16482,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: 3364 ##sys#symbol->string */
+t3=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k16480 in k16476 in k16472 in k16468 in k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16482(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3364 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 k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16449(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_16449,NULL,2,t1,t2);}
+t3=(C_word)C_eqp(lf[694],t2);
+if(C_truep(t3)){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,lf[695]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16463,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3363 symbol->string */
+t5=*((C_word*)lf[331]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}
+
+/* k16461 in str in k16445 in k16442 in k16439 in k16436 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16463(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3363 string-append */
+t2=*((C_word*)lf[172]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,lf[696]);}
+
+/* k16496 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16498(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_16498,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16502,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_block_size(((C_word*)t0)[2]);
+if(C_truep((C_word)C_i_zerop(t3))){
+t4=t2;
+f_16502(2,t4,lf[691]);}
+else{
+/* library.scm: 3380 string-append */
+t4=*((C_word*)lf[172]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t2,lf[692],((C_word*)t0)[2],lf[693]);}}
+
+/* k16500 in k16496 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16502(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_16502,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16506,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* ##sys#peek-c-string */
+t3=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_mpointer(&a,(void*)C_BUILD_TAG),C_fix(0));}
+
+/* k16504 in k16500 in k16496 in k16489 in k16430 in chicken-version in k16424 in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16506(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3375 string-append */
+t2=*((C_word*)lf[172]+1);
+((C_proc9)(void*)(*((C_word*)t2+1)))(9,t2,((C_word*)t0)[4],lf[688],lf[2],lf[689],((C_word*)t0)[3],((C_word*)t0)[2],lf[690],t1);}
+
+/* c-runtime in k16418 in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16421(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_16421,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* build-platform in k16412 in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16415(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_16415,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* software-version in k16406 in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16409(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_16409,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* machine-byte-order in k16400 in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16403(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_16403,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* machine-type in k16394 in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16397(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_16397,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* software-type in k16388 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16391(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_16391,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,((C_word*)t0)[2]);}
+
+/* ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16325(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_16325,3,t0,t1,t2);}
+if(C_truep((C_word)C_taggedpointerp(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16336,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_slot(t2,C_fix(1));
+if(C_truep((C_word)C_i_pairp(t4))){
+t5=(C_word)C_i_car(t4);
+t6=(C_word)C_a_i_list(&a,1,t5);
+/* library.scm: 3311 ##sys#print-to-string */
+t7=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t3,t6);}
+else{
+t5=(C_word)C_a_i_list(&a,1,t4);
+/* library.scm: 3311 ##sys#print-to-string */
+t6=*((C_word*)lf[671]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t3,t5);}}
+else{
+if(C_truep((C_word)C_swigpointerp(t2))){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16371,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_16375,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3318 ##sys#pointer->address */
+t5=*((C_word*)lf[675]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16382,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_16386,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3320 ##sys#pointer->address */
+t5=*((C_word*)lf[675]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}}}
+
+/* k16384 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16386(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3320 ##sys#number->string */
+t2=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
+
+/* k16380 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16382(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3320 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[678],t1,lf[679]);}
+
+/* k16373 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16375(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3318 ##sys#number->string */
+t2=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
+
+/* k16369 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16371(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3318 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[676],t1,lf[677]);}
+
+/* k16334 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16336(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_16336,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16340,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_16344,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3315 ##sys#pointer->address */
+t4=*((C_word*)lf[675]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k16342 in k16334 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16344(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3315 ##sys#number->string */
+t2=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
+
+/* k16338 in k16334 in ##sys#pointer->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16340(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3309 string-append */
+t2=((C_word*)t0)[4];
+((C_proc7)C_retrieve_proc(t2))(7,t2,((C_word*)t0)[3],lf[672],((C_word*)t0)[2],lf[673],t1,lf[674]);}
+
+/* ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16285(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_16285,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16289,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3301 open-output-string */
+t4=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t4))(2,t4,t3);}
+
+/* k16287 in ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16289,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16292,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_16297,a[2]=t4,a[3]=t1,a[4]=((C_word)li557),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_16297(t6,t2,((C_word*)t0)[2]);}
+
+/* loop3794 in k16287 in ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16297(C_word t0,C_word 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_16297,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_16305,a[2]=((C_word*)t0)[3],a[3]=((C_word)li556),tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_16312,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));
+/* g38013802 */
+t6=t3;
+f_16305(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k16310 in loop3794 in k16287 in ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_16297(t3,((C_word*)t0)[2],t2);}
+
+/* g3801 in loop3794 in k16287 in ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16305(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_16305,NULL,3,t0,t1,t2);}
+/* library.scm: 3302 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k16290 in k16287 in ##sys#print-to-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16292(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3303 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 k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16248(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_16248,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16252,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3290 ##sys#check-port */
+t4=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[669]);}
+
+/* k16250 in get-output-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_16252,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16255,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3291 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],C_SCHEME_FALSE,lf[669]);}
+
+/* k16253 in k16250 in get-output-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16255(C_word c,C_word 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)[3],C_fix(7));
+t3=(C_word)C_eqp(lf[173],t2);
+if(C_truep(t3)){
+t4=(C_word)C_slot(((C_word*)t0)[3],C_fix(12));
+t5=(C_word)C_slot(((C_word*)t0)[3],C_fix(10));
+/* library.scm: 3295 ##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: 3293 ##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[669],lf[670],((C_word*)t0)[3]);}}
+
+/* open-output-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16229(C_word 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_16229,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_16233,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 3283 ##sys#make-port */
+t3=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,C_SCHEME_FALSE,*((C_word*)lf[664]+1),lf[668],lf[173]);}
+
+/* k16231 in open-output-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16233(C_word c,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_16233,2,t0,t1);}
+t2=(C_word)C_i_set_i_slot(t1,C_fix(10),C_fix(0));
+t3=(C_word)C_i_set_i_slot(t1,C_fix(11),C_fix(256));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16246,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3286 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,C_fix(256));}
+
+/* k16244 in k16231 in open-output-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16246(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_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 k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16211(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_16211,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[665]);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_16218,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3276 ##sys#make-port */
+t5=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t4,C_SCHEME_TRUE,*((C_word*)lf[664]+1),lf[666],lf[173]);}
+
+/* k16216 in open-input-string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16218(C_word 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_set_i_slot(t1,C_fix(11),(C_word)C_block_size(((C_word*)t0)[3]));
+t3=(C_word)C_i_set_i_slot(t1,C_fix(10),C_fix(0));
+t4=(C_word)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 k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16139(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_16139,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_16145,a[2]=t7,a[3]=t2,a[4]=t5,a[5]=t3,a[6]=((C_word)li551),tmp=(C_word)a,a+=7,tmp));
+t9=((C_word*)t7)[1];
+f_16145(t9,t1,t4);}
+
+/* loop in ##sys#scan-buffer-line in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16145(C_word t0,C_word 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_16145,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[5]))){
+/* library.scm: 3247 k */
+t3=((C_word*)t0)[4];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t1,t2,t2);}
+else{
+t3=(C_word)C_subchar(((C_word*)t0)[3],t2);
+t4=(C_word)C_eqp(t3,C_make_character(10));
+if(C_truep(t4)){
+t5=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 3249 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_16174,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_word)C_eqp(t3,C_make_character(13));
+if(C_truep(t6)){
+t7=(C_word)C_fixnum_plus(t2,C_fix(1));
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[5],t7))){
+t8=(C_word)C_fixnum_plus(t2,C_fix(1));
+t9=(C_word)C_subchar(((C_word*)t0)[3],t8);
+t10=t5;
+f_16174(t10,(C_word)C_eqp(t9,C_make_character(10)));}
+else{
+t8=t5;
+f_16174(t8,C_SCHEME_FALSE);}}
+else{
+t7=t5;
+f_16174(t7,C_SCHEME_FALSE);}}}}
+
+/* k16172 in loop in ##sys#scan-buffer-line in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16174(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_fixnum_plus(((C_word*)t0)[5],C_fix(2));
+/* library.scm: 3253 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_word)C_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 3254 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_16145(t3,((C_word*)t0)[3],t2);}}
+
+/* a21860 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21861(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_21861,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(t2,C_fix(10));
+t5=(C_word)C_slot(t2,C_fix(11));
+t6=(C_word)C_slot(t2,C_fix(12));
+t7=(C_truep(t3)?(C_word)C_fixnum_plus(t4,t3):t5);
+if(C_truep((C_word)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_word)C_fixnum_greaterp(t7,t5);
+t9=(C_truep(t8)?t5:t7);
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21889,a[2]=t2,a[3]=t4,a[4]=t6,a[5]=((C_word)li549),tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3231 ##sys#scan-buffer-line */
+t11=*((C_word*)lf[663]+1);
+((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t1,t6,t9,t4,t10);}}
+
+/* a21888 in a21860 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21889(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_21889,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21893,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_word)C_eqp(t2,t3);
+if(C_truep(t5)){
+t6=t4;
+f_21893(t6,C_SCHEME_UNDEFINED);}
+else{
+t6=(C_word)C_slot(((C_word*)t0)[2],C_fix(4));
+t7=(C_word)C_fixnum_plus(t6,C_fix(1));
+t8=t4;
+f_21893(t8,(C_word)C_i_set_i_slot(((C_word*)t0)[2],C_fix(4),t7));}}
+
+/* k21891 in a21888 in a21860 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21893(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_21893,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21896,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_fixnum_difference(((C_word*)t0)[5],((C_word*)t0)[6]);
+/* library.scm: 3238 ##sys#make-string */
+t4=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t2,t3);}
+
+/* k21894 in k21891 in a21888 in a21860 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21896(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_substring_copy(((C_word*)t0)[7],t1,((C_word*)t0)[6],((C_word*)t0)[5],C_fix(0));
+t3=(C_word)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);}
+
+/* a21819 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21820(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_21820,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_word)C_slot(t2,C_fix(10));
+t8=(C_word)C_slot(t2,C_fix(11));
+t9=(C_word)C_fixnum_difference(t8,t7);
+t10=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_21830,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_word)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_21830(t13,t12);}
+else{
+t12=t10;
+f_21830(t12,C_SCHEME_UNDEFINED);}}
+else{
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t6)[1],t9))){
+t12=C_set_block_item(t6,0,t9);
+t13=t10;
+f_21830(t13,t12);}
+else{
+t12=t10;
+f_21830(t12,C_SCHEME_UNDEFINED);}}}
+
+/* k21828 in a21819 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_21830(C_word t0,C_word 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_slot(((C_word*)t0)[7],C_fix(12));
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
+t4=(C_word)C_substring_copy(t2,((C_word*)t0)[4],((C_word*)t0)[6],t3,((C_word*)t0)[3]);
+t5=(C_word)C_fixnum_plus(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
+t6=(C_word)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]);}
+
+/* a21805 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21806(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_21806,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(10));
+t4=(C_word)C_slot(t2,C_fix(11));
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_fixnum_lessp(t3,t4));}
+
+/* a21802 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21803(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_21803,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}
+
+/* a21792 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21793(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_21793,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(11));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_i_slot(t2,C_fix(10),t3));}
+
+/* a21773 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21774(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_21774,4,t0,t1,t2,t3);}
+t4=(C_word)C_block_size(t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_21778,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3207 check */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_16084(t6,t5,t2,t4);}
+
+/* k21776 in a21773 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21778(C_word c,C_word 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)[5],C_fix(10));
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(12));
+t4=(C_word)C_substring_copy(((C_word*)t0)[4],t3,C_fix(0),((C_word*)t0)[3],t2);
+t5=(C_word)C_fixnum_plus(t2,((C_word*)t0)[3]);
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_set_i_slot(((C_word*)t0)[5],C_fix(10),t5));}
+
+/* a21754 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21755(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_21755,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_21759,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3200 check */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_16084(t5,t4,t2,C_fix(1));}
+
+/* k21757 in a21754 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21759(C_word c,C_word 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(10));
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(12));
+t4=(C_word)C_setsubchar(t3,t2,((C_word*)t0)[3]);
+t5=(C_word)C_fixnum_plus(t2,C_fix(1));
+t6=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_set_i_slot(((C_word*)t0)[4],C_fix(10),t5));}
+
+/* a21736 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *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_word)C_slot(t2,C_fix(10));
+t4=(C_word)C_slot(t2,C_fix(12));
+t5=(C_word)C_slot(t2,C_fix(11));
+if(C_truep((C_word)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_word)C_subchar(t4,t3);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}}
+
+/* a21711 in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21712(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_21712,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(10));
+t4=(C_word)C_slot(t2,C_fix(12));
+t5=(C_word)C_slot(t2,C_fix(11));
+if(C_truep((C_word)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_word)C_subchar(t4,t3);
+t7=(C_word)C_fixnum_plus(t3,C_fix(1));
+t8=(C_word)C_i_set_i_slot(t2,C_fix(10),t7);
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t6);}}
+
+/* check in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16084(C_word t0,C_word 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_16084,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(t2,C_fix(10));
+t5=(C_word)C_slot(t2,C_fix(11));
+t6=(C_word)C_slot(t2,C_fix(12));
+t7=(C_word)C_fixnum_plus(t4,t3);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t7,t5))){
+t8=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16106,a[2]=t4,a[3]=t6,a[4]=t3,a[5]=t1,a[6]=((C_word*)t0)[2],a[7]=t2,a[8]=t5,tmp=(C_word)a,a+=9,tmp);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t7,C_fix(16777215)))){
+/* library.scm: 3175 ##sys#error */
+t9=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t8,lf[662],t2);}
+else{
+t9=t8;
+f_16106(2,t9,C_SCHEME_UNDEFINED);}}
+else{
+t8=C_SCHEME_UNDEFINED;
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,t8);}}
+
+/* k16104 in check in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16106(C_word c,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_16106,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[8],((C_word*)t0)[8]);
+t3=(C_word)C_i_fixnum_min(C_fix(16777215),t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_16112,a[2]=((C_word*)t0)[2],a[3]=((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);
+/* library.scm: 3177 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k16110 in k16104 in check in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16112(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_16112,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_16115,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: 3178 ##sys#copy-bytes */
+t3=*((C_word*)lf[661]+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]);}
+
+/* k16113 in k16110 in k16104 in check in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16115(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_setslot(((C_word*)t0)[7],C_fix(12),((C_word*)t0)[6]);
+t3=(C_word)C_i_set_i_slot(((C_word*)t0)[7],C_fix(11),((C_word*)t0)[5]);
+/* library.scm: 3181 check */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_16084(t4,((C_word*)t0)[3],((C_word*)t0)[7],((C_word*)t0)[2]);}
+
+/* bit-set? in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16080(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_16080,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_bit_setp(t2,t3));}
+
+/* arithmetic-shift in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16077(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_16077,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_arithmetic_shift(&a,2,t2,t3));}
+
+/* bitwise-not in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16074(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_16074,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_bitwise_not(&a,1,t2));}
+
+/* bitwise-xor in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16047(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_16047r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16047r(t0,t1,t2);}}
+
+static void C_ccall f_16047r(C_word 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_16053,a[2]=t4,a[3]=((C_word)li535),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_16053(t6,t1,C_fix(0),t2);}
+
+/* loop in bitwise-xor in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16053(C_word t0,C_word 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_16053,NULL,4,t0,t1,t2,t3);}
+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=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)C_a_i_bitwise_xor(&a,2,t2,t4);
+t6=(C_word)C_slot(t3,C_fix(1));
+/* library.scm: 3137 loop */
+t9=t1;
+t10=t5;
+t11=t6;
+t1=t9;
+t2=t10;
+t3=t11;
+goto loop;}}
+
+/* bitwise-ior in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_16020(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_16020r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_16020r(t0,t1,t2);}}
+
+static void C_ccall f_16020r(C_word 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_16026,a[2]=t4,a[3]=((C_word)li533),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_16026(t6,t1,C_fix(0),t2);}
+
+/* loop in bitwise-ior in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_16026(C_word t0,C_word 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_16026,NULL,4,t0,t1,t2,t3);}
+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=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)C_a_i_bitwise_ior(&a,2,t2,t4);
+t6=(C_word)C_slot(t3,C_fix(1));
+/* library.scm: 3130 loop */
+t9=t1;
+t10=t5;
+t11=t6;
+t1=t9;
+t2=t10;
+t3=t11;
+goto loop;}}
+
+/* bitwise-and in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15993(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_15993r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_15993r(t0,t1,t2);}}
+
+static void C_ccall f_15993r(C_word 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_15999,a[2]=t4,a[3]=((C_word)li531),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_15999(t6,t1,C_fix(-1),t2);}
+
+/* loop in bitwise-and in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15999(C_word t0,C_word 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_15999,NULL,4,t0,t1,t2,t3);}
+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=(C_word)C_slot(t3,C_fix(0));
+t5=(C_word)C_a_i_bitwise_and(&a,2,t2,t4);
+t6=(C_word)C_slot(t3,C_fix(1));
+/* library.scm: 3123 loop */
+t9=t1;
+t10=t5;
+t11=t6;
+t1=t9;
+t2=t10;
+t3=t11;
+goto loop;}}
+
+/* ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15952(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_15952,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15958,a[2]=t3,a[3]=t2,a[4]=((C_word)li529),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3109 call-with-current-continuation */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t1,t4);}
+
+/* a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15958(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_15958,3,t0,t1,t2);}
+t3=lf[606];
+t4=lf[607];
+t5=lf[605];
+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_15960,a[2]=t11,a[3]=t9,a[4]=t7,a[5]=((C_word)li527),tmp=(C_word)a,a+=6,tmp);
+t13=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15987,a[2]=((C_word*)t0)[2],a[3]=((C_word)li528),tmp=(C_word)a,a+=4,tmp);
+/* ##sys#dynamic-wind */
+t14=*((C_word*)lf[405]+1);
+((C_proc5)(void*)(*((C_word*)t14+1)))(5,t14,t1,t12,t13,t12);}
+
+/* a15986 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15987(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_15987,2,t0,t1);}
+/* library.scm: 3114 thunk */
+t2=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t2))(2,t2,t1);}
+
+/* swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15960(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_15960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15964,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);
+/* g362236233634 */
+((C_proc2)C_retrieve_proc(lf[606]))(2,lf[606],t2);}
+
+/* k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15964(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_15964,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15967,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);
+/* g362236233634 */
+((C_proc3)C_retrieve_proc(lf[606]))(3,lf[606],t2,((C_word*)((C_word*)t0)[5])[1]);}
+
+/* k15965 in k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15967,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_15971,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);
+/* g362436253635 */
+((C_proc2)C_retrieve_proc(lf[607]))(2,lf[607],t3);}
+
+/* k15969 in k15965 in k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15971(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_15971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15974,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);
+/* g362436253635 */
+((C_proc3)C_retrieve_proc(lf[607]))(3,lf[607],t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k15972 in k15969 in k15965 in k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15974(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_15974,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_15978,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* g362636273636 */
+((C_proc2)C_retrieve_proc(lf[605]))(2,lf[605],t3);}
+
+/* k15976 in k15972 in k15969 in k15965 in k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15978(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_15978,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15981,a[2]=((C_word*)t0)[2],a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* g362636273636 */
+((C_proc3)C_retrieve_proc(lf[605]))(3,lf[605],t2,((C_word*)((C_word*)t0)[3])[1]);}
+
+/* k15979 in k15976 in k15972 in k15969 in k15965 in k15962 in swap3619 in a15957 in ##sys#with-print-length-limit in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15981(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 k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15889(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_15889,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_slot(t2,C_fix(0));
+t6=(C_word)C_i_assq(t5,*((C_word*)lf[647]+1));
+if(C_truep(t6)){
+t7=(C_word)C_slot(t6,C_fix(1));
+/* g36033604 */
+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_15908,a[2]=t2,a[3]=t5,a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 3095 ##sys#print */
+t8=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t7,lf[653],C_SCHEME_FALSE,t4);}}
+
+/* k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15908(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_15908,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15911,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_15950,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3096 ##sys#symbol->string */
+t4=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
+
+/* k15948 in k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15950(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3096 ##sys#print */
+t2=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[3],t1,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k15909 in k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15911(C_word c,C_word t0,C_word 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_15911,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15914,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_eqp(((C_word*)t0)[3],lf[649]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15923,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3099 ##sys#print */
+t5=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,lf[650],C_SCHEME_FALSE,((C_word*)t0)[4]);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[3],lf[651]);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15939,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3102 ##sys#print */
+t6=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[652],C_SCHEME_FALSE,((C_word*)t0)[4]);}
+else{
+/* library.scm: 3104 ##sys#print */
+t5=*((C_word*)lf[601]+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]);}}}
+
+/* k15937 in k15909 in k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15939(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(6));
+/* library.scm: 3103 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k15921 in k15909 in k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15923(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));
+/* library.scm: 3100 ##sys#print */
+t3=*((C_word*)lf[601]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],t2,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k15912 in k15909 in k15906 in ##sys#user-print-hook in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15914(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3104 ##sys#print */
+t2=*((C_word*)lf[601]+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 k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15869(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_15869,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_assq(t2,*((C_word*)lf[647]+1));
+if(C_truep(t4)){
+t5=(C_word)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_word)C_a_i_cons(&a,2,t2,t3);
+t6=(C_word)C_a_i_cons(&a,2,t5,*((C_word*)lf[647]+1));
+t7=C_mutate((C_word*)lf[647]+1 /* (set! record-printers ...) */,t6);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_UNDEFINED);}}
+
+/* ##sys#procedure->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15852(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_15852,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15856,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3076 ##sys#lambda-info */
+t4=*((C_word*)lf[646]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k15854 in ##sys#procedure->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15856(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_15856,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15866,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 3078 ##sys#lambda-info->string */
+t3=*((C_word*)lf[634]+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[645]);}}
+
+/* k15864 in k15854 in ##sys#procedure->string in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15866(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3078 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[643],t1,lf[644]);}
+
+/* ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14906(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_14906,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14910,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: 2881 ##sys#check-port-mode */
+t6=*((C_word*)lf[428]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,C_SCHEME_FALSE);}
+
+/* k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14910(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_14910,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14913,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: 2882 csp */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14913(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_14913,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14916,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: 2883 ksp */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14916(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_14916,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14919,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: 2884 print-length-limit */
+((C_proc2)C_retrieve_proc(lf[606]))(2,lf[606],t2);}
+
+/* k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t5;
+C_word t6;
+C_word t7;
+C_word 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_14919,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_14921,a[2]=t1,a[3]=((C_word)li511),tmp=(C_word)a,a+=4,tmp));
+t13=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14992,a[2]=t1,a[3]=((C_word)li512),tmp=(C_word)a,a+=4,tmp));
+t14=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15033,a[2]=((C_word)li513),tmp=(C_word)a,a+=3,tmp));
+t15=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_15054,a[2]=t5,a[3]=((C_word)li515),tmp=(C_word)a,a+=4,tmp));
+t16=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15103,a[2]=((C_word*)t0)[8],a[3]=t7,a[4]=((C_word)li517),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_15228,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)li522),tmp=(C_word)a,a+=12,tmp));
+t20=((C_word*)t18)[1];
+f_15228(t20,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15228(C_word t0,C_word 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_15228,NULL,3,t0,t1,t2);}
+switch(t2){
+case C_SCHEME_END_OF_LIST:
+/* library.scm: 2954 outstr */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t3,t1,((C_word*)t0)[9],lf[612]);
+case C_SCHEME_TRUE:
+/* library.scm: 2955 outstr */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t3,t1,((C_word*)t0)[9],lf[613]);
+case C_SCHEME_FALSE:
+/* library.scm: 2956 outstr */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t3,t1,((C_word*)t0)[9],lf[614]);
+default:
+if(C_truep((C_word)C_eofp(t2))){
+/* library.scm: 2957 outstr */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t3,t1,((C_word*)t0)[9],lf[615]);}
+else{
+if(C_truep((C_word)C_undefinedp(t2))){
+/* library.scm: 2958 outstr */
+t3=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t3,t1,((C_word*)t0)[9],lf[616]);}
+else{
+if(C_truep((C_word)C_charp(t2))){
+if(C_truep(((C_word*)t0)[8])){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15277,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: 2961 outstr */
+t4=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t4,t3,((C_word*)t0)[9],lf[617]);}
+else{
+/* library.scm: 2973 outchr */
+t3=((C_word*)((C_word*)t0)[7])[1];
+f_14992(t3,t1,((C_word*)t0)[9],t2);}}
+else{
+if(C_truep((C_word)C_fixnump(t2))){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15353,a[2]=((C_word*)t0)[9],a[3]=t1,a[4]=((C_word*)t0)[10],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2974 ##sys#number->string */
+t4=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+else{
+t3=(C_word)C_slot(lf[618],C_fix(0));
+t4=(C_word)C_eqp(t2,t3);
+if(C_truep(t4)){
+/* library.scm: 2976 outstr */
+t5=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t5,t1,((C_word*)t0)[9],lf[619]);}
+else{
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_forwardedp(t2))){
+/* library.scm: 2978 outstr */
+t5=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t5,t1,((C_word*)t0)[9],lf[620]);}
+else{
+if(C_truep((C_word)C_symbolp(t2))){
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(C_word)C_subbyte(t5,C_fix(0));
+t7=(C_word)C_eqp(C_fix(0),t6);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15389,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: 2981 ##sys#symbol->string */
+t9=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,t2);}
+else{
+t8=t2;
+if(C_truep((C_truep((C_word)C_eqp(t8,lf[622]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t8,lf[623]))?C_SCHEME_TRUE:(C_truep((C_word)C_eqp(t8,lf[624]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))){
+t9=(C_word)C_slot(t2,C_fix(1));
+/* library.scm: 2992 outstr */
+t10=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t10,t1,((C_word*)t0)[9],t9);}
+else{
+t9=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15435,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: 2994 ##sys#symbol->qualified-string */
+t10=*((C_word*)lf[325]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t2);}}}
+else{
+t5=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_15467,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: 2998 ##sys#number? */
+t6=*((C_word*)lf[250]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}}}
+else{
+/* library.scm: 2977 outstr */
+t5=((C_word*)((C_word*)t0)[10])[1];
+f_14921(t5,t1,((C_word*)t0)[9],lf[642]);}}}}}}}}
+
+/* k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15467(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_15467,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15474,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: 2998 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
+else{
+if(C_truep((C_word)C_anypointerp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15484,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: 2999 ##sys#pointer->string */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[625]+1)))(3,*((C_word*)lf[625]+1),t2,((C_word*)t0)[5]);}
+else{
+if(C_truep((C_word)C_stringp(((C_word*)t0)[5]))){
+if(C_truep(((C_word*)t0)[4])){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15493,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: 3002 outchr */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t3,t2,((C_word*)t0)[6],C_make_character(34));}
+else{
+/* library.scm: 3026 outstr */
+t2=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t2,((C_word*)t0)[7],((C_word*)t0)[6],((C_word*)t0)[5]);}}
+else{
+if(C_truep((C_word)C_pairp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15631,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: 3028 outchr */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t3,t2,((C_word*)t0)[6],C_make_character(40));}
+else{
+if(C_truep((C_word)C_bytevectorp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15702,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_word)C_permanentp(((C_word*)t0)[5]))){
+/* library.scm: 3041 outstr */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t3,t2,((C_word*)t0)[6],lf[629]);}
+else{
+/* library.scm: 3042 outstr */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t3,t2,((C_word*)t0)[6],lf[630]);}}
+else{
+if(C_truep((C_word)C_structurep(((C_word*)t0)[5]))){
+/* library.scm: 3045 ##sys#user-print-hook */
+t2=*((C_word*)lf[631]+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_word)C_closurep(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15734,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: 3046 ##sys#procedure->string */
+t3=*((C_word*)lf[632]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
+else{
+if(C_truep((C_word)C_locativep(((C_word*)t0)[5]))){
+/* library.scm: 3047 outstr */
+t2=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t2,((C_word*)t0)[7],((C_word*)t0)[6],lf[633]);}
+else{
+if(C_truep((C_word)C_lambdainfop(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15746,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: 3049 outstr */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t3,t2,((C_word*)t0)[6],lf[635]);}
+else{
+if(C_truep((C_word)C_portp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15762,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_slot(((C_word*)t0)[5],C_fix(1)))){
+/* library.scm: 3054 outstr */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t3,t2,((C_word*)t0)[6],lf[637]);}
+else{
+/* library.scm: 3055 outstr */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t3,t2,((C_word*)t0)[6],lf[638]);}}
+else{
+if(C_truep((C_word)C_vectorp(((C_word*)t0)[5]))){
+t2=(C_word)C_block_size(((C_word*)t0)[5]);
+t3=(C_word)C_eqp(C_fix(0),t2);
+if(C_truep(t3)){
+/* library.scm: 3061 outstr */
+t4=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t4,((C_word*)t0)[7],((C_word*)t0)[6],lf[639]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15796,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: 3063 outstr */
+t5=((C_word*)((C_word*)t0)[8])[1];
+f_14921(t5,t4,((C_word*)t0)[6],lf[640]);}}
+else{
+/* library.scm: 3071 ##sys#error */
+t2=*((C_word*)lf[8]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[7],lf[641]);}}}}}}}}}}}}
+
+/* k15794 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15796(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_15796,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15799,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_slot(((C_word*)t0)[4],C_fix(0));
+/* library.scm: 3064 out */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_15228(t4,t2,t3);}
+
+/* k15797 in k15794 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15799(C_word c,C_word t0,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_15799,2,t0,t1);}
+t2=(C_word)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_15808,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)li521),tmp=(C_word)a,a+=8,tmp));
+t6=((C_word*)t4)[1];
+f_15808(t6,((C_word*)t0)[2],C_fix(1),t2);}
+
+/* doloop3563 in k15797 in k15794 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15808(C_word 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_15808,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t3,C_fix(0));
+if(C_truep(t4)){
+/* library.scm: 3068 outchr */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t5,t1,((C_word*)t0)[5],C_make_character(41));}
+else{
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15821,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: 3069 outchr */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t6,t5,((C_word*)t0)[5],C_make_character(32));}}
+
+/* k15819 in doloop3563 in k15797 in k15794 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15821(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_15821,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15824,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_word)C_slot(((C_word*)t0)[3],((C_word*)t0)[7]);
+/* library.scm: 3070 out */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15228(t4,t2,t3);}
+
+/* k15822 in k15819 in doloop3563 in k15797 in k15794 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15824(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_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_15808(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k15760 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15762(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_15762,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15765,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));
+/* library.scm: 3056 outstr */
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_14921(t4,t2,((C_word*)t0)[3],t3);}
+
+/* k15763 in k15760 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15765(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3057 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[636]);}
+
+/* k15744 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15746(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_15746,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15749,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_15756,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3050 ##sys#lambda-info->string */
+t4=*((C_word*)lf[634]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k15754 in k15744 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15756(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3050 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15747 in k15744 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15749(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3051 outchr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14992(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(62));}
+
+/* k15732 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15734(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_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15700 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15702(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_15702,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15705,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_15712,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3043 number->string */
+C_number_to_string(3,0,t3,(C_word)C_block_size(((C_word*)t0)[2]));}
+
+/* k15710 in k15700 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15712(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3043 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15703 in k15700 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15705(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3044 outchr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14992(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(62));}
+
+/* k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15631(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_15631,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15634,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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_slot(((C_word*)t0)[7],C_fix(0));
+/* library.scm: 3029 out */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_15228(t4,t2,t3);}
+
+/* k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15634(C_word c,C_word t0,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_15634,2,t0,t1);}
+t2=(C_word)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_15643,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)li520),tmp=(C_word)a,a+=8,tmp));
+t6=((C_word*)t4)[1];
+f_15643(t6,((C_word*)t0)[2],t2);}
+
+/* doloop3533 in k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15643(C_word t0,C_word 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_15643,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_not((C_word)C_blockp(t2));
+t4=(C_truep(t3)?t3:(C_word)C_i_not((C_word)C_pairp(t2)));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15656,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+t6=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
+if(C_truep(t6)){
+/* library.scm: 3036 outchr */
+t7=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t7,t1,((C_word*)t0)[5],C_make_character(41));}
+else{
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15665,a[2]=t2,a[3]=t5,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 3034 outstr */
+t8=((C_word*)((C_word*)t0)[3])[1];
+f_14921(t8,t7,((C_word*)t0)[5],lf[628]);}}
+else{
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15675,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: 3037 outchr */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t6,t5,((C_word*)t0)[5],C_make_character(32));}}
+
+/* k15673 in doloop3533 in k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15675,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15678,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)[5],C_fix(0));
+/* library.scm: 3038 out */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15228(t4,t2,t3);}
+
+/* k15676 in k15673 in doloop3533 in k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15678(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_15643(t3,((C_word*)t0)[2],t2);}
+
+/* k15663 in doloop3533 in k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15665(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3035 out */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_15228(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15654 in doloop3533 in k15632 in k15629 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15656(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3036 outchr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14992(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(41));}
+
+/* k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15493(C_word c,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_15493,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_15498,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)li519),tmp=(C_word)a,a+=8,tmp));
+t5=((C_word*)t3)[1];
+f_15498(t5,((C_word*)t0)[2],C_fix(0),(C_word)C_block_size(((C_word*)t0)[4]));}
+
+/* doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15498(C_word t0,C_word 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_15498,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t3,C_fix(0));
+if(C_truep(t4)){
+/* library.scm: 3006 outchr */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t5,t1,((C_word*)t0)[5],C_make_character(34));}
+else{
+t5=(C_word)C_subbyte(((C_word*)t0)[4],t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15511,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: 3009 outstr */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_14921(t7,t6,((C_word*)t0)[5],lf[626]);
+case C_fix(92):
+/* library.scm: 3010 outstr */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_14921(t7,t6,((C_word*)t0)[5],lf[627]);
+default:
+if(C_truep((C_word)C_fixnum_lessp(t5,C_fix(32)))){
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15546,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: 3013 outchr */
+t8=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t8,t7,((C_word*)t0)[5],C_make_character(92));}
+else{
+/* library.scm: 3025 outchr */
+t7=((C_word*)((C_word*)t0)[6])[1];
+f_14992(t7,t6,((C_word*)t0)[5],(C_word)C_fix_to_char(t5));}}}}
+
+/* k15544 in doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15546(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_15546,2,t0,t1);}
+switch(((C_word*)t0)[6]){
+case C_fix(9):
+/* library.scm: 3015 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(116));
+case C_fix(10):
+/* library.scm: 3016 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(110));
+case C_fix(13):
+/* library.scm: 3017 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(114));
+case C_fix(11):
+/* library.scm: 3018 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(118));
+case C_fix(12):
+/* library.scm: 3019 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t2,((C_word*)t0)[4],((C_word*)t0)[3],C_make_character(102));
+case C_fix(8):
+/* library.scm: 3020 outchr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14992(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_15603,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: 3022 outchr */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t3,t2,((C_word*)t0)[3],C_make_character(120));}}
+
+/* k15601 in k15544 in doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15603(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_15603,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15606,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_fixnum_lessp(((C_word*)t0)[3],C_fix(16)))){
+/* library.scm: 3023 outchr */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_14992(t3,t2,((C_word*)t0)[4],C_make_character(48));}
+else{
+t3=t2;
+f_15606(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k15604 in k15601 in k15544 in doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15606(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_15606,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15613,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: 3024 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
+
+/* k15611 in k15604 in k15601 in k15544 in doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15613(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 3024 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15509 in doloop3502 in k15491 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15511(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_fixnum_plus(((C_word*)t0)[5],C_fix(1));
+t3=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_15498(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k15482 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15484(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2999 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15472 in k15465 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15474(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2998 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15433 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15435(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_15435,2,t0,t1);}
+t2=(C_word)C_i_not(((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15444,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_15444(2,t4,t2);}
+else{
+/* library.scm: 2995 sym-is-readable? */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15103(t4,t3,t1);}}
+
+/* k15442 in k15433 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15444(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 2996 outstr */
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_14921(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+/* library.scm: 2997 outreadablesym */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_15054(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3]);}}
+
+/* k15387 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15389(C_word c,C_word t0,C_word 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_15389,2,t0,t1);}
+t2=(C_word)C_eqp(((C_word*)t0)[6],lf[562]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15398,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: 2984 outchr */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_14992(t4,t3,((C_word*)t0)[3],C_make_character(58));}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[6],lf[561]);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15410,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: 2987 outstr */
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_14921(t5,t4,((C_word*)t0)[3],t1);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15416,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: 2990 outstr */
+t5=((C_word*)((C_word*)t0)[5])[1];
+f_14921(t5,t4,((C_word*)t0)[3],lf[621]);}}}
+
+/* k15414 in k15387 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15416(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2991 outstr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14921(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15408 in k15387 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15410(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2988 outchr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14992(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_make_character(58));}
+
+/* k15396 in k15387 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15398(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2985 outstr */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_14921(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15351 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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: 2974 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15277(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_15277,2,t0,t1);}
+t2=(C_word)C_fix((C_word)C_character_code(((C_word*)t0)[7]));
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15283,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: 2963 char-name */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[7]);}
+
+/* k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15283(C_word c,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_15283,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15287,a[2]=((C_word*)t0)[6],a[3]=((C_word*)t0)[7],a[4]=((C_word)li518),tmp=(C_word)a,a+=5,tmp);
+/* g34693470 */
+t3=t2;
+f_15287(t3,((C_word*)t0)[5],t1);}
+else{
+if(C_truep((C_word)C_fixnum_lessp(((C_word*)t0)[4],C_fix(32)))){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15307,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: 2967 outchr */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t3,t2,((C_word*)t0)[6],C_make_character(120));}
+else{
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[4],C_fix(255)))){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15323,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_word)C_fixnum_greaterp(((C_word*)t0)[4],C_fix(65535)))){
+/* library.scm: 2970 outchr */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t3,t2,((C_word*)t0)[6],C_make_character(85));}
+else{
+/* library.scm: 2970 outchr */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t3,t2,((C_word*)t0)[6],C_make_character(117));}}
+else{
+/* library.scm: 2972 outchr */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_14992(t2,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[2]);}}}}
+
+/* k15321 in k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15323(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_15323,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15330,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: 2971 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
+
+/* k15328 in k15321 in k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15330(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2971 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k15305 in k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15307(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_15307,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15314,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: 2968 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],C_fix(16));}
+
+/* k15312 in k15305 in k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15314(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2968 outstr */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_14921(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* g3469 in k15281 in k15275 in out in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15287(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_15287,NULL,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+/* library.scm: 2965 outstr */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_14921(t4,t1,((C_word*)t0)[2],t3);}
+
+/* sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15103(C_word t0,C_word 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_15103,NULL,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(0)))){
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15119,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_word)C_eqp(t3,C_fix(1));
+if(C_truep(t5)){
+t6=(C_word)C_subchar(t2,C_fix(0));
+t7=(C_word)C_eqp(t6,C_make_character(46));
+if(C_truep(t7)){
+t8=t4;
+f_15119(t8,(C_truep(t7)?C_SCHEME_FALSE:C_SCHEME_TRUE));}
+else{
+t8=(C_word)C_eqp(t6,C_make_character(35));
+t9=t4;
+f_15119(t9,(C_truep(t8)?C_SCHEME_FALSE:C_SCHEME_TRUE));}}
+else{
+t6=t4;
+f_15119(t6,C_SCHEME_UNDEFINED);}}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* k15117 in sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15119(C_word t0,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_15119,NULL,2,t0,t1);}
+if(C_truep(t1)){
+if(C_truep((C_word)C_substring_compare(lf[611],((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_word)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_15134,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)li516),tmp=(C_word)a,a+=7,tmp));
+t6=((C_word*)t4)[1];
+f_15134(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 k15117 in sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15134(C_word t0,C_word 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_15134,NULL,3,t0,t1,t2);}
+t3=(C_word)C_eqp(t2,C_fix(0));
+if(C_truep(t3)){
+t4=(C_word)C_subchar(((C_word*)t0)[5],C_fix(0));
+t5=(C_word)C_u_i_char_numericp(t4);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_15150,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_15150(t7,t5);}
+else{
+t7=(C_word)C_eqp(t4,C_make_character(43));
+if(C_truep(t7)){
+t8=t6;
+f_15150(t8,t7);}
+else{
+t8=(C_word)C_eqp(t4,C_make_character(45));
+t9=t6;
+f_15150(t9,(C_truep(t8)?t8:(C_word)C_eqp(t4,C_make_character(46))));}}}
+else{
+t4=(C_word)C_subchar(((C_word*)t0)[5],t2);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15184,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_15184(t6,((C_word*)t0)[2]);}
+else{
+t6=(C_word)C_u_i_char_upper_casep(t4);
+t7=t5;
+f_15184(t7,(C_word)C_i_not(t6));}}}
+
+/* k15182 in loop in k15117 in sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15184(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_15033(((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_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 2951 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_15134(t4,((C_word*)t0)[4],t3);}}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k15148 in loop in k15117 in sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15150(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_15150,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15157,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2945 ##sys#string->number */
+t3=*((C_word*)lf[312]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
+else{
+t2=f_15033(((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));}}
+
+/* k15155 in k15148 in loop in k15117 in sym-is-readable? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15157(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));}
+
+/* outreadablesym in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15054(C_word 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_15054,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_block_size(t3);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_15061,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: 2921 outchr */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_14992(t6,t5,t2,C_make_character(124));}
+
+/* k15059 in outreadablesym in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15061(C_word c,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_15061,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_15066,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)li514),tmp=(C_word)a,a+=8,tmp));
+t5=((C_word*)t3)[1];
+f_15066(t5,((C_word*)t0)[2],C_fix(0));}
+
+/* loop in k15059 in outreadablesym in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_15066(C_word t0,C_word 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_15066,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[6]))){
+/* library.scm: 2924 outchr */
+t3=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t3,t1,((C_word*)t0)[4],C_make_character(124));}
+else{
+t3=(C_word)C_subchar(((C_word*)t0)[3],t2);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_15079,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_word)C_eqp(t3,C_make_character(124));
+if(C_truep(t5)){
+if(C_truep(t5)){
+/* library.scm: 2926 outchr */
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t6,t4,((C_word*)t0)[4],C_make_character(92));}
+else{
+t6=t4;
+f_15079(2,t6,C_SCHEME_UNDEFINED);}}
+else{
+t6=(C_word)C_eqp(t3,C_make_character(92));
+if(C_truep(t6)){
+/* library.scm: 2926 outchr */
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_14992(t7,t4,((C_word*)t0)[4],C_make_character(92));}
+else{
+t7=t4;
+f_15079(2,t7,C_SCHEME_UNDEFINED);}}}}
+
+/* k15077 in loop in k15059 in outreadablesym in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15079(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_15079,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15082,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: 2927 outchr */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_14992(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k15080 in k15077 in loop in k15059 in outreadablesym in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15082(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_plus(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 2928 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_15066(t3,((C_word*)t0)[2],t2);}
+
+/* specialchar? in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_15033(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_fix((C_word)C_character_code(t1));
+t3=(C_word)C_fixnum_less_or_equal_p(t2,C_fix(32));
+if(C_truep(t3)){
+return(t3);}
+else{
+t4=(C_word)C_fixnum_greater_or_equal_p(t2,C_fix(128));
+return((C_truep(t4)?t4:(C_word)C_i_memq(t1,lf[610])));}}
+
+/* outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_14992(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_14992,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14996,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2906 cpp */
+((C_proc2)C_retrieve_proc(lf[605]))(2,lf[605],t4);}
+
+/* k14994 in outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14996(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_14996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14999,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_word)C_fixnum_plus(t1,C_fix(1));
+/* library.scm: 2907 cpp */
+((C_proc3)C_retrieve_proc(lf[605]))(3,lf[605],t2,t3);}
+
+/* k14997 in k14994 in outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14999(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_14999,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_15002,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_word)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_15018,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t5=((C_word*)t0)[6];
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=(C_word)C_slot(t6,C_fix(3));
+/* g33483349 */
+t8=t7;
+((C_proc4)C_retrieve_proc(t8))(4,t8,t4,t5,lf[609]);}
+else{
+t4=(C_word)C_slot(((C_word*)t0)[6],C_fix(2));
+t5=(C_word)C_slot(t4,C_fix(2));
+/* g33603361 */
+t6=t5;
+((C_proc4)C_retrieve_proc(t6))(4,t6,((C_word*)t0)[5],((C_word*)t0)[6],((C_word*)t0)[4]);}}
+
+/* k15016 in k14997 in k14994 in outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15018(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_15018,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_15021,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2910 ##sys#print-exit */
+((C_proc2)C_retrieve_proc(lf[607]))(2,lf[607],t2);}
+
+/* k15019 in k15016 in k14997 in k14994 in outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15021(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* g33573358 */
+t2=t1;
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],C_SCHEME_TRUE);}
+
+/* k15000 in k14997 in k14994 in outchr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_15002(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_slot(((C_word*)t0)[4],C_fix(2));
+t3=(C_word)C_slot(t2,C_fix(2));
+/* g33603361 */
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,((C_word*)t0)[3],((C_word*)t0)[4],((C_word*)t0)[2]);}
+
+/* outstr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_14921(C_word t0,C_word 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_14921,NULL,4,t0,t1,t2,t3);}
+if(C_truep(((C_word*)t0)[2])){
+t4=(C_word)C_block_size(t3);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14931,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: 2890 cpp */
+((C_proc2)C_retrieve_proc(lf[605]))(2,lf[605],t5);}
+else{
+t4=t1;
+t5=t2;
+t6=t3;
+t7=(C_word)C_slot(t5,C_fix(2));
+t8=(C_word)C_slot(t7,C_fix(3));
+/* g33483349 */
+t9=t8;
+((C_proc4)C_retrieve_proc(t9))(4,t9,t4,t5,t6);}}
+
+/* k14929 in outstr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14931(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_14931,2,t0,t1);}
+t2=(C_word)C_fixnum_plus(t1,((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14937,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[4]))){
+if(C_truep((C_word)C_fixnum_greaterp(((C_word*)t0)[6],C_fix(3)))){
+t4=(C_word)C_fixnum_difference(((C_word*)t0)[4],t1);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14955,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_fixnum_greaterp(t4,C_fix(0)))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14968,a[2]=t5,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2895 ##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_word)C_slot(t6,C_fix(2));
+t8=(C_word)C_slot(t7,C_fix(3));
+/* g33483349 */
+t9=t8;
+((C_proc4)C_retrieve_proc(t9))(4,t9,t3,t6,lf[608]);}}
+else{
+t4=((C_word*)t0)[3];
+t5=((C_word*)t0)[2];
+t6=(C_word)C_slot(t4,C_fix(2));
+t7=(C_word)C_slot(t6,C_fix(3));
+/* g33483349 */
+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_word)C_slot(t4,C_fix(2));
+t7=(C_word)C_slot(t6,C_fix(3));
+/* g33483349 */
+t8=t7;
+((C_proc4)C_retrieve_proc(t8))(4,t8,t3,t4,t5);}}
+
+/* k14966 in k14929 in outstr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14968(C_word 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)C_slot(t2,C_fix(2));
+t4=(C_word)C_slot(t3,C_fix(3));
+/* g33483349 */
+t5=t4;
+((C_proc4)C_retrieve_proc(t5))(4,t5,((C_word*)t0)[2],t2,t1);}
+
+/* k14953 in k14929 in outstr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14955(C_word 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)C_slot(t2,C_fix(2));
+t4=(C_word)C_slot(t3,C_fix(3));
+/* g33483349 */
+t5=t4;
+((C_proc4)C_retrieve_proc(t5))(4,t5,((C_word*)t0)[2],t2,lf[608]);}
+
+/* k14935 in k14929 in outstr in k14917 in k14914 in k14911 in k14908 in ##sys#print in k14902 in k14898 in k14894 in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14937(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2899 cpp */
+((C_proc3)C_retrieve_proc(lf[605]))(3,lf[605],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* print* in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[398]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,t2);}
+
+/* a14878 in print* in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[601]+1);
+/* g33073308 */
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,t2,C_SCHEME_FALSE,*((C_word*)lf[424]+1));}
+
+/* k14884 in print* in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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: 2867 ##sys#flush-output */
+t3=*((C_word*)lf[475]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[424]+1));}
+
+/* k14887 in k14884 in print* in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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));}
+
+/* print in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14848(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_14848r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_14848r(t0,t1,t2);}}
+
+static void C_ccall f_14848r(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_14863,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14856,a[2]=((C_word)li507),tmp=(C_word)a,a+=3,tmp);
+/* for-each */
+t5=*((C_word*)lf[398]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,t4,t2);}
+
+/* a14855 in print in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14856(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_14856,3,t0,t1,t2);}
+t3=*((C_word*)lf[601]+1);
+/* g32793280 */
+t4=t3;
+((C_proc5)C_retrieve_proc(t4))(5,t4,t1,t2,C_SCHEME_FALSE,*((C_word*)lf[424]+1));}
+
+/* k14861 in print in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14863(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14863,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14866,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2862 ##sys#write-char-0 */
+t3=*((C_word*)lf[596]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,C_make_character(10),*((C_word*)lf[424]+1));}
+
+/* k14864 in k14861 in print in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14866(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 k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14817(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_14817r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_14817r(t0,t1,t2,t3);}}
+
+static void C_ccall f_14817r(C_word 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_14821,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_14821(2,t5,*((C_word*)lf[424]+1));}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_14821(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);}}}
+
+/* k14819 in display in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14821(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_14821,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14824,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2854 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[602]);}
+
+/* k14822 in k14819 in display in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14824(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2855 ##sys#print */
+t2=*((C_word*)lf[601]+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 k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14786(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_14786r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_14786r(t0,t1,t2,t3);}}
+
+static void C_ccall f_14786r(C_word 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_14790,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_14790(2,t5,*((C_word*)lf[424]+1));}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_14790(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);}}}
+
+/* k14788 in write in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14790(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_14790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14793,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2850 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[600]);}
+
+/* k14791 in k14788 in write in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14793(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2851 ##sys#print */
+t2=*((C_word*)lf[601]+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 k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14758(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_14758r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_14758r(t0,t1,t2);}}
+
+static void C_ccall f_14758r(C_word t0,C_word 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_14762,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=*((C_word*)lf[424]+1);
+/* library.scm: 2847 ##sys#write-char/port */
+t5=*((C_word*)lf[597]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,C_make_character(10),t4);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=(C_word)C_i_car(t2);
+/* library.scm: 2847 ##sys#write-char/port */
+t6=*((C_word*)lf[597]+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);}}}
+
+/* k14760 in newline in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14762(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2847 ##sys#write-char/port */
+t2=*((C_word*)lf[597]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],C_make_character(10),t1);}
+
+/* write-char in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14721(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_14721r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_14721r(t0,t1,t2,t3);}}
+
+static void C_ccall f_14721r(C_word 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_14725,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_14725(2,t5,*((C_word*)lf[424]+1));}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=t4;
+f_14725(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);}}}
+
+/* k14723 in write-char in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14725(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_14725,2,t0,t1);}
+t2=(C_word)C_i_check_char_2(((C_word*)t0)[3],lf[598]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14731,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2842 ##sys#check-port* */
+t4=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t1,lf[598]);}
+
+/* k14729 in k14723 in write-char in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14731(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_14731,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14734,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: 2843 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,lf[598]);}
+
+/* k14732 in k14729 in k14723 in write-char in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14734(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2844 ##sys#write-char-0 */
+t2=*((C_word*)lf[596]+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 k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14709(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_14709,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14713,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2836 ##sys#check-port* */
+t5=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[598]);}
+
+/* k14711 in ##sys#write-char/port in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14713(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_check_char_2(((C_word*)t0)[4],lf[598]);
+/* library.scm: 2838 ##sys#write-char-0 */
+t3=*((C_word*)lf[596]+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 k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14696(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_14696,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(t3,C_fix(2));
+t5=(C_word)C_slot(t4,C_fix(2));
+/* g31873188 */
+t6=t5;
+((C_proc4)C_retrieve_proc(t6))(4,t6,t1,t3,t2);}
+
+/* copy-read-table in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14645(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_14645,3,t0,t1,t2);}
+t3=(C_word)C_i_check_structure_2(t2,lf[595],lf[594]);
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14659,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep(t4)){
+t6=(C_word)C_block_size(t4);
+/* library.scm: 2823 ##sys#grow-vector */
+f_9589(t5,t4,t6,C_SCHEME_FALSE);}
+else{
+t6=t5;
+f_14659(2,t6,C_SCHEME_FALSE);}}
+
+/* k14657 in copy-read-table in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14659(C_word c,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_14659,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(2));
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14666,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_word)C_block_size(t2);
+/* library.scm: 2825 ##sys#grow-vector */
+f_9589(t3,t2,t4,C_SCHEME_FALSE);}
+else{
+t4=t3;
+f_14666(2,t4,C_SCHEME_FALSE);}}
+
+/* k14664 in k14657 in copy-read-table in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14666,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(3));
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14673,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_word)C_block_size(t2);
+/* library.scm: 2827 ##sys#grow-vector */
+f_9589(t3,t2,t4,C_SCHEME_FALSE);}
+else{
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_record(&a,4,lf[595],((C_word*)t0)[2],t1,C_SCHEME_FALSE));}}
+
+/* k14671 in k14664 in k14657 in copy-read-table in k14641 in k14637 in k14633 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14673(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_14673,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_record(&a,4,lf[595],((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* syntax-setter in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_14583(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_14583,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_14585,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=t3,a[5]=t2,a[6]=((C_word)li498),tmp=(C_word)a,a+=7,tmp));}
+
+/* f_14585 in syntax-setter in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14585(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_14585,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_symbolp(t2))){
+/* library.scm: 2781 ##sys#set-read-mark! */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[590]+1)))(4,*((C_word*)lf[590]+1),t1,t2,t3);}
+else{
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14598,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: 2783 crt */
+t5=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}}
+
+/* k14596 */
+static void C_ccall f_14598(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_14598,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14601,a[2]=((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_word)C_slot(t1,((C_word*)t0)[5]))){
+t3=t2;
+f_14601(t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14631,a[2]=((C_word*)t0)[5],a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2785 ##sys#make-vector */
+t4=*((C_word*)lf[355]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_fix(256),C_SCHEME_FALSE);}}
+
+/* k14629 in k14596 */
+static void C_ccall f_14631(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[4];
+f_14601(t2,(C_word)C_i_setslot(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* k14599 in k14596 */
+static void C_fcall f_14601(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_14601,NULL,2,t0,t1);}
+t2=(C_word)C_i_check_char_2(((C_word*)t0)[8],((C_word*)t0)[7]);
+t3=(C_word)C_fix((C_word)C_character_code(((C_word*)t0)[8]));
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14610,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: 2788 ##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]);}
+
+/* k14608 in k14599 in k14596 */
+static void C_ccall f_14610(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_14610,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[7],((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14621,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2789 wrap */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k14619 in k14608 in k14599 in k14596 */
+static void C_ccall f_14621(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_word)C_i_setslot(((C_word*)t0)[3],((C_word*)t0)[2],t1));}
+
+/* ##sys#set-read-mark! in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14560(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_14560,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_assq(t2,lf[585]);
+if(C_truep(t4)){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_setslot(t4,C_fix(1),t3));}
+else{
+t5=(C_word)C_a_i_cons(&a,2,t2,t3);
+t6=(C_word)C_a_i_cons(&a,2,t5,lf[585]);
+t7=C_mutate(&lf[585] /* (set! read-marks ...) */,t6);
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,t7);}}
+
+/* f_14523 in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14523(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_14523,4,t0,t1,t2,t3);}
+t4=t2;
+t5=(C_word)C_eqp(t4,C_make_character(102));
+t6=(C_truep(t5)?t5:(C_word)C_eqp(t4,C_make_character(70)));
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14536,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2756 ##sys#read-char-0 */
+t8=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,t3);}
+else{
+t7=(C_word)C_eqp(t4,C_make_character(116));
+t8=(C_truep(t7)?t7:(C_word)C_eqp(t4,C_make_character(84)));
+if(C_truep(t8)){
+t9=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14548,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2757 ##sys#read-char-0 */
+t10=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t3);}
+else{
+/* library.scm: 2758 ##sys#read-error */
+t9=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,t1,t3,lf[589],t2);}}}
+
+/* k14546 */
+static void C_ccall f_14548(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);}
+
+/* k14534 */
+static void C_ccall f_14536(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 k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14461(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_14461,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_fixnum_less_or_equal_p(C_fix(55296),t2))){
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,C_fix(56319)))){
+if(C_truep((C_word)C_fixnum_less_or_equal_p(C_fix(56320),t3))){
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(57343)))){
+t4=(C_word)C_fixnum_shift_right(t2,C_fix(6));
+t5=(C_word)C_fixnum_and(t4,C_fix(31));
+t6=(C_word)C_fixnum_plus(C_fix(1),t5);
+t7=(C_word)C_fixnum_shift_left(t6,C_fix(16));
+t8=(C_word)C_fixnum_and(t2,C_fix(63));
+t9=(C_word)C_fixnum_shift_left(t8,C_fix(10));
+t10=(C_word)C_fixnum_and(t3,C_fix(1023));
+t11=(C_word)C_fixnum_or(t9,t10);
+t12=t1;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)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 k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14449(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_14449,3,t0,t1,t2);}
+t3=(C_word)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_word)C_fixnum_less_or_equal_p(t2,C_fix(57343)):C_SCHEME_FALSE));}
+
+/* ##sys#char->utf8-string in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14284(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_14284,3,t0,t1,t2);}
+t3=(C_word)C_fix((C_word)C_character_code(t2));
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(127)))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_string(&a,1,t2));}
+else{
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(2047)))){
+t4=(C_word)C_fixnum_shift_right(t3,C_fix(6));
+t5=(C_word)C_fixnum_or(C_fix(192),t4);
+t6=(C_word)C_make_character((C_word)C_unfix(t5));
+t7=(C_word)C_fixnum_and(t3,C_fix(63));
+t8=(C_word)C_fixnum_or(C_fix(128),t7);
+t9=(C_word)C_make_character((C_word)C_unfix(t8));
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_a_i_string(&a,2,t6,t9));}
+else{
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(65535)))){
+t4=(C_word)C_fixnum_shift_right(t3,C_fix(12));
+t5=(C_word)C_fixnum_or(C_fix(224),t4);
+t6=(C_word)C_make_character((C_word)C_unfix(t5));
+t7=(C_word)C_fixnum_shift_right(t3,C_fix(6));
+t8=(C_word)C_fixnum_and(t7,C_fix(63));
+t9=(C_word)C_fixnum_or(C_fix(128),t8);
+t10=(C_word)C_make_character((C_word)C_unfix(t9));
+t11=(C_word)C_fixnum_and(t3,C_fix(63));
+t12=(C_word)C_fixnum_or(C_fix(128),t11);
+t13=(C_word)C_make_character((C_word)C_unfix(t12));
+t14=t1;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_string(&a,3,t6,t10,t13));}
+else{
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t3,C_fix(2097151)))){
+t4=(C_word)C_fixnum_shift_right(t3,C_fix(18));
+t5=(C_word)C_fixnum_or(C_fix(240),t4);
+t6=(C_word)C_make_character((C_word)C_unfix(t5));
+t7=(C_word)C_fixnum_shift_right(t3,C_fix(12));
+t8=(C_word)C_fixnum_and(t7,C_fix(63));
+t9=(C_word)C_fixnum_or(C_fix(128),t8);
+t10=(C_word)C_make_character((C_word)C_unfix(t9));
+t11=(C_word)C_fixnum_shift_right(t3,C_fix(6));
+t12=(C_word)C_fixnum_and(t11,C_fix(63));
+t13=(C_word)C_fixnum_or(C_fix(128),t12);
+t14=(C_word)C_make_character((C_word)C_unfix(t13));
+t15=(C_word)C_fixnum_and(t3,C_fix(63));
+t16=(C_word)C_fixnum_or(C_fix(128),t15);
+t17=(C_word)C_make_character((C_word)C_unfix(t16));
+t18=t1;
+((C_proc2)(void*)(*((C_word*)t18+1)))(2,t18,(C_word)C_a_i_string(&a,4,t6,t10,t14,t17));}
+else{
+/* library.scm: 2734 error */
+t4=*((C_word*)lf[15]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,lf[588],t3);}}}}}
+
+/* ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11891(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_11891,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11895,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: 2242 csp */
+t5=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11895(C_word c,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_11895,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_11898,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: 2243 ksp */
+t5=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11898(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_11898,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11901,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: 2244 psp */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11901(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_11901,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11904,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: 2245 sep */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11904(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_11904,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|13,a[1]=(C_word)f_11907,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: 2246 crt */
+t3=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t3))(2,t3,t2);}
+
+/* k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11907(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11907,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[518];
+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_11909,a[2]=((C_word*)t0)[13],a[3]=((C_word)li452),tmp=(C_word)a,a+=4,tmp));
+t20=C_set_block_item(t10,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11915,a[2]=((C_word*)t0)[12],a[3]=((C_word)li453),tmp=(C_word)a,a+=4,tmp));
+t21=C_set_block_item(t12,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11924,a[2]=((C_word*)t0)[13],a[3]=((C_word)li455),tmp=(C_word)a,a+=4,tmp));
+t22=C_set_block_item(t14,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11960,a[2]=((C_word*)t0)[13],a[3]=((C_word)li456),tmp=(C_word)a,a+=4,tmp));
+t23=C_set_block_item(t16,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11969,a[2]=t14,a[3]=t6,a[4]=((C_word)li457),tmp=(C_word)a,a+=5,tmp));
+t24=C_set_block_item(t18,0,(*a=C_CLOSURE_TYPE|22,a[1]=(C_word)f_11984,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)li491),tmp=(C_word)a,a+=23,tmp));
+/* library.scm: 2712 readrec */
+t25=((C_word*)t18)[1];
+f_11984(t25,((C_word*)t0)[2]);}
+
+/* readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11984(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11984,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_11987,a[2]=((C_word*)t0)[20],a[3]=((C_word*)t0)[21],a[4]=((C_word)li459),tmp=(C_word)a,a+=5,tmp));
+t39=C_set_block_item(t5,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12035,a[2]=((C_word*)t0)[19],a[3]=((C_word*)t0)[21],a[4]=((C_word)li461),tmp=(C_word)a,a+=5,tmp));
+t40=C_set_block_item(t7,0,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12095,a[2]=((C_word)li463),tmp=(C_word)a,a+=3,tmp));
+t41=C_set_block_item(t9,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12131,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)li465),tmp=(C_word)a,a+=8,tmp));
+t42=C_set_block_item(t11,0,(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12504,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)li469),tmp=(C_word)a,a+=10,tmp));
+t43=C_set_block_item(t13,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12715,a[2]=t11,a[3]=((C_word*)t0)[14],a[4]=((C_word*)t0)[21],a[5]=((C_word)li470),tmp=(C_word)a,a+=6,tmp));
+t44=C_set_block_item(t15,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12733,a[2]=t21,a[3]=t35,a[4]=((C_word*)t0)[21],a[5]=((C_word*)t0)[13],a[6]=((C_word)li471),tmp=(C_word)a,a+=7,tmp));
+t45=C_set_block_item(t17,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12780,a[2]=t15,a[3]=((C_word*)t0)[21],a[4]=((C_word)li472),tmp=(C_word)a,a+=5,tmp));
+t46=C_set_block_item(t19,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12840,a[2]=t15,a[3]=((C_word*)t0)[21],a[4]=((C_word)li473),tmp=(C_word)a,a+=5,tmp));
+t47=C_set_block_item(t21,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12910,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)li475),tmp=(C_word)a,a+=8,tmp));
+t48=C_set_block_item(t23,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12972,a[2]=((C_word*)t0)[21],a[3]=((C_word)li477),tmp=(C_word)a,a+=4,tmp));
+t49=C_set_block_item(t25,0,(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13027,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)li478),tmp=(C_word)a,a+=8,tmp));
+t50=C_set_block_item(t27,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13057,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[21],a[4]=((C_word)li480),tmp=(C_word)a,a+=5,tmp));
+t51=C_set_block_item(t29,0,(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13132,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)li481),tmp=(C_word)a,a+=7,tmp));
+t52=C_set_block_item(t31,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13348,a[2]=((C_word*)t0)[21],a[3]=((C_word)li483),tmp=(C_word)a,a+=4,tmp));
+t53=C_set_block_item(t33,0,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13431,a[2]=t21,a[3]=((C_word*)t0)[19],a[4]=((C_word*)t0)[21],a[5]=((C_word)li485),tmp=(C_word)a,a+=6,tmp));
+t54=C_set_block_item(t35,0,(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13517,a[2]=((C_word*)t0)[8],a[3]=t37,a[4]=((C_word)li486),tmp=(C_word)a,a+=5,tmp));
+t55=C_set_block_item(t37,0,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13586,a[2]=((C_word*)t0)[7],a[3]=((C_word)li487),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[563]):(C_truep(((C_word*)t0)[5])?lf[564]:lf[565]));
+t57=C_mutate(((C_word *)((C_word*)t0)[4])+1,t56);
+t58=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_13601,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: 2591 r-spaces */
+t59=((C_word*)t3)[1];
+f_11987(t59,t58);}
+
+/* k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13601(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_13601,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|23,a[1]=(C_word)f_13604,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2592 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[21]);}
+
+/* k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13604(C_word c,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_13604,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[23],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|24,a[1]=(C_word)f_13610,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_fix((C_word)C_character_code(t1));
+t5=t3;
+f_13610(t5,(C_word)C_slot(t2,t4));}
+else{
+t4=t3;
+f_13610(t4,C_SCHEME_FALSE);}}
+
+/* k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13610(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word 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_13610,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* library.scm: 2597 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_13625,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[24],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2601 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_13641,a[2]=((C_word*)t0)[21],a[3]=((C_word*)t0)[24],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2604 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_13657,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: 2607 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_13693,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: 2613 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
+case C_make_character(40):
+/* library.scm: 2695 r-list */
+t2=((C_word*)((C_word*)t0)[8])[1];
+f_12504(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_14167,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: 2696 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[22]);
+case C_make_character(34):
+/* library.scm: 2697 r-string */
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_12131(t2,((C_word*)t0)[24],C_make_character(34));
+case C_make_character(46):
+/* library.scm: 2698 r-number */
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_12733(t2,((C_word*)t0)[24],C_SCHEME_FALSE);
+default:
+t2=(C_word)C_eqp(((C_word*)t0)[23],C_make_character(45));
+t3=(C_truep(t2)?t2:(C_word)C_eqp(((C_word*)t0)[23],C_make_character(43)));
+if(C_truep(t3)){
+/* library.scm: 2699 r-number */
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_12733(t4,((C_word*)t0)[24],C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)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_word)C_u_i_char_numericp(((C_word*)t0)[23]))){
+/* library.scm: 2702 r-number */
+t4=((C_word*)((C_word*)t0)[5])[1];
+f_12733(t4,((C_word*)t0)[24],C_SCHEME_FALSE);}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[23],((C_word*)((C_word*)t0)[4])[1]))){
+/* library.scm: 2704 reserved-character */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11960(t4,((C_word*)t0)[24],((C_word*)t0)[23]);}
+else{
+switch(((C_word*)t0)[23]){
+case C_make_character(91):
+/* library.scm: 2707 r-list */
+t4=((C_word*)((C_word*)t0)[8])[1];
+f_12504(t4,((C_word*)t0)[24],C_make_character(91),C_make_character(93));
+case C_make_character(123):
+/* library.scm: 2708 r-list */
+t4=((C_word*)((C_word*)t0)[8])[1];
+f_12504(t4,((C_word*)t0)[24],C_make_character(123),C_make_character(125));
+default:
+t4=(C_word)C_eqp(((C_word*)t0)[23],C_make_character(93));
+t5=(C_truep(t4)?t4:(C_word)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_14254,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: 2709 ##sys#read-char-0 */
+t7=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[22]);}
+else{
+/* library.scm: 2710 r-symbol */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_13027(t6,((C_word*)t0)[24]);}}}}}}}}}
+
+/* k14252 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14254(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2709 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]);}
+
+/* k14165 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14167(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2696 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]);}
+
+/* k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13693(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_13693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|16,a[1]=(C_word)f_13696,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2614 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[14]);}
+
+/* k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_13696,2,t0,t1);}
+if(C_truep((C_word)C_u_i_char_numericp(t1))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13705,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_13749,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2616 r-digits */
+t4=((C_word*)((C_word*)t0)[13])[1];
+f_12972(t4,t3);}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[16],C_fix(2));
+t3=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_13755,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_word)C_fix((C_word)C_character_code(t1));
+t5=t3;
+f_13755(t5,(C_word)C_slot(t2,t4));}
+else{
+t4=t3;
+f_13755(t4,C_SCHEME_FALSE);}}}
+
+/* k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13755(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_13755,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* library.scm: 2629 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_word)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_13773,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2632 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13785,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2633 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13797,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2634 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13809,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[12],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2635 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13821,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2636 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13837,a[2]=((C_word*)t0)[11],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2637 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13853,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: 2639 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
+case C_make_character(40):
+/* library.scm: 2648 r-vector */
+t3=((C_word*)((C_word*)t0)[8])[1];
+f_12715(t3,((C_word*)t0)[15]);
+case C_make_character(92):
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13917,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2649 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13929,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: 2651 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13944,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2654 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13956,a[2]=((C_word*)t0)[15],a[3]=((C_word*)t0)[9],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2657 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13971,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2660 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13987,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2663 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_14003,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: 2666 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_14023,a[2]=((C_word*)t0)[15],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14027,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2669 r-token */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_12910(t5,t4);
+case C_make_character(43):
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14036,a[2]=((C_word*)t0)[9],a[3]=((C_word*)t0)[15],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2671 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_14059,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: 2675 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[13]);
+default:
+/* library.scm: 2694 ##sys#user-read-hook */
+t3=*((C_word*)lf[587]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[15],((C_word*)t0)[14],((C_word*)t0)[13]);}}}
+
+/* k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_14059,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_14062,a[2]=((C_word*)t0)[2],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: 2676 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k14060 in k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_14062,2,t0,t1);}
+t2=(C_word)C_u_i_char_whitespacep(t1);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(C_make_character(47),t1));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14074,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2678 skip-to-eol */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_11924(t5,t4);}
+else{
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14080,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2681 r-token */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t5,t4);}}
+
+/* k14078 in k14060 in k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14080(C_word c,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_14080,2,t0,t1);}
+if(C_truep((C_word)C_i_string_equal_p(lf[578],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_word)C_i_equalp(t2,lf[579]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(t2,lf[580]))?C_SCHEME_TRUE:(C_truep((C_word)C_i_equalp(t2,lf[581]))?C_SCHEME_TRUE:C_SCHEME_FALSE))))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14099,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2684 ##sys#string-append */
+t4=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,lf[582],t1);}
+else{
+if(C_truep((C_word)C_i_string_equal_p(lf[583],t1))){
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_slot(((C_word*)t0)[2],C_fix(4)));}
+else{
+if(C_truep((C_word)C_i_string_equal_p(lf[584],t1))){
+/* library.scm: 2688 port-name */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[477]+1)))(3,*((C_word*)lf[477]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_14136,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2690 string->symbol */
+t4=*((C_word*)lf[332]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}}}}}
+
+/* k14134 in k14078 in k14060 in k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14136(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_assq(t1,lf[585]);
+if(C_truep(t2)){
+t3=(C_word)C_slot(t2,C_fix(1));
+/* g30323033 */
+t4=t3;
+((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+/* library.scm: 2693 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[4],((C_word*)t0)[3],lf[586],((C_word*)t0)[2]);}}
+
+/* k14097 in k14078 in k14060 in k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14099(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: 2576 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t2,t1);}
+
+/* k14072 in k14060 in k14057 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14074(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2679 readrec */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11984(t2,((C_word*)t0)[2]);}
+
+/* k14034 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14036(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_14036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14039,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2672 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k14037 in k14034 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14039(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_14039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14050,a[2]=((C_word*)t0)[3],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2673 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k14048 in k14037 in k14034 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14050(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_14050,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,3,lf[576],t2,lf[577]));}
+
+/* k14025 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14027(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2669 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[575],t1);}
+
+/* k14021 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14023(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: 2576 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t2,t1);}
+
+/* k14001 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14003(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_14003,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_14010,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2667 r-token */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t3,t2);}
+
+/* k14008 in k14001 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_14010(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2667 build-keyword */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13586(t2,((C_word*)t0)[2],t1);}
+
+/* k13985 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13987,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13994,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2664 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k13992 in k13985 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13994(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_13994,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[574],t1));}
+
+/* k13969 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13971(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13971,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13978,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2661 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k13976 in k13969 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13978(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_13978,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[573],t1));}
+
+/* k13954 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13956(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_13956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13959,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2658 readrec */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11984(t3,t2);}
+
+/* k13957 in k13954 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13959(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2658 readrec */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11984(t2,((C_word*)t0)[2]);}
+
+/* k13942 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13944(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2655 r-ext-symbol */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13431(t2,((C_word*)t0)[2]);}
+
+/* k13927 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13929(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_13929,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13932,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2652 r-comment */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_13348(t3,t2);}
+
+/* k13930 in k13927 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13932(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2652 readrec */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11984(t2,((C_word*)t0)[2]);}
+
+/* k13915 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13917(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2649 r-char */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13132(t2,((C_word*)t0)[2]);}
+
+/* k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13853(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_13853,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13856,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: 2640 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13854 in k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13856(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_13856,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13859,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)C_eofp(t1))){
+/* library.scm: 2643 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[571]);}
+else{
+switch(t1){
+case C_make_character(105):
+t3=t2;
+f_13859(2,t3,C_SCHEME_FALSE);
+case C_make_character(115):
+t3=t2;
+f_13859(2,t3,C_SCHEME_TRUE);
+default:
+/* library.scm: 2646 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],lf[572],t1);}}}
+
+/* k13857 in k13854 in k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13859(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_13859,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_13864,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=t5,a[5]=((C_word)li488),tmp=(C_word)a,a+=6,tmp);
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13869,a[2]=((C_word*)t0)[3],a[3]=((C_word)li489),tmp=(C_word)a,a+=4,tmp);
+t8=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13875,a[2]=t5,a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li490),tmp=(C_word)a,a+=6,tmp);
+/* ##sys#dynamic-wind */
+t9=*((C_word*)lf[405]+1);
+((C_proc5)(void*)(*((C_word*)t9+1)))(5,t9,((C_word*)t0)[2],t6,t7,t8);}
+
+/* a13874 in k13857 in k13854 in k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13875(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_13875,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);}
+
+/* a13868 in k13857 in k13854 in k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13869(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_13869,2,t0,t1);}
+/* library.scm: 2647 readrec */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t2,t1);}
+
+/* a13863 in k13857 in k13854 in k13851 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13864(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_13864,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);}
+
+/* k13835 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13837(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13837,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13844,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2637 r-number-with-radix */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12840(t3,t2);}
+
+/* k13842 in k13835 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13844(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2637 ##sys#inexact->exact */
+t2=*((C_word*)lf[287]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13819 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13821(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13821,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13828,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2636 r-number-with-radix */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12840(t3,t2);}
+
+/* k13826 in k13819 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13828(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2636 ##sys#exact->inexact */
+t2=*((C_word*)lf[285]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13807 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13809(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2635 r-number-with-exactness */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_12780(t2,((C_word*)t0)[2],C_fix(2));}
+
+/* k13795 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13797(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2634 r-number-with-exactness */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_12780(t2,((C_word*)t0)[2],C_fix(8));}
+
+/* k13783 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13785(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2633 r-number-with-exactness */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_12780(t2,((C_word*)t0)[2],C_fix(10));}
+
+/* k13771 in k13753 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13773(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2632 r-number-with-exactness */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_12780(t2,((C_word*)t0)[2],C_fix(16));}
+
+/* k13747 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13749(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2616 string->number */
+C_string_to_number(3,0,((C_word*)t0)[2],t1);}
+
+/* k13703 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13705(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_13705,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13708,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: 2617 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13706 in k13703 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13708(C_word c,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_13708,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(3));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13714,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_word)C_fix((C_word)C_character_code(t1));
+t5=t3;
+f_13714(t5,(C_word)C_slot(t2,t4));}
+else{
+t4=t3;
+f_13714(t4,C_SCHEME_FALSE);}}
+
+/* k13712 in k13706 in k13703 in k13694 in k13691 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13714(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: 2621 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_word)C_eqp(((C_word*)t0)[4],C_make_character(41));
+t3=(C_truep(t2)?t2:(C_word)C_u_i_char_whitespacep(((C_word*)t0)[4]));
+if(C_truep(t3)){
+/* library.scm: 2623 ##sys#sharp-number-hook */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[506]+1)))(4,*((C_word*)lf[506]+1),((C_word*)t0)[5],((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+/* library.scm: 2624 ##sys#read-error */
+t4=*((C_word*)lf[507]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,((C_word*)t0)[5],((C_word*)t0)[3],lf[570],((C_word*)t0)[4],((C_word*)t0)[2]);}}}
+
+/* k13655 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13657(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_13657,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13684,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: 2608 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13682 in k13655 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t5;
+C_word ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13684,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_make_character(64));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13666,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2609 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_13680,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2611 readrec */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11984(t4,t3);}}
+
+/* k13678 in k13682 in k13655 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13680(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_13680,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[569],t1));}
+
+/* k13664 in k13682 in k13655 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13666,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13673,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2610 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k13671 in k13664 in k13682 in k13655 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13673(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_13673,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[568],t1));}
+
+/* k13639 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13641(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13641,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13648,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2605 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k13646 in k13639 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13648(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_13648,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[567],t1));}
+
+/* k13623 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13625(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13625,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13632,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2602 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k13630 in k13623 in k13608 in k13602 in k13599 in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13632(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_13632,2,t0,t1);}
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_list(&a,2,lf[566],t1));}
+
+/* build-keyword in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13586(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_13586,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13594,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2579 ##sys#string-append */
+t4=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,((C_word*)t0)[2],t2);}
+
+/* k13592 in build-keyword in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13594(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2579 ##sys#intern-symbol */
+C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* resolve-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13517(C_word t0,C_word 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_13517,NULL,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13524,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(1)))){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13539,a[2]=t2,a[3]=t3,a[4]=((C_word*)t0)[2],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_eqp(((C_word*)t0)[2],lf[562]);
+if(C_truep(t6)){
+t7=(C_word)C_eqp(C_make_character(58),(C_word)C_subchar(t2,C_fix(0)));
+if(C_truep(t7)){
+/* library.scm: 2568 ##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_13539(2,t8,C_SCHEME_FALSE);}}
+else{
+t7=t5;
+f_13539(2,t7,C_SCHEME_FALSE);}}
+else{
+t5=t4;
+f_13524(2,t5,C_SCHEME_FALSE);}}
+
+/* k13537 in resolve-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_13524(2,t3,t2);}
+else{
+t2=(C_word)C_eqp(((C_word*)t0)[4],lf[561]);
+if(C_truep(t2)){
+t3=(C_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+t4=(C_word)C_subchar(((C_word*)t0)[2],t3);
+t5=(C_word)C_eqp(C_make_character(58),t4);
+if(C_truep(t5)){
+t6=(C_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 2571 ##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_13524(2,t6,C_SCHEME_FALSE);}}
+else{
+t3=((C_word*)t0)[5];
+f_13524(2,t3,C_SCHEME_FALSE);}}}
+
+/* k13522 in resolve-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13524(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-keyword2550 */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_13586(t2,((C_word*)t0)[3],t1);}
+else{
+t2=((C_word*)t0)[3];
+t3=((C_word*)t0)[2];
+/* library.scm: 2576 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t2,t3);}}
+
+/* r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13431(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_13431,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13435,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: 2547 ##sys#make-string */
+t3=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,C_fix(1));}
+
+/* k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13435(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_13435,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13438,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: 2548 r-token */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t3,t2);}
+
+/* k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13438(C_word c,C_word t0,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_13438,2,t0,t1);}
+t2=t1;
+t3=(*a=C_VECTOR_TYPE|1,a[1]=t2,tmp=(C_word)a,a+=2,tmp);
+t4=(C_word)C_block_size(((C_word*)t3)[1]);
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13444,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[503]+1))){
+t6=t5;
+f_13444(2,t6,C_SCHEME_UNDEFINED);}
+else{
+/* library.scm: 2551 ##sys#read-error */
+t6=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,((C_word*)t0)[5],lf[560],((C_word*)t3)[1]);}}
+
+/* k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13444(C_word c,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_13444,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_13449,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)li484),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_13449(t5,((C_word*)t0)[2],C_fix(0));}
+
+/* loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13449(C_word t0,C_word 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_13449,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,((C_word*)t0)[7]))){
+/* library.scm: 2554 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,((C_word*)t0)[6],lf[559],((C_word*)((C_word*)t0)[5])[1]);}
+else{
+t3=(C_word)C_subbyte(((C_word*)((C_word*)t0)[5])[1],t2);
+t4=(C_word)C_eqp(t3,C_fix(35));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13468,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_word)C_fixnum_greaterp(t2,C_fix(31)))){
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13497,a[2]=t5,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2557 ##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_13468(t6,C_SCHEME_UNDEFINED);}}
+else{
+t5=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 2561 loop */
+t9=t1;
+t10=t5;
+t1=t9;
+t2=t10;
+goto loop;}}}
+
+/* k13495 in loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_13468(t3,t2);}
+
+/* k13466 in loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13468(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_13468,NULL,2,t0,t1);}
+t2=(C_word)C_setbyte(((C_word*)t0)[7],C_fix(0),((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13478,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13482,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: 2560 ##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]);}
+
+/* k13480 in k13466 in loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13482(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_13482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13486,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_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 2560 ##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]);}
+
+/* k13484 in k13480 in k13466 in loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13486(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2560 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);}
+
+/* k13476 in k13466 in loop in k13442 in k13436 in k13433 in r-ext-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13478(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2559 ##sys#intern-symbol */
+C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* r-comment in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13348(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_13348,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_13354,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word)li482),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_13354(t5,t1,C_fix(0));}
+
+/* loop in r-comment in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13354(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_13354,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13358,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: 2533 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k13356 in loop in r-comment in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13358(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_13358,2,t0,t1);}
+switch(t1){
+case C_make_character(124):
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13394,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: 2535 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_13417,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: 2539 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);
+default:
+if(C_truep((C_word)C_eofp(t1))){
+/* library.scm: 2543 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[558]);}
+else{
+/* library.scm: 2544 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13354(t2,((C_word*)t0)[4],((C_word*)t0)[5]);}}}
+
+/* k13415 in k13356 in loop in r-comment in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+t2=(C_word)C_eqp(C_make_character(124),t1);
+if(C_truep(t2)){
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 2539 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_13354(t4,((C_word*)t0)[2],t3);}
+else{
+t3=((C_word*)t0)[4];
+/* library.scm: 2539 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_13354(t4,((C_word*)t0)[2],t3);}}
+
+/* k13392 in k13356 in loop in r-comment in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13394(C_word c,C_word 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(C_make_character(35),t1);
+if(C_truep(t2)){
+t3=(C_word)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_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 2537 loop */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_13354(t5,((C_word*)t0)[3],t4);}}
+else{
+/* library.scm: 2538 loop */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_13354(t3,((C_word*)t0)[3],((C_word*)t0)[4]);}}
+
+/* r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13132(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_13132,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13136,a[2]=((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: 2498 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
+
+/* k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13136(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_13136,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13139,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: 2499 r-token */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t3,t2);}
+
+/* k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13139(C_word c,C_word t0,C_word 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_13139,2,t0,t1);}
+t2=(C_word)C_block_size(t1);
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(1)))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13151,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_word)C_eqp(C_make_character(120),((C_word*)t0)[3]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13321,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t4)){
+t6=t5;
+f_13321(t6,t4);}
+else{
+t6=(C_word)C_eqp(C_make_character(117),((C_word*)t0)[3]);
+t7=t5;
+f_13321(t7,(C_truep(t6)?t6:(C_word)C_eqp(C_make_character(85),((C_word*)t0)[3])));}}
+else{
+if(C_truep((C_word)C_i_memq(((C_word*)t0)[3],((C_word*)t0)[2]))){
+/* library.scm: 2528 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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]);}}}
+
+/* k13319 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13321(C_word t0,C_word t1){
+C_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_13321,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13328,a[2]=((C_word*)t0)[4],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2503 ##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_13151(2,t2,C_SCHEME_FALSE);}}
+
+/* k13326 in k13319 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13328(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2503 ##sys#string->number */
+t2=*((C_word*)lf[312]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],t1,C_fix(16));}
+
+/* k13149 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13151(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_13151,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_word)C_make_character((C_word)C_unfix(t3)));}
+else{
+t2=(C_word)C_fix((C_word)C_character_code((C_word)C_subchar(((C_word*)t0)[5],C_fix(0))));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13168,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_word)C_fixnum_less_or_equal_p(C_fix(192),t2))){
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,C_fix(247)))){
+t4=(C_word)C_fixnum_shift_right(t2,C_fix(4));
+t5=(C_word)C_fixnum_and(t4,C_fix(3));
+if(C_truep(t5)){
+t6=(C_word)C_fixnum_shift_right(t5,C_fix(1));
+t7=(C_word)C_fixnum_or(t5,t6);
+t8=(C_word)C_fixnum_difference(t5,C_fix(1));
+t9=(C_word)C_fixnum_and(t7,t8);
+t10=(C_word)C_fixnum_plus(C_fix(2),t9);
+if(C_truep(t10)){
+t11=(C_word)C_eqp(((C_word*)t0)[2],t10);
+if(C_truep(t11)){
+t12=(C_word)C_fixnum_difference(C_fix(8),t10);
+t13=(C_word)C_fixnum_shift_left(C_fix(1),t12);
+t14=(C_word)C_fixnum_difference(t13,C_fix(1));
+t15=(C_word)C_fixnum_and(t2,t14);
+t16=(C_word)C_fixnum_shift_left(t15,C_fix(6));
+t17=(C_word)C_fix((C_word)C_character_code((C_word)C_subchar(((C_word*)t0)[5],C_fix(1))));
+t18=(C_word)C_fixnum_and(t17,C_fix(63));
+t19=(C_word)C_fixnum_plus(t16,t18);
+t20=t19;
+if(C_truep(t20)){
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t10,C_fix(3)))){
+t21=(C_word)C_fixnum_shift_left(t20,C_fix(6));
+t22=(C_word)C_fix((C_word)C_character_code((C_word)C_subchar(((C_word*)t0)[5],C_fix(2))));
+t23=(C_word)C_fixnum_and(t22,C_fix(63));
+t24=(C_word)C_fixnum_plus(t21,t23);
+t25=t20=t24;
+t26=(C_word)C_eqp(t10,C_fix(4));
+if(C_truep(t26)){
+t27=(C_word)C_fixnum_shift_left(t20,C_fix(6));
+t28=(C_word)C_fix((C_word)C_character_code((C_word)C_subchar(((C_word*)t0)[5],C_fix(3))));
+t29=(C_word)C_fixnum_and(t28,C_fix(63));
+t30=(C_word)C_fixnum_plus(t27,t29);
+t31=t20=t30;
+t32=t3;
+f_13168(t32,(C_word)C_make_character((C_word)C_unfix(t20)));}
+else{
+t27=t3;
+f_13168(t27,(C_word)C_make_character((C_word)C_unfix(t20)));}}
+else{
+t21=t3;
+f_13168(t21,(C_word)C_make_character((C_word)C_unfix(t20)));}}
+else{
+t21=t3;
+f_13168(t21,C_SCHEME_FALSE);}}
+else{
+t12=t3;
+f_13168(t12,C_SCHEME_FALSE);}}
+else{
+t11=t3;
+f_13168(t11,C_SCHEME_FALSE);}}
+else{
+t6=t3;
+f_13168(t6,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_13168(t4,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_13168(t4,C_SCHEME_FALSE);}}
+else{
+t4=t3;
+f_13168(t4,C_SCHEME_FALSE);}}}
+
+/* k13166 in k13149 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13168(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_13168,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_13174,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_13184,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2526 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t3,((C_word*)t0)[3]);}}
+
+/* k13182 in k13166 in k13149 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13184(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2526 char-name */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k13172 in k13166 in k13149 in k13137 in k13134 in r-char in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13174(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: 2527 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[557],((C_word*)t0)[2]);}}
+
+/* r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13057(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_13057,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13130,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2485 read-unreserved-char-0 */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11969(t3,t2,((C_word*)t0)[3]);}
+
+/* k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13130(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_13130,2,t0,t1);}
+t2=(C_word)C_eqp(C_make_character(124),t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_13071,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2486 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
+else{
+/* library.scm: 2494 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[2],((C_word*)t0)[3],lf[556]);}}
+
+/* k13069 in k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13071(C_word c,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_13071,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_13073,a[2]=t3,a[3]=((C_word*)t0)[3],a[4]=((C_word)li479),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_13073(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in k13069 in k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13073(C_word 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_13073,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_eofp(t2))){
+/* library.scm: 2487 ##sys#read-error */
+t4=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[3],lf[555]);}
+else{
+switch(t2){
+case C_make_character(92):
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13092,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: 2489 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[3]);
+case C_make_character(124):
+/* library.scm: 2492 ##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_13119,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2493 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[3]);}}}
+
+/* k13117 in loop in k13069 in k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13119,2,t0,t1);}
+t2=(C_word)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_13073(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k13090 in loop in k13069 in k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13092,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13099,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: 2490 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13097 in k13090 in loop in k13069 in k13128 in r-xtoken in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13099(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13099,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+/* library.scm: 2490 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13073(t3,((C_word*)t0)[2],t1,t2);}
+
+/* r-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_13027(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_13027,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13031,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_13042,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_13055,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2479 ##sys#peek-char-0 */
+t5=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[5]);}
+
+/* k13053 in r-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13055(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(t1,C_make_character(124));
+if(C_truep(t2)){
+/* library.scm: 2480 r-xtoken */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_13057(t3,((C_word*)t0)[3]);}
+else{
+/* library.scm: 2481 r-token */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t3,((C_word*)t0)[3]);}}
+
+/* k13040 in r-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13042(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2478 resolve-symbol */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_13517(t2,((C_word*)t0)[2],t1);}
+
+/* k13029 in r-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13031(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_13031,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13038,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2482 ##sys#port-line */
+t3=*((C_word*)lf[479]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13036 in k13029 in r-symbol in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13038(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2482 info */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11915(t2,((C_word*)t0)[3],lf[554],((C_word*)t0)[2],t1);}
+
+/* r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12972(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_12972,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12980,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2466 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12978 in r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12980(C_word c,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_12980,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_12982,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li476),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_12982(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in k12978 in r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12982(C_word t0,C_word 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_12982,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eofp(t2);
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12992,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_12992(t6,t4);}
+else{
+t6=(C_word)C_u_i_char_numericp(t2);
+t7=t5;
+f_12992(t7,(C_word)C_i_not(t6));}}
+
+/* k12990 in loop in k12978 in r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12992(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_12992,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* library.scm: 2468 ##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_12998,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: 2470 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}}
+
+/* k12996 in k12990 in loop in k12978 in r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12998(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_12998,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13005,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: 2471 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k13003 in k12996 in k12990 in loop in k12978 in r-digits in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_13005(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13005,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+/* library.scm: 2471 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12982(t3,((C_word*)t0)[2],t1,t2);}
+
+/* r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12910(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_12910,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12918,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: 2454 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[5]);}
+
+/* k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12918,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_12920,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)li474),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_12920(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12920(C_word t0,C_word 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_12920,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eofp(t2);
+t5=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_12930,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_12930(t6,t4);}
+else{
+t6=(C_word)C_u_i_char_whitespacep(t2);
+t7=t5;
+f_12930(t7,(C_truep(t6)?t6:(C_word)C_i_memq(t2,((C_word*)t0)[2])));}}
+
+/* k12928 in loop in k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12930(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_12930,NULL,2,t0,t1);}
+if(C_truep(t1)){
+/* library.scm: 2458 ##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_12936,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_word)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_12936(t5,t4);}
+else{
+t4=t2;
+f_12936(t4,C_SCHEME_UNDEFINED);}}}
+
+/* k12934 in k12928 in loop in k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12936(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_12936,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12939,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: 2461 read-unreserved-char-0 */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11969(t3,t2,((C_word*)t0)[3]);}
+
+/* k12937 in k12934 in k12928 in loop in k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12939(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_12939,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12946,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: 2462 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12944 in k12937 in k12934 in k12928 in loop in k12916 in r-token in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12946(C_word c,C_word t0,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_12946,2,t0,t1);}
+if(C_truep(((C_word*)((C_word*)t0)[6])[1])){
+t2=((C_word*)t0)[5];
+t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
+/* library.scm: 2462 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12920(t4,((C_word*)t0)[2],t1,t3);}
+else{
+t2=(C_word)C_u_i_char_downcase(((C_word*)t0)[5]);
+t3=(C_word)C_a_i_cons(&a,2,t2,((C_word*)t0)[4]);
+/* library.scm: 2462 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12920(t4,((C_word*)t0)[2],t1,t3);}}
+
+/* r-number-with-radix in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12840(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_12840,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12908,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2442 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k12906 in r-number-with-radix in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12908(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_12908,2,t0,t1);}
+t2=(C_word)C_eqp(C_make_character(35),t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12850,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: 2443 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
+else{
+/* library.scm: 2451 r-number */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12733(t3,((C_word*)t0)[4],C_fix(10));}}
+
+/* k12848 in k12906 in r-number-with-radix in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12850(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_12850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12853,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: 2444 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k12851 in k12848 in k12906 in r-number-with-radix in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep((C_word)C_eofp(t1))){
+/* library.scm: 2445 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[552]);}
+else{
+switch(t1){
+case C_make_character(120):
+/* library.scm: 2446 r-number */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_12733(t2,((C_word*)t0)[4],C_fix(16));
+case C_make_character(100):
+/* library.scm: 2447 r-number */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_12733(t2,((C_word*)t0)[4],C_fix(10));
+case C_make_character(111):
+/* library.scm: 2448 r-number */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_12733(t2,((C_word*)t0)[4],C_fix(8));
+case C_make_character(98):
+/* library.scm: 2449 r-number */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_12733(t2,((C_word*)t0)[4],C_fix(2));
+default:
+/* library.scm: 2450 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[553],t1);}}}
+
+/* r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12780(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_12780,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12838,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: 2432 ##sys#peek-char-0 */
+t4=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[3]);}
+
+/* k12836 in r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12838,2,t0,t1);}
+t2=(C_word)C_eqp(C_make_character(35),t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12790,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: 2433 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[4]);}
+else{
+/* library.scm: 2439 r-number */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12733(t3,((C_word*)t0)[5],((C_word*)t0)[2]);}}
+
+/* k12788 in k12836 in r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12790(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_12790,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12793,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: 2434 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
+
+/* k12791 in k12788 in k12836 in r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12793(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_12793,2,t0,t1);}
+if(C_truep((C_word)C_eofp(t1))){
+/* library.scm: 2435 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[550]);}
+else{
+switch(t1){
+case C_make_character(105):
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12815,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2436 r-number */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12733(t3,t2,((C_word*)t0)[2]);
+case C_make_character(101):
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12828,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2437 r-number */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12733(t3,t2,((C_word*)t0)[2]);
+default:
+/* library.scm: 2438 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[5],((C_word*)t0)[4],lf[551],t1);}}}
+
+/* k12826 in k12791 in k12788 in k12836 in r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12828(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2437 ##sys#inexact->exact */
+t2=*((C_word*)lf[287]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k12813 in k12791 in k12788 in k12836 in r-number-with-exactness in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12815(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2436 ##sys#exact->inexact */
+t2=*((C_word*)lf[285]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* r-number in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12733(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_12733,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_12738,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: 2420 r-token */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t5,t4);}
+
+/* k12736 in r-number in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12738(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_12738,2,t0,t1);}
+if(C_truep((C_word)C_i_string_equal_p(t1,lf[546]))){
+/* library.scm: 2422 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[6],((C_word*)t0)[5],lf[547]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12750,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: 2423 ##sys#string->number */
+t4=*((C_word*)lf[312]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t1,t3);}
+else{
+/* library.scm: 2423 ##sys#string->number */
+t4=*((C_word*)lf[312]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,t1,C_fix(10));}}}
+
+/* k12748 in k12736 in r-number in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12750(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_12750,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12756,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_12765,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: 2425 ##sys#inexact? */
+t4=*((C_word*)lf[259]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t1);}
+else{
+if(C_truep(((C_word*)t0)[3])){
+/* library.scm: 2428 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[5],lf[549],((C_word*)t0)[4]);}
+else{
+/* library.scm: 2429 resolve-symbol */
+t2=((C_word*)((C_word*)t0)[2])[1];
+f_13517(t2,((C_word*)t0)[7],((C_word*)t0)[4]);}}}
+
+/* k12763 in k12748 in k12736 in r-number in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12765(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: 2426 ##sys#read-warning */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[514]+1)))(5,*((C_word*)lf[514]+1),((C_word*)t0)[6],((C_word*)t0)[5],lf[548],((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]);}}
+
+/* k12754 in k12748 in k12736 in r-number in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12756(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 k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12715(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_12715,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12719,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2413 r-list */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12504(t3,t2,C_make_character(40),C_make_character(41));}
+
+/* k12717 in r-vector in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12719(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_12719,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12725,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2414 list? */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,t1);}
+
+/* k12723 in k12717 in r-vector in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12725(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 2415 ##sys#list->vector */
+t2=*((C_word*)lf[361]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+/* library.scm: 2416 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[545],((C_word*)t0)[3]);}}
+
+/* r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12504(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_12504,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12713,a[2]=((C_word*)t0)[2],a[3]=((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: 2356 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,((C_word*)t0)[6]);}
+
+/* k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12713(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12713,2,t0,t1);}
+t2=(C_word)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_12514,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_12527,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)li468),tmp=(C_word)a,a+=12,tmp);
+/* library.scm: 2360 ##sys#call-with-current-continuation */
+C_call_cc(3,0,t8,t9);}
+else{
+/* library.scm: 2410 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[8],((C_word*)t0)[6],lf[544],((C_word*)t0)[11]);}}
+
+/* a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12527(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_12527,3,t0,t1,t2);}
+t3=C_mutate(((C_word *)((C_word*)t0)[10])+1,(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12530,a[2]=((C_word*)t0)[8],a[3]=t2,a[4]=((C_word*)t0)[9],a[5]=((C_word)li466),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_12548,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)li467),tmp=(C_word)a,a+=12,tmp));
+t7=((C_word*)t5)[1];
+f_12548(t7,t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12548(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_12548,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12552,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2368 r-spaces */
+t4=((C_word*)((C_word*)t0)[8])[1];
+f_11987(t4,t3);}
+
+/* k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[16],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12552,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12555,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_12555(t3,C_SCHEME_UNDEFINED);}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12706,a[2]=t2,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2369 ##sys#port-line */
+t4=*((C_word*)lf[479]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[11]);}}
+
+/* k12704 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12706(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_12555(t3,t2);}
+
+/* k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12555(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_12555,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12558,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2370 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[10]);}
+
+/* k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12558(C_word c,C_word t0,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_12558,2,t0,t1);}
+if(C_truep((C_word)C_eofp(t1))){
+/* library.scm: 2372 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[11],((C_word*)t0)[10],lf[540]);}
+else{
+t2=(C_word)C_eqp(t1,((C_word*)t0)[9]);
+if(C_truep(t2)){
+/* library.scm: 2374 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,((C_word*)t0)[11],((C_word*)t0)[10]);}
+else{
+t3=(C_word)C_eqp(t1,C_make_character(46));
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12582,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[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: 2376 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12702,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: 2401 readrec */
+t5=((C_word*)((C_word*)t0)[6])[1];
+f_11984(t5,t4);}}}}
+
+/* k12700 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12702(C_word c,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_12702,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)[5])[1])){
+t3=(C_word)C_i_setslot(((C_word*)t0)[4],C_fix(1),t2);
+/* library.scm: 2405 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12548(t4,((C_word*)t0)[2],t2);}
+else{
+t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
+/* library.scm: 2405 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12548(t4,((C_word*)t0)[2],t2);}}
+
+/* k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12582(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_12582,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12585,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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: 2377 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[8]);}
+
+/* k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12585(C_word c,C_word t0,C_word 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_12585,2,t0,t1);}
+t2=(C_word)C_u_i_char_whitespacep(t1);
+t3=(*a=C_CLOSURE_TYPE|12,a[1]=(C_word)f_12594,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_12594(t4,t2);}
+else{
+t4=(C_word)C_eqp(t1,C_make_character(40));
+if(C_truep(t4)){
+t5=t3;
+f_12594(t5,t4);}
+else{
+t5=(C_word)C_eqp(t1,C_make_character(41));
+if(C_truep(t5)){
+t6=t3;
+f_12594(t6,t5);}
+else{
+t6=(C_word)C_eqp(t1,C_make_character(34));
+t7=t3;
+f_12594(t7,(C_truep(t6)?t6:(C_word)C_eqp(t1,C_make_character(59))));}}}}
+
+/* k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12594(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_12594,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12597,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_word)C_i_pairp(((C_word*)t0)[12]))){
+t3=t2;
+f_12597(2,t3,C_SCHEME_UNDEFINED);}
+else{
+/* library.scm: 2384 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[9],lf[542]);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12632,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_12664,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2391 r-token */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_12910(t4,t3);}}
+
+/* k12662 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12664(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2391 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[543],t1);}
+
+/* k12630 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12632(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_12632,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12635,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)C_u_i_char_numericp(((C_word*)t0)[2]))){
+/* library.scm: 2393 ##sys#string->number */
+t3=*((C_word*)lf[312]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
+else{
+t3=t2;
+f_12635(2,t3,C_SCHEME_FALSE);}}
+
+/* k12633 in k12630 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12635(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_12635,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12638,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_12638(2,t3,t1);}
+else{
+/* library.scm: 2394 resolve-symbol */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_13517(t3,t2,((C_word*)t0)[2]);}}
+
+/* k12636 in k12633 in k12630 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12638(C_word c,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_12638,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)[5])[1])){
+t3=(C_word)C_i_setslot(((C_word*)t0)[4],C_fix(1),t2);
+/* library.scm: 2399 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12548(t4,((C_word*)t0)[2],t2);}
+else{
+t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
+/* library.scm: 2399 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12548(t4,((C_word*)t0)[2],t2);}}
+
+/* k12595 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12597(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_12597,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12600,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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: 2385 r-spaces */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11987(t3,t2);}
+
+/* k12598 in k12595 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12600(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_12600,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12623,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: 2386 readrec */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11984(t3,t2);}
+
+/* k12621 in k12598 in k12595 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12623,2,t0,t1);}
+t2=(C_word)C_i_setslot(((C_word*)t0)[6],C_fix(1),t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12606,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: 2387 r-spaces */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_11987(t4,t3);}
+
+/* k12604 in k12621 in k12598 in k12595 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12606(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_12606,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12619,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: 2388 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12617 in k12604 in k12621 in k12598 in k12595 in k12592 in k12583 in k12580 in k12556 in k12553 in k12550 in loop in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12619(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_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: 2389 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,((C_word*)t0)[3],((C_word*)t0)[2],lf[541],((C_word*)t0)[4]);}}
+
+/* f_12530 in a12526 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12530(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_12530,3,t0,t1,t2);}
+t3=(C_word)C_eqp(t2,((C_word*)t0)[4]);
+if(C_truep(t3)){
+/* library.scm: 2365 return */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,C_SCHEME_FALSE);}
+else{
+/* library.scm: 2366 ##sys#read-error */
+t4=*((C_word*)lf[507]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,((C_word*)t0)[2],lf[539],t2,((C_word*)t0)[4]);}}
+
+/* k12512 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12514(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_12514,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_12525,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: 2408 ##sys#infix-list-hook */
+t4=*((C_word*)lf[505]+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);}}
+
+/* k12523 in k12512 in k12711 in r-list in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12525(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2408 info */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11915(t2,((C_word*)t0)[3],lf[538],t1,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12131(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_12131,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12502,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: 2308 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[6]);}
+
+/* k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12502(C_word c,C_word t0,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_12502,2,t0,t1);}
+t2=(C_word)C_eqp(t1,((C_word*)t0)[8]);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12145,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: 2309 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_12494,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_12498,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2353 string */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[8]);}}
+
+/* k12496 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12498(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2353 string-append */
+t2=((C_word*)t0)[3];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[2],lf[536],t1,lf[537]);}
+
+/* k12492 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12494(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2353 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12145(C_word c,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_12145,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_12147,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)li464),tmp=(C_word)a,a+=9,tmp));
+t5=((C_word*)t3)[1];
+f_12147(t5,((C_word*)t0)[2],t1,C_SCHEME_END_OF_LIST);}
+
+/* loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12147(C_word t0,C_word 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_12147,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_word)C_eofp(((C_word*)t4)[1]))){
+/* library.scm: 2311 ##sys#read-error */
+t5=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t1,((C_word*)t0)[7],lf[525]);}
+else{
+t5=(C_word)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_12164,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: 2313 ##sys#read-char-0 */
+t7=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,((C_word*)t0)[7]);}
+else{
+t6=(C_word)C_eqp(((C_word*)t0)[2],((C_word*)t4)[1]);
+if(C_truep(t6)){
+/* library.scm: 2351 ##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_12483,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t3,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2352 ##sys#read-char-0 */
+t8=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,((C_word*)t0)[7]);}}}}
+
+/* k12481 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12483(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12483,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
+/* library.scm: 2352 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12164(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_12164,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_12177,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: 2315 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12194,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: 2316 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12211,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: 2317 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12228,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: 2318 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12245,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: 2319 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12266,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: 2320 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12287,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: 2321 ##sys#read-char-0 */
+t5=*((C_word*)lf[496]+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_12319,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: 2323 r-usequence */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12035(t5,t4,lf[526],C_fix(2));
+case C_make_character(117):
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12328,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: 2326 r-usequence */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12035(t5,t4,lf[532],C_fix(4));
+case C_make_character(85):
+t4=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12400,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: 2339 r-usequence */
+t5=((C_word*)((C_word*)t0)[4])[1];
+f_12035(t5,t4,lf[534],C_fix(8));
+default:
+t4=(C_word)C_eqp(t3,C_make_character(92));
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12433,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_12433(t6,t4);}
+else{
+t6=(C_word)C_eqp(t3,C_make_character(39));
+t7=t5;
+f_12433(t7,(C_truep(t6)?t6:(C_word)C_eqp(t3,C_make_character(34))));}}}
+
+/* k12431 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12433(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_12433,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12440,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: 2344 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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_12447,a[2]=((C_word*)t0)[2],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: 2346 ##sys#read-warning */
+((C_proc5)C_retrieve_proc(*((C_word*)lf[514]+1)))(5,*((C_word*)lf[514]+1),t2,((C_word*)t0)[2],lf[535],((C_word*)((C_word*)t0)[6])[1]);}}
+
+/* k12445 in k12431 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12447(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_12447,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12454,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: 2350 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12452 in k12445 in k12431 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12454(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12454,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
+/* library.scm: 2350 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12438 in k12431 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12440(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12440,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)((C_word*)t0)[5])[1],((C_word*)t0)[4]);
+/* library.scm: 2344 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12398 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12400(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_12400,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12406,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: 2340 ##sys#unicode-surrogate? */
+t3=*((C_word*)lf[531]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
+
+/* k12404 in k12398 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12406,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12413,a[2]=((C_word*)t0)[7],a[3]=((C_word*)t0)[8],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2341 string-append */
+t3=((C_word*)t0)[6];
+((C_proc4)C_retrieve_proc(t3))(4,t3,t2,lf[533],((C_word*)t0)[5]);}
+else{
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12420,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: 2342 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[7]);}}
+
+/* k12418 in k12404 in k12398 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12420(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_12420,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12424,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2342 r-cons-codepoint */
+f_12095(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12422 in k12418 in k12404 in k12398 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12424(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2342 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_12147(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12411 in k12404 in k12398 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12413(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2341 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12328(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_12328,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12334,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: 2327 ##sys#unicode-surrogate? */
+t3=*((C_word*)lf[531]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,t1);}
+
+/* k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 t4;
+C_word t5;
+C_word ab[13],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12334,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12340,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_12380,a[2]=((C_word*)t0)[4],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2328 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+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_12387,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: 2337 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}}
+
+/* k12385 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12387(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_12387,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12391,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2337 r-cons-codepoint */
+f_12095(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12389 in k12385 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12391(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2337 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_12147(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12378 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12380(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_12380,2,t0,t1);}
+t2=(C_word)C_eqp(C_make_character(92),t1);
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_12376,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2329 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+else{
+t3=((C_word*)t0)[3];
+f_12340(t3,C_SCHEME_FALSE);}}
+
+/* k12374 in k12378 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12376(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_12340(t2,(C_word)C_eqp(C_make_character(117),t1));}
+
+/* k12338 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12340(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_12340,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12343,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: 2330 r-usequence */
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12035(t3,t2,lf[529],C_fix(4));}
+else{
+/* library.scm: 2336 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[7],((C_word*)t0)[4],lf[530],((C_word*)t0)[3]);}}
+
+/* k12341 in k12338 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12343(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_12343,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_12346,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: 2331 ##sys#surrogates->codepoint */
+t3=*((C_word*)lf[528]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],t1);}
+
+/* k12344 in k12341 in k12338 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12346(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_12346,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12356,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: 2333 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[4]);}
+else{
+/* library.scm: 2335 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[7],((C_word*)t0)[4],lf[527],((C_word*)t0)[3],((C_word*)t0)[2]);}}
+
+/* k12354 in k12344 in k12341 in k12338 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12356,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12360,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2334 r-cons-codepoint */
+f_12095(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12358 in k12354 in k12344 in k12341 in k12338 in k12332 in k12326 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12360(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2333 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_12147(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12317 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12319(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_12319,2,t0,t1);}
+t2=(C_word)C_make_character((C_word)C_unfix(t1));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12311,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: 2324 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k12309 in k12317 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12311(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12311,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+/* library.scm: 2324 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12285 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[3],*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_cons(&a,2,C_make_character(12),((C_word*)t0)[4]);
+/* library.scm: 2321 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12264 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12266(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12266,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_make_character(11),((C_word*)t0)[4]);
+/* library.scm: 2320 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12243 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12245(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12245,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_make_character(7),((C_word*)t0)[4]);
+/* library.scm: 2319 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12226 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12228,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_make_character(10),((C_word*)t0)[4]);
+/* library.scm: 2318 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12209 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12211(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12211,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_make_character(8),((C_word*)t0)[4]);
+/* library.scm: 2317 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12192 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_cons(&a,2,C_make_character(13),((C_word*)t0)[4]);
+/* library.scm: 2316 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* k12175 in k12162 in loop in k12143 in k12500 in r-string in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12177(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12177,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,C_make_character(9),((C_word*)t0)[4]);
+/* library.scm: 2315 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12147(t3,((C_word*)t0)[2],t1,t2);}
+
+/* r-cons-codepoint in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12095(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_12095,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12099,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_make_character((C_word)C_unfix(t2));
+/* library.scm: 2300 ##sys#char->utf8-string */
+t6=*((C_word*)lf[524]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t4,t5);}
+
+/* k12097 in r-cons-codepoint in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12099(C_word c,C_word t0,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_12099,2,t0,t1);}
+t2=(C_word)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_12107,a[2]=t4,a[3]=t1,a[4]=t2,a[5]=((C_word)li462),tmp=(C_word)a,a+=6,tmp));
+t6=((C_word*)t4)[1];
+f_12107(t6,((C_word*)t0)[3],C_fix(0),((C_word*)t0)[2]);}
+
+/* lp in k12097 in r-cons-codepoint in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12107(C_word t0,C_word 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_12107,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)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_word)C_fixnum_plus(t2,C_fix(1));
+t5=(C_word)C_a_i_cons(&a,2,(C_word)C_subchar(((C_word*)t0)[3],t2),t3);
+/* library.scm: 2305 lp */
+t8=t1;
+t9=t4;
+t10=t5;
+t1=t8;
+t2=t9;
+t3=t10;
+goto loop;}}
+
+/* r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12035(C_word t0,C_word 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_12035,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_12041,a[2]=t5,a[3]=t2,a[4]=((C_word*)t0)[2],a[5]=((C_word*)t0)[3],a[6]=((C_word)li460),tmp=(C_word)a,a+=7,tmp));
+t7=((C_word*)t5)[1];
+f_12041(t7,t1,C_SCHEME_END_OF_LIST,t3);}
+
+/* loop in r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_12041(C_word t0,C_word 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_12041,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t3,C_fix(0));
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12051,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: 2290 ##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_12067,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: 2294 ##sys#read-char-0 */
+t6=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[5]);}}
+
+/* k12065 in loop in r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12067(C_word c,C_word t0,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_12067,2,t0,t1);}
+t2=(C_word)C_eofp(t1);
+t3=(C_truep(t2)?t2:(C_word)C_eqp(C_make_character(34),t1));
+if(C_truep(t3)){
+/* library.scm: 2296 ##sys#read-error */
+t4=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,((C_word*)t0)[6],((C_word*)t0)[5],lf[523]);}
+else{
+t4=(C_word)C_a_i_cons(&a,2,t1,((C_word*)t0)[4]);
+t5=(C_word)C_fixnum_difference(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 2297 loop */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_12041(t6,((C_word*)t0)[6],t4,t5);}}
+
+/* k12049 in loop in r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12051(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_12051,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12054,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: 2291 string->number */
+C_string_to_number(4,0,t2,t1,C_fix(16));}
+
+/* k12052 in k12049 in loop in r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12054(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_12054,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_12064,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2293 string-append */
+t3=((C_word*)t0)[4];
+((C_proc6)C_retrieve_proc(t3))(6,t3,t2,lf[521],((C_word*)t0)[3],((C_word*)t0)[2],lf[522]);}}
+
+/* k12062 in k12052 in k12049 in loop in r-usequence in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12064(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2293 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11987(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_11987,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11995,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2278 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[3]);}
+
+/* k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11995(C_word c,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_11995,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_11997,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t3,a[5]=((C_word)li458),tmp=(C_word)a,a+=6,tmp));
+t5=((C_word*)t3)[1];
+f_11997(t5,((C_word*)t0)[2],t1);}
+
+/* loop in k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_11997,NULL,3,t0,t1,t2);}
+t3=(C_word)C_eofp(t2);
+if(C_truep(t3)){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t4=(C_word)C_eqp(C_make_character(59),t2);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12010,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2281 skip-to-eol */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_11924(t6,t5);}
+else{
+if(C_truep((C_word)C_u_i_char_whitespacep(t2))){
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12026,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2284 ##sys#read-char-0 */
+t6=*((C_word*)lf[496]+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);}}}}
+
+/* k12024 in loop in k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12026(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_12026,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12033,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2285 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12031 in k12024 in loop in k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12033(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2285 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11997(t2,((C_word*)t0)[2],t1);}
+
+/* k12008 in loop in k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12010(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_12010,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12017,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2282 ##sys#peek-char-0 */
+t3=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k12015 in k12008 in loop in k11993 in r-spaces in readrec in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_12017(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2282 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11997(t2,((C_word*)t0)[2],t1);}
+
+/* read-unreserved-char-0 in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11969(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_11969,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11973,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2270 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k11971 in read-unreserved-char-0 in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11973(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(t1,((C_word*)((C_word*)t0)[4])[1]))){
+/* library.scm: 2272 reserved-character */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11960(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 k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11960(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_11960,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11964,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2266 ##sys#read-char-0 */
+t4=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11962 in reserved-character in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11964(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2267 ##sys#read-error */
+t2=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],lf[520],((C_word*)t0)[2]);}
+
+/* skip-to-eol in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11924(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_11924,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11932,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2261 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k11930 in skip-to-eol in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11932(C_word c,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_11932,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_11934,a[2]=((C_word*)t0)[3],a[3]=t3,a[4]=((C_word)li454),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_11934(t5,((C_word*)t0)[2],t1);}
+
+/* skip in k11930 in skip-to-eol in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11934(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_11934,NULL,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11941,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_eofp(t2))){
+t4=t3;
+f_11941(t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_eqp(C_make_character(10),t2);
+t5=t3;
+f_11941(t5,(C_word)C_i_not(t4));}}
+
+/* k11939 in skip in k11930 in skip-to-eol in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_11948,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2263 ##sys#read-char-0 */
+t3=*((C_word*)lf[496]+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);}}
+
+/* k11946 in k11939 in skip in k11930 in skip-to-eol in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11948(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2263 skip */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_11934(t2,((C_word*)t0)[2],t1);}
+
+/* info in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11915(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_11915,NULL,5,t0,t1,t2,t3,t4);}
+if(C_truep(((C_word*)t0)[2])){
+/* library.scm: 2257 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_11909 in k11905 in k11902 in k11899 in k11896 in k11893 in ##sys#read in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11909(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_11909,3,t0,t1,t2);}
+/* library.scm: 2253 ##sys#read-error */
+t3=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t1,((C_word*)t0)[2],lf[519],t2);}
+
+/* ##sys#read-error in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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: 2223 ##sys#port-line */
+t6=*((C_word*)lf[479]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
+
+/* k11871 in ##sys#read-error in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[502]+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: 2225 ##sys#number->string */
+t5=*((C_word*)lf[314]+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[516],t4,((C_word*)t0)[4]);}}
+
+/* k11884 in k11871 in ##sys#read-error in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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: 2225 string-append */
+t2=((C_word*)t0)[4];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[517],t1);}
+
+/* k11874 in k11871 in ##sys#read-error in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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(6,0,((C_word*)t0)[3],*((C_word*)lf[9]+1),lf[516],t1,((C_word*)t0)[2]);}
+
+/* ##sys#read-warning in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11842(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_11842r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11842r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11842r(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_11850,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2211 ##sys#port-line */
+t6=*((C_word*)lf[479]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t2);}
+
+/* k11848 in ##sys#read-warning in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11850(C_word c,C_word t0,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_11850,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11853,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[502]+1))?t1:C_SCHEME_FALSE);
+if(C_truep(t3)){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11863,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2213 ##sys#number->string */
+t5=*((C_word*)lf[314]+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]);}}
+
+/* k11861 in k11848 in ##sys#read-warning in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11863(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2213 string-append */
+t2=((C_word*)t0)[4];
+((C_proc5)C_retrieve_proc(t2))(5,t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[515],t1);}
+
+/* k11851 in k11848 in ##sys#read-warning in k11838 in k11834 in k11830 in k11826 in k11822 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11853(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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11816(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_11816,4,t0,t1,t2,t3);}
+/* library.scm: 2197 ##sys#read-error */
+t4=*((C_word*)lf[507]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t1,t2,lf[508],t3);}
+
+/* ##sys#infix-list-hook in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11813(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_11813,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* ##sys#read-prompt-hook in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11810(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_11810,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+
+/* read in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11773(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_11773r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11773r(t0,t1,t2);}}
+
+static void C_ccall f_11773r(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_11777,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_11777(2,t4,*((C_word*)lf[423]+1));}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_11777(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);}}}
+
+/* k11775 in read in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11777(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_11777,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11780,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2186 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[499]);}
+
+/* k11778 in k11775 in read in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11780,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11783,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2187 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[499]);}
+
+/* k11781 in k11778 in k11775 in read in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11783(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2188 ##sys#read */
+t2=*((C_word*)lf[500]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],*((C_word*)lf[501]+1));}
+
+/* peek-char in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11739(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_11739r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11739r(t0,t1,t2);}}
+
+static void C_ccall f_11739r(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_11743,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_11743(2,t4,*((C_word*)lf[423]+1));}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_11743(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);}}}
+
+/* k11741 in peek-char in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11743(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_11743,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11746,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2181 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[498]);}
+
+/* k11744 in k11741 in peek-char in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11746(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_11746,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11749,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2182 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[498]);}
+
+/* k11747 in k11744 in k11741 in peek-char in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11749(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2183 ##sys#peek-char-0 */
+t2=*((C_word*)lf[497]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* ##sys#peek-char-0 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11714(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_11714,3,t0,t1,t2);}
+if(C_truep((C_word)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_word)C_slot(t2,C_fix(2));
+t4=(C_word)C_slot(t3,C_fix(1));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11727,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* g24362437 */
+t6=t4;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}}
+
+/* k11725 in ##sys#peek-char-0 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11727(C_word 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_word)C_eofp(t1))){
+t2=(C_word)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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11702(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_11702,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11706,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2168 ##sys#check-port* */
+t4=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[494]);}
+
+/* k11704 in ##sys#read-char/port in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11706(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_11706,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11709,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2169 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_TRUE,lf[494]);}
+
+/* k11707 in k11704 in ##sys#read-char/port in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11709(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2170 ##sys#read-char-0 */
+t2=*((C_word*)lf[496]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* ##sys#read-char-0 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11643(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_11643,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11647,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_slot(t2,C_fix(6)))){
+t4=(C_word)C_i_set_i_slot(t2,C_fix(6),C_SCHEME_FALSE);
+t5=t3;
+f_11647(2,t5,C_SCHEME_END_OF_FILE);}
+else{
+t4=(C_word)C_slot(t2,C_fix(2));
+t5=(C_word)C_slot(t4,C_fix(0));
+/* g24192420 */
+t6=t5;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t3,t2);}}
+
+/* k11645 in ##sys#read-char-0 in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11647(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_eqp(t1,C_make_character(10));
+if(C_truep(t2)){
+t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(4));
+t4=(C_word)C_fixnum_plus(t3,C_fix(1));
+t5=(C_word)C_i_set_i_slot(((C_word*)t0)[3],C_fix(4),t4);
+t6=(C_word)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_word)C_eofp(t1))){
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t1);}
+else{
+t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(5));
+t4=(C_word)C_fixnum_plus(t3,C_fix(1));
+t5=(C_word)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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11615(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_11615r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11615r(t0,t1,t2);}}
+
+static void C_ccall f_11615r(C_word t0,C_word 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_11619,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=*((C_word*)lf[423]+1);
+/* library.scm: 2152 ##sys#read-char/port */
+t5=*((C_word*)lf[495]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t1,t4);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=(C_word)C_i_car(t2);
+/* library.scm: 2152 ##sys#read-char/port */
+t6=*((C_word*)lf[495]+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);}}}
+
+/* k11617 in read-char in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11619(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2152 ##sys#read-char/port */
+t2=*((C_word*)lf[495]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* char-ready? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11574(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_11574r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11574r(t0,t1,t2);}}
+
+static void C_ccall f_11574r(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_11578,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_11578(2,t4,*((C_word*)lf[423]+1));}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_11578(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);}}}
+
+/* k11576 in char-ready? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11578(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_11578,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11581,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2147 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[493]);}
+
+/* k11579 in k11576 in char-ready? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11581(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_11581,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11584,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2148 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],C_SCHEME_TRUE,lf[493]);}
+
+/* k11582 in k11579 in k11576 in char-ready? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11584(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_slot(((C_word*)t0)[3],C_fix(2));
+t3=(C_word)C_slot(t2,C_fix(6));
+/* g23982399 */
+t4=t3;
+((C_proc3)C_retrieve_proc(t4))(3,t4,((C_word*)t0)[2],((C_word*)t0)[3]);}
+
+/* eof-object? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11571(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_11571,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eofp(t2));}
+
+/* make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11472(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*)tr3rv,(void*)f_11472r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_11472r(t0,t1,t2,t3);}}
+
+static void C_ccall f_11472r(C_word t0,C_word 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_word)C_notvemptyp(t3);
+t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11568,a[2]=((C_word)li436),tmp=(C_word)a,a+=3,tmp));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11479,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[2],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2118 guard */
+t7=t5;
+((C_proc3)C_retrieve_proc(t7))(3,t7,t6,t2);}
+
+/* k11477 in make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11479(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11479,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[4])[1];
+t3=(C_word)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_11486,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_word)C_block_size(lf[488]);
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t2,t6))){
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11553,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 2123 ##sys#grow-vector */
+f_9589(t7,lf[488],t8,C_SCHEME_UNDEFINED);}
+else{
+t7=t5;
+f_11486(t7,C_SCHEME_UNDEFINED);}}
+
+/* k11551 in k11477 in make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11553(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[488] /* (set! default-parameter-vector ...) */,t1);
+t3=((C_word*)t0)[2];
+f_11486(t3,t2);}
+
+/* k11484 in k11477 in make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11486(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_11486,NULL,2,t0,t1);}
+t2=(C_word)C_i_setslot(lf[488],((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_11490,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[5],a[4]=((C_word)li437),tmp=(C_word)a,a+=5,tmp));}
+
+/* f_11490 in k11484 in k11477 in make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11490(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_11490r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11490r(t0,t1,t2);}}
+
+static void C_ccall f_11490r(C_word t0,C_word 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_word)C_block_size(*((C_word*)lf[489]+1));
+if(C_truep((C_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11503,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_word)C_fixnum_greater_or_equal_p(((C_word*)t0)[3],t3))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11521,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+t6=(C_word)C_fixnum_plus(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 2130 ##sys#grow-vector */
+f_9589(t5,*((C_word*)lf[489]+1),t6,*((C_word*)lf[319]+1));}
+else{
+t5=t4;
+f_11503(t5,C_SCHEME_UNDEFINED);}}
+else{
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(((C_word*)t0)[3],t3))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_slot(lf[488],((C_word*)t0)[3]));}
+else{
+t4=(C_word)C_slot(*((C_word*)lf[489]+1),((C_word*)t0)[3]);
+t5=(C_word)C_eqp(t4,*((C_word*)lf[319]+1));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(C_word)C_slot(lf[488],((C_word*)t0)[3]):t4));}}}
+
+/* k11519 */
+static void C_ccall f_11521(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[489]+1 /* (set! current-parameter-vector ...) */,t1);
+t3=((C_word*)t0)[2];
+f_11503(t3,t2);}
+
+/* k11501 */
+static void C_fcall f_11503(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_11503,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11510,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(0));
+/* library.scm: 2131 guard */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
+
+/* k11508 in k11501 */
+static void C_ccall f_11510(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_setslot(*((C_word*)lf[489]+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_11568 in make-parameter in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11568(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_11568,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11417(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_11417,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[485]);
+t5=(C_word)C_i_check_string_2(t3,lf[485]);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11429,a[2]=t3,a[3]=((C_word)li434),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2095 ##sys#pathname-resolution */
+t7=*((C_word*)lf[443]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,lf[487],t3);}
+
+/* a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11429(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_11429,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11435,a[2]=t2,a[3]=((C_word)li433),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2098 ##sys#pathname-resolution */
+t4=*((C_word*)lf[443]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t1,((C_word*)t0)[2],t3);}
+
+/* a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11435(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_11435,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11461,a[2]=t2,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2101 ##sys#make-c-string */
+t4=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11459 in a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11461(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_11461,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11465,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);
+/* library.scm: 2101 ##sys#make-c-string */
+t3=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k11463 in k11459 in a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11465(C_word c,C_word t0,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_11465,2,t0,t1);}
+t2=(C_word)C_rename_file(((C_word*)t0)[5],t1);
+t3=(C_word)C_eqp(C_fix(0),t2);
+if(C_truep(t3)){
+t4=C_SCHEME_UNDEFINED;
+t5=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11445,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: 2102 ##sys#update-errno */
+t5=*((C_word*)lf[82]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k11443 in k11463 in k11459 in a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11445(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_11445,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11452,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_11456,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#peek-c-string */
+t4=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
+
+/* k11454 in k11443 in k11463 in k11459 in a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11456(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2105 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[486],t1);}
+
+/* k11450 in k11443 in k11463 in k11459 in a11434 in a11428 in rename-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11452(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2103 ##sys#signal-hook */
+t2=*((C_word*)lf[9]+1);
+((C_proc7)(void*)(*((C_word*)t2+1)))(7,t2,((C_word*)t0)[4],lf[432],lf[485],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11380(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_11380,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[482]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11389,a[2]=((C_word)li431),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2082 ##sys#pathname-resolution */
+t5=*((C_word*)lf[443]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[484]);}
+
+/* a11388 in delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11389(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_11389,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11415,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2085 ##sys#make-c-string */
+t4=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k11413 in a11388 in delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11415(C_word c,C_word t0,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_11415,2,t0,t1);}
+t2=(C_word)C_delete_file(t1);
+t3=(C_word)C_eqp(C_fix(0),t2);
+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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11399,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2086 ##sys#update-errno */
+t5=*((C_word*)lf[82]+1);
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}}
+
+/* k11397 in k11413 in a11388 in delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11399(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_11399,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11406,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_11410,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#peek-c-string */
+t4=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
+
+/* k11408 in k11397 in k11413 in a11388 in delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11410(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2089 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[483],t1);}
+
+/* k11404 in k11397 in k11413 in a11388 in delete-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11406(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2087 ##sys#signal-hook */
+t2=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],lf[432],lf[482],t1,((C_word*)t0)[2]);}
+
+/* port-position in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11332(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_11332r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11332r(t0,t1,t2);}}
+
+static void C_ccall f_11332r(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_11336,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_11336(2,t4,*((C_word*)lf[423]+1));}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_11336(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);}}}
+
+/* k11334 in port-position in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11336(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_11336,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11339,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2075 ##sys#check-port */
+t3=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[480]);}
+
+/* k11337 in k11334 in port-position in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11339(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_slot(((C_word*)t0)[3],C_fix(1)))){
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(4));
+t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(5));
+/* library.scm: 2077 ##sys#values */
+C_values(4,0,((C_word*)t0)[2],t2,t3);}
+else{
+/* library.scm: 2078 ##sys#error */
+t2=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[2],lf[480],lf[481],((C_word*)t0)[3]);}}
+
+/* ##sys#port-line in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11320(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_11320,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?(C_word)C_slot(t2,C_fix(4)):C_SCHEME_FALSE));}
+
+/* set-port-name! in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11308(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_11308,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11312,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2066 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[478]);}
+
+/* k11310 in set-port-name! in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11312(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_check_string_2(((C_word*)t0)[4],lf[478]);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_setslot(((C_word*)t0)[2],C_fix(3),((C_word*)t0)[4]));}
+
+/* port-name in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11277(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_11277r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11277r(t0,t1,t2);}}
+
+static void C_ccall f_11277r(C_word t0,C_word 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_11281,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=*((C_word*)lf[423]+1);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f23907,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2062 ##sys#check-port */
+t6=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t4,lf[477]);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=(C_word)C_i_car(t2);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f25012,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2062 ##sys#check-port */
+t7=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t5,lf[477]);}
+else{
+/* ##sys#error */
+t5=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t3,lf[0],t2);}}}
+
+/* f25012 in port-name in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f25012(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(3)));}
+
+/* f23907 in port-name in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f23907(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(3)));}
+
+/* k11279 in port-name in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11281(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_11281,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11284,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2062 ##sys#check-port */
+t3=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[477]);}
+
+/* k11282 in k11279 in port-name in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11284(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(3)));}
+
+/* flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11243(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_11243r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11243r(t0,t1,t2);}}
+
+static void C_ccall f_11243r(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_11247,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_11247(2,t4,*((C_word*)lf[424]+1));}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_11247(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);}}}
+
+/* k11245 in flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11247(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_11247,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11250,a[2]=t1,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2057 ##sys#check-port* */
+t3=*((C_word*)lf[431]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,t1,lf[476]);}
+
+/* k11248 in k11245 in flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11250(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_11250,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11253,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2058 ##sys#check-port-mode */
+t3=*((C_word*)lf[428]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],C_SCHEME_FALSE,lf[476]);}
+
+/* k11251 in k11248 in k11245 in flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11253(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2059 ##sys#flush-output */
+t2=*((C_word*)lf[475]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* ##sys#flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11230(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_11230,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(2));
+t4=(C_word)C_slot(t3,C_fix(5));
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11237,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* g22852286 */
+t6=t4;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t2);}
+
+/* k11235 in ##sys#flush-output in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11237(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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11201(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_11201,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[474]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11210,a[2]=((C_word)li423),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2044 ##sys#pathname-resolution */
+t5=*((C_word*)lf[443]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[473]);}
+
+/* a11209 in directory-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11210(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_11210,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11214,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11228,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2047 ##sys#platform-fixup-pathname */
+t5=*((C_word*)lf[442]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k11226 in a11209 in directory-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11228(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2047 ##sys#file-info */
+t2=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k11212 in a11209 in directory-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11214(C_word 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_vector_ref(t1,C_fix(4));
+t3=(C_word)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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11179(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_11179,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[472]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11188,a[2]=((C_word)li421),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2036 ##sys#pathname-resolution */
+t5=*((C_word*)lf[443]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t1,t2,t4,lf[473]);}
+
+/* a11187 in file-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11188(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_11188,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11195,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11199,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 2039 ##sys#platform-fixup-pathname */
+t5=*((C_word*)lf[442]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k11197 in a11187 in file-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11199(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 2039 ##sys#file-info */
+t2=*((C_word*)lf[29]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k11193 in a11187 in file-exists? in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11195(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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11159(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_11159r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11159r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11159r(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[424]+1);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11163,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);}
+
+/* k11161 in with-output-to-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11163(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_11163,2,t0,t1);}
+t2=C_mutate((C_word*)lf[424]+1 /* (set! standard-output ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11169,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: 2028 ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
+
+/* a11168 in k11161 in with-output-to-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11169(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_11169r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11169r(t0,t1,t2);}}
+
+static void C_ccall f_11169r(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_11173,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2030 close-output-port */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11171 in a11168 in k11161 in with-output-to-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11173(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[424]+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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11139(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_11139r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11139r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11139r(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[423]+1);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11143,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);}
+
+/* k11141 in with-input-from-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11143(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_11143,2,t0,t1);}
+t2=C_mutate((C_word*)lf[423]+1 /* (set! standard-input ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11149,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li417),tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 2015 ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t3);}
+
+/* a11148 in k11141 in with-input-from-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11149(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_11149r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11149r(t0,t1,t2);}}
+
+static void C_ccall f_11149r(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_11153,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[4],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2017 close-input-port */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11151 in a11148 in k11141 in with-input-from-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 *a;
+t2=C_mutate((C_word*)lf[423]+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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11115(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_11115r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11115r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11115r(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_11119,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);}
+
+/* k11117 in call-with-output-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11119(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_11119,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11124,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li414),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11130,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li415),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 2002 ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
+
+/* a11129 in k11117 in call-with-output-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11130(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_11130r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11130r(t0,t1,t2);}}
+
+static void C_ccall f_11130r(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_11134,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 2005 close-output-port */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11132 in a11129 in k11117 in call-with-output-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11134(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]);}
+
+/* a11123 in k11117 in call-with-output-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11124(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_11124,2,t0,t1);}
+/* library.scm: 2003 p */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
+
+/* call-with-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11091(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_11091r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_11091r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_11091r(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_11095,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);}
+
+/* k11093 in call-with-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11095(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_11095,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11100,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=((C_word)li411),tmp=(C_word)a,a+=5,tmp);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11106,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=((C_word)li412),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1991 ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[2],t2,t3);}
+
+/* a11105 in k11093 in call-with-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11106(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_11106r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_11106r(t0,t1,t2);}}
+
+static void C_ccall f_11106r(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_11110,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1994 close-input-port */
+t4=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k11108 in a11105 in k11093 in call-with-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11110(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]);}
+
+/* a11099 in k11093 in call-with-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11100(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_11100,2,t0,t1);}
+/* library.scm: 1992 p */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,t1,((C_word*)t0)[2]);}
+
+/* close-output-port in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11085(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_11085,3,t0,t1,t2);}
+/* library.scm: 1984 close */
+f_11042(t1,t2,lf[452]);}
+
+/* close-input-port in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11079(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_11079,3,t0,t1,t2);}
+/* library.scm: 1983 close */
+f_11042(t1,t2,lf[451]);}
+
+/* open-output-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11073(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_11073r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_11073r(t0,t1,t2,t3);}}
+
+static void C_ccall f_11073r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+/* library.scm: 1982 open */
+f_10944(t1,t2,C_SCHEME_FALSE,t3,lf[450]);}
+
+/* open-input-file in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11067(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_11067r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_11067r(t0,t1,t2,t3);}}
+
+static void C_ccall f_11067r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+/* library.scm: 1981 open */
+f_10944(t1,t2,C_SCHEME_TRUE,t3,lf[449]);}
+
+/* close in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_11042(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_11042,NULL,3,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11046,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1975 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,t3);}
+
+/* k11044 in close in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11046(C_word c,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_11046,2,t0,t1);}
+if(C_truep((C_word)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_word)C_slot(((C_word*)t0)[3],C_fix(2));
+t3=(C_word)C_slot(t2,C_fix(4));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11058,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* g22142215 */
+t5=t3;
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,((C_word*)t0)[3]);}}
+
+/* k11056 in k11044 in close in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11058(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_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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10944(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_10944,NULL,5,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_check_string_2(t2,t5);
+t7=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10953,a[2]=t4,a[3]=t5,a[4]=t3,a[5]=((C_word)li404),tmp=(C_word)a,a+=6,tmp);
+t8=(C_word)C_i_not(t3);
+/* library.scm: 1951 ##sys#pathname-resolution */
+t9=*((C_word*)lf[443]+1);
+((C_proc7)(void*)(*((C_word*)t9+1)))(7,t9,t1,t2,t7,lf[467],t8,t4);}
+
+/* a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10953(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_10953,3,t0,t1,t2);}
+t3=(C_truep(((C_word*)t0)[4])?lf[453]:lf[454]);
+t4=t3;
+t5=(*a=C_VECTOR_TYPE|1,a[1]=t4,tmp=(C_word)a,a+=2,tmp);
+t6=lf[455];
+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_10960,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_10989,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)li403),tmp=(C_word)a,a+=8,tmp));
+t12=((C_word*)t10)[1];
+f_10989(t12,t8,((C_word*)t0)[2]);}
+
+/* doloop2190 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10989(C_word t0,C_word 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_10989,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11002,a[2]=t1,a[3]=((C_word*)t0)[6],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_eqp(t3,lf[459]);
+if(C_truep(t5)){
+t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,lf[460]);
+t7=(C_word)C_slot(t2,C_fix(1));
+t16=t1;
+t17=t7;
+t1=t16;
+t2=t17;
+goto loop;}
+else{
+t6=(C_word)C_eqp(t3,lf[461]);
+if(C_truep(t6)){
+t7=C_mutate(((C_word *)((C_word*)t0)[5])+1,lf[462]);
+t8=(C_word)C_slot(t2,C_fix(1));
+t16=t1;
+t17=t8;
+t1=t16;
+t2=t17;
+goto loop;}
+else{
+t7=(C_word)C_eqp(t3,lf[463]);
+if(C_truep(t7)){
+if(C_truep(((C_word*)t0)[4])){
+/* library.scm: 1964 ##sys#error */
+t8=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t8+1)))(4,t8,t4,((C_word*)t0)[3],lf[464]);}
+else{
+t8=C_mutate(((C_word *)((C_word*)t0)[2])+1,lf[465]);
+t9=(C_word)C_slot(t2,C_fix(1));
+t16=t1;
+t17=t9;
+t1=t16;
+t2=t17;
+goto loop;}}
+else{
+/* library.scm: 1966 ##sys#error */
+t8=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t8+1)))(5,t8,t4,((C_word*)t0)[3],lf[466],t3);}}}}}
+
+/* k11000 in doloop2190 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_11002(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_10989(t3,((C_word*)t0)[2],t2);}
+
+/* k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_10960,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10963,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: 1967 ##sys#make-port */
+t3=*((C_word*)lf[418]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,((C_word*)t0)[2],*((C_word*)lf[421]+1),((C_word*)t0)[5],lf[458]);}
+
+/* k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10963(C_word c,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_10963,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10966,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_10969,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_10987,a[2]=((C_word*)t0)[4],a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1968 ##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]);}
+
+/* k10985 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10987(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1968 ##sys#open-file-port */
+t2=*((C_word*)lf[422]+1);
+((C_proc5)(void*)(*((C_word*)t2+1)))(5,t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10967 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10969(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_10969,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_10972,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: 1969 ##sys#update-errno */
+t3=*((C_word*)lf[82]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}}
+
+/* k10970 in k10967 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10972(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_10972,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10979,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_10983,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+/* ##sys#peek-c-string */
+t4=*((C_word*)lf[457]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,C_mpointer(&a,(void*)strerror(errno)),C_fix(0));}
+
+/* k10981 in k10970 in k10967 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10983(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1970 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[456],t1);}
+
+/* k10977 in k10970 in k10967 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10979(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1970 ##sys#signal-hook */
+t2=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],lf[432],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k10964 in k10961 in k10958 in a10952 in open in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10966(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 k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10854(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_10854,3,t0,t1,t2);}
+t3=(C_word)C_block_size(t2);
+if(C_truep((C_word)C_fixnum_greaterp(t3,C_fix(0)))){
+t4=(C_word)C_subchar(t2,C_fix(0));
+switch(t4){
+case C_make_character(126):
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10873,a[2]=((C_word*)t0)[2],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1927 ##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_10894,a[2]=t6,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t3,a[6]=((C_word)li401),tmp=(C_word)a,a+=7,tmp));
+t8=((C_word*)t6)[1];
+f_10894(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[448]);}}
+
+/* loop in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10894(C_word t0,C_word 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_10894,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_word)C_subchar(((C_word*)t0)[4],t2);
+t4=(C_word)C_eqp(t3,C_make_character(47));
+t5=(C_truep(t4)?t4:(C_word)C_eqp(t3,C_make_character(92)));
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10917,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_10928,a[2]=t6,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1936 ##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_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 1938 loop */
+t11=t1;
+t12=t6;
+t1=t11;
+t2=t12;
+goto loop;}}}
+
+/* k10926 in loop in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10928(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1936 get-environment-variable */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k10915 in loop in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10917(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_10917,2,t0,t1);}
+t2=(C_truep(t1)?t1:lf[447]);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10924,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1937 ##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]);}
+
+/* k10922 in k10915 in loop in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10924(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1935 ##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);}
+
+/* k10871 in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10873(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_10873,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10880,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1928 get-environment-variable */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,lf[446]);}
+
+/* k10878 in k10871 in ##sys#expand-home-path in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10880(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: 1928 ##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: 1928 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],lf[445],((C_word*)t0)[2]);}}
+
+/* ##sys#pathname-resolution in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10844(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_10844,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10852,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1918 ##sys#expand-home-path */
+t5=*((C_word*)lf[444]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k10850 in ##sys#pathname-resolution in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10852(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1918 thunk */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* ##sys#platform-fixup-pathname in k10804 in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10810(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_10810,3,t0,t1,t2);}
+if(C_truep(((C_word*)t0)[2])){
+t3=(C_word)C_block_size(t2);
+t4=(C_word)C_fixnum_difference(t3,C_fix(1));
+if(C_truep((C_word)C_fixnum_greater_or_equal_p(t4,C_fix(0)))){
+t5=(C_word)C_subchar(t2,t4);
+t6=(C_word)C_eqp(t5,C_make_character(92));
+t7=(C_truep(t6)?t6:(C_word)C_eqp(t5,C_make_character(47)));
+if(C_truep(t7)){
+/* library.scm: 1912 ##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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10798(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_10798,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_setslot(t2,C_fix(9),t3));}
+
+/* ##sys#port-data in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10792(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_10792,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_slot(t2,C_fix(9)));}
+
+/* ##sys#tty-port? in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10775(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_10775,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10790,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1897 ##sys#peek-unsigned-integer */
+t4=*((C_word*)lf[438]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,C_fix(0));}
+
+/* k10788 in ##sys#tty-port? in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10790(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_zerop(t1))){
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}
+else{
+t2=(C_word)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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10759(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*)tr2rv,(void*)f_10759r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_10759r(t0,t1,t2);}}
+
+static void C_ccall f_10759r(C_word 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_notvemptyp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10772,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1892 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[436]);}
+else{
+t3=*((C_word*)lf[425]+1);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10770 in current-error-port in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10772(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[425]+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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10743(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*)tr2rv,(void*)f_10743r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_10743r(t0,t1,t2);}}
+
+static void C_ccall f_10743r(C_word 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_notvemptyp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10756,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1885 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[435]);}
+else{
+t3=*((C_word*)lf[424]+1);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10754 in current-output-port in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10756(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[424]+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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10727(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*)tr2rv,(void*)f_10727r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_10727r(t0,t1,t2);}}
+
+static void C_ccall f_10727r(C_word 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_notvemptyp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10740,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1878 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t3,lf[434]);}
+else{
+t3=*((C_word*)lf[423]+1);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10738 in current-input-port in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10740(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[423]+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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10712(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_10712,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10716,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1870 ##sys#check-port */
+t5=*((C_word*)lf[426]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k10714 in ##sys#check-port* in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10716(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_10716,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10719,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_slot(((C_word*)t0)[3],C_fix(8)))){
+/* library.scm: 1872 ##sys#signal-hook */
+t3=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t2,lf[432],((C_word*)t0)[2],lf[433],((C_word*)t0)[3]);}
+else{
+t3=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[3]);}}
+
+/* k10717 in k10714 in ##sys#check-port* in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10719(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 k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10682(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*)tr4rv,(void*)f_10682r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_10682r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_10682r(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_word)C_slot(t2,C_fix(1));
+t6=(C_word)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_word)C_notvemptyp(t4);
+t8=(C_truep(t7)?(C_word)C_i_vector_ref(t4,C_fix(0)):C_SCHEME_FALSE);
+if(C_truep(t3)){
+/* library.scm: 1865 ##sys#signal-hook */
+t9=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t8,lf[429],t2);}
+else{
+/* library.scm: 1865 ##sys#signal-hook */
+t9=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t9+1)))(6,t9,t1,lf[56],t8,lf[430],t2);}}}
+
+/* ##sys#check-port in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10655(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*)tr3rv,(void*)f_10655r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_10655r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10655r(C_word t0,C_word 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_10667,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+if(C_truep((C_word)C_blockp(t5))){
+t6=(C_word)C_portp(t5);
+t7=t4;
+f_10667(t7,t6);}
+else{
+t6=t4;
+f_10667(t6,C_SCHEME_FALSE);}}
+
+/* k10665 in ##sys#check-port in k10651 in k10648 in k10645 in k10642 in k10638 in k10634 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10667(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_word)C_notvemptyp(((C_word*)t0)[3]))){
+t2=(C_word)C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
+/* library.scm: 1861 ##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[427],((C_word*)t0)[2]);}
+else{
+/* library.scm: 1861 ##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[427],((C_word*)t0)[2]);}}}
+
+/* a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22054(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_22054,4,t0,t1,t2,t3);}
+t4=(C_truep(t3)?(C_word)C_i_check_exact_2(t3,lf[419]):C_SCHEME_UNDEFINED);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22061,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_slot(t2,C_fix(12)))){
+t6=t5;
+f_22061(t6,C_SCHEME_UNDEFINED);}
+else{
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22175,a[2]=t2,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1825 ##sys#make-string */
+t7=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,C_fix(1024));}}
+
+/* k22173 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22175(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[3];
+f_22061(t2,(C_word)C_i_setslot(((C_word*)t0)[2],C_fix(12),t1));}
+
+/* k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_22061(C_word t0,C_word t1){
+C_word 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_22061,NULL,2,t0,t1);}
+t2=((C_word*)t0)[4];
+t3=(C_truep(t2)?t2:C_fix(16777215));
+t4=(C_word)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_22074,a[2]=t6,a[3]=((C_word*)t0)[3],a[4]=((C_word)li387),tmp=(C_word)a,a+=5,tmp));
+t8=((C_word*)t6)[1];
+f_22074(t8,((C_word*)t0)[2],C_fix(1024),t3,t4,lf[420],C_SCHEME_FALSE);}
+
+/* loop in k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_22074(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 ab[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_22074,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(C_word)C_i_fixnum_min(t3,t2);
+t8=(C_word)fast_read_line_from_file(t4,((C_word*)t0)[3],t7);
+if(C_truep((C_word)C_eofp(t8))){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_truep(t6)?t5:C_SCHEME_END_OF_FILE));}
+else{
+if(C_truep(t8)){
+if(C_truep(t6)){
+t9=(C_word)C_slot(((C_word*)t0)[3],C_fix(4));
+t10=(C_word)C_fixnum_plus(t9,C_fix(1));
+t11=(C_word)C_i_set_i_slot(((C_word*)t0)[3],C_fix(4),t10);
+t12=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22143,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1843 ##sys#substring */
+t13=*((C_word*)lf[160]+1);
+((C_proc5)(void*)(*((C_word*)t13+1)))(5,t13,t12,t4,C_fix(0),t8);}
+else{
+t9=(C_word)C_slot(((C_word*)t0)[3],C_fix(4));
+t10=(C_word)C_fixnum_plus(t9,C_fix(1));
+t11=(C_word)C_i_set_i_slot(((C_word*)t0)[3],C_fix(4),t10);
+/* library.scm: 1846 ##sys#substring */
+t12=*((C_word*)lf[160]+1);
+((C_proc5)(void*)(*((C_word*)t12+1)))(5,t12,t1,t4,C_fix(0),t8);}}
+else{
+if(C_truep((C_word)C_fixnum_lessp(t3,t2))){
+t9=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_22107,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1836 ##sys#substring */
+t10=*((C_word*)lf[160]+1);
+((C_proc5)(void*)(*((C_word*)t10+1)))(5,t10,t9,t4,C_fix(0),t3);}
+else{
+t9=(C_word)C_fixnum_times(t2,C_fix(2));
+t10=(C_word)C_fixnum_difference(t3,t2);
+t11=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_22122,a[2]=t4,a[3]=t5,a[4]=t10,a[5]=t9,a[6]=t1,a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
+t12=(C_word)C_fixnum_times(t2,C_fix(2));
+/* library.scm: 1839 ##sys#make-string */
+t13=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t13+1)))(3,t13,t11,t12);}}}}
+
+/* k22120 in loop in k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22122(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_22122,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_22126,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: 1840 ##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]);}
+
+/* k22124 in k22120 in loop in k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22126(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1837 loop */
+t2=((C_word*)((C_word*)t0)[6])[1];
+f_22074(t2,((C_word*)t0)[5],((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_TRUE);}
+
+/* k22105 in loop in k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22107(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1836 ##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);}
+
+/* k22141 in loop in k22059 in a22053 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_22143(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1843 ##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);}
+
+/* a21997 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21998(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_21998,6,t0,t1,t2,t3,t4,t5);}
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_22006,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_22006(t7,t3);}
+else{
+t7=(C_word)C_block_size(t4);
+t8=t6;
+f_22006(t8,(C_word)C_fixnum_difference(t7,t5));}}
+
+/* k22004 in a21997 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_22006(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_22006,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_22008,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word)li385),tmp=(C_word)a,a+=5,tmp);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_22008(t2,t1,C_fix(0),((C_word*)t0)[2]));}
+
+/* loop in k22004 in a21997 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_22008(C_word t0,C_word 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=(C_word)fast_read_string_from_file(((C_word*)t0)[3],((C_word*)t0)[2],t1,t3);
+t5=(C_word)C_i_not(t4);
+t6=(C_truep(t5)?t5:(C_word)C_eofp(t4));
+if(C_truep(t6)){
+t7=t2;
+return(t7);}
+else{
+if(C_truep((C_word)C_fixnum_lessp(t4,t1))){
+t7=(C_word)C_fixnum_difference(t1,t4);
+t8=(C_word)C_fixnum_plus(t2,t4);
+t9=(C_word)C_fixnum_plus(t3,t4);
+t12=t7;
+t13=t8;
+t14=t9;
+t1=t12;
+t2=t13;
+t3=t14;
+goto loop;}
+else{
+return((C_word)C_fixnum_plus(t2,t4));}}}
+
+/* a21994 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21995(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_21995,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_char_ready_p(t2));}
+
+/* a21991 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21992(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_21992,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_flush_output(t2));}
+
+/* a21985 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21986(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_21986,3,t0,t1,t2);}
+t3=(C_word)C_close_file(t2);
+/* library.scm: 1806 ##sys#update-errno */
+t4=*((C_word*)lf[82]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t1);}
+
+/* a21982 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21983(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_21983,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_display_string(t2,t3));}
+
+/* a21979 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21980(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_21980,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_display_char(t2,t3));}
+
+/* a21976 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21977(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_21977,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_peek_char(t2));}
+
+/* a21973 in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_21974(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_21974,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_read_char(t2));}
+
+/* ##sys#make-port in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10608(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_10608,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)C_a_i_port(&a,0);
+t7=(C_word)C_i_set_i_slot(t6,C_fix(1),t2);
+t8=(C_word)C_i_setslot(t6,C_fix(2),t3);
+t9=(C_word)C_i_setslot(t6,C_fix(3),t4);
+t10=(C_word)C_i_set_i_slot(t6,C_fix(4),C_fix(1));
+t11=(C_word)C_i_set_i_slot(t6,C_fix(5),C_fix(0));
+t12=(C_word)C_i_setslot(t6,C_fix(7),t5);
+t13=t1;
+((C_proc2)(void*)(*((C_word*)t13+1)))(2,t13,t6);}
+
+/* output-port? in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10587(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_10587,3,t0,t1,t2);}
+t3=t2;
+if(C_truep((C_word)C_blockp(t3))){
+if(C_truep((C_word)C_portp(t3))){
+t4=(C_word)C_slot(t2,C_fix(1));
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)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 k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10570(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_10570,3,t0,t1,t2);}
+t3=t2;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep((C_word)C_blockp(t3))?(C_truep((C_word)C_portp(t3))?(C_word)C_slot(t2,C_fix(1)):C_SCHEME_FALSE):C_SCHEME_FALSE));}
+
+/* port? in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10567(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_10567,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_portp(t2));}
+
+/* continuation-return in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10552(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_10552r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_10552r(t0,t1,t2,t3);}}
+
+static void C_ccall f_10552r(C_word 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_word)C_i_check_structure_2(t2,lf[410],lf[414]);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10561,a[2]=t3,a[3]=((C_word)li372),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1736 continuation-graft */
+t6=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t6))(4,t6,t1,t2,t5);}
+
+/* a10560 in continuation-return in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10561(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_10561,2,t0,t1);}
+C_apply_values(3,0,t1,((C_word*)t0)[2]);}
+
+/* continuation-graft in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10519(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_10519,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_structure_2(t2,lf[410],lf[413]);
+t5=(C_word)C_slot(t2,C_fix(2));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10529,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t7=(C_word)C_eqp(*((C_word*)lf[403]+1),t5);
+if(C_truep(t7)){
+/* library.scm: 1730 ##sys#continuation-graft */
+C_continuation_graft(4,0,t1,t2,t3);}
+else{
+t8=(C_word)C_i_length(*((C_word*)lf[403]+1));
+t9=(C_word)C_i_length(t5);
+t10=(C_word)C_fixnum_difference(t8,t9);
+/* library.scm: 1729 ##sys#dynamic-unwind */
+f_10444(t6,t5,t10);}}
+
+/* k10527 in continuation-graft in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10529(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1730 ##sys#continuation-graft */
+C_continuation_graft(4,0,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* continuation? in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10512(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_10512,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_structurep(t2,lf[410]));}
+
+/* continuation-capture in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10502(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_10502,3,t0,t1,t2);}
+t3=*((C_word*)lf[403]+1);
+t4=(C_word)C_direct_continuation(C_SCHEME_FALSE);
+t5=(C_word)C_a_i_record(&a,3,lf[410],t4,t3);
+/* library.scm: 1718 proc */
+t6=t2;
+((C_proc3)C_retrieve_proc(t6))(3,t6,t1,t5);}
+
+/* ##sys#dynamic-unwind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10444(C_word 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_10444,NULL,3,t1,t2,t3);}
+t4=(C_word)C_eqp(*((C_word*)lf[403]+1),t2);
+if(C_truep(t4)){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+if(C_truep((C_word)C_fixnum_lessp(t3,C_fix(0)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10460,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_slot(t2,C_fix(1));
+t7=(C_word)C_fixnum_plus(t3,C_fix(1));
+/* library.scm: 1706 ##sys#dynamic-unwind */
+t14=t5;
+t15=t6;
+t16=t7;
+t1=t14;
+t2=t15;
+t3=t16;
+goto loop;}
+else{
+t5=(C_word)C_slot(*((C_word*)lf[403]+1),C_fix(0));
+t6=(C_word)C_slot(t5,C_fix(1));
+t7=(C_word)C_slot(*((C_word*)lf[403]+1),C_fix(1));
+t8=C_mutate((C_word*)lf[403]+1 /* (set! dynamic-winds ...) */,t7);
+t9=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10489,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1712 after */
+t10=t6;
+((C_proc2)C_retrieve_proc(t10))(2,t10,t9);}}}
+
+/* k10487 in ##sys#dynamic-unwind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 1713 ##sys#dynamic-unwind */
+f_10444(((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k10458 in ##sys#dynamic-unwind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10460(C_word c,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_10460,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[3],C_fix(0));
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10466,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* g19661967 */
+t5=t3;
+((C_proc2)C_retrieve_proc(t5))(2,t5,t4);}
+
+/* k10464 in k10458 in ##sys#dynamic-unwind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10466(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[403]+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 k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10404(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_10404,3,t0,t1,t2);}
+t3=*((C_word*)lf[403]+1);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10410,a[2]=t2,a[3]=t3,a[4]=((C_word)li365),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1693 ##sys#call-with-current-continuation */
+C_call_cc(3,0,t1,t4);}
+
+/* a10409 in call-with-current-continuation in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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 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_10410,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10416,a[2]=((C_word*)t0)[3],a[3]=t2,a[4]=((C_word)li364),tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1695 proc */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t1,t3);}
+
+/* a10415 in a10409 in call-with-current-continuation in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10416(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_10416r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_10416r(t0,t1,t2);}}
+
+static void C_ccall f_10416r(C_word t0,C_word 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_10420,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_eqp(*((C_word*)lf[403]+1),((C_word*)t0)[2]);
+if(C_truep(t4)){
+C_apply(4,0,t1,((C_word*)t0)[3],t2);}
+else{
+t5=(C_word)C_i_length(*((C_word*)lf[403]+1));
+t6=(C_word)C_i_length(((C_word*)t0)[2]);
+t7=(C_word)C_fixnum_difference(t5,t6);
+/* library.scm: 1698 ##sys#dynamic-unwind */
+f_10444(t3,((C_word*)t0)[2],t7);}}
+
+/* k10418 in a10415 in a10409 in call-with-current-continuation in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10420(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 k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10373(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_10373,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10377,a[2]=t3,a[3]=t1,a[4]=t4,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* library.scm: 1680 before */
+t6=t2;
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k10375 in dynamic-wind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10377(C_word c,C_word t0,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_10377,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[5],((C_word*)t0)[4]);
+t3=(C_word)C_a_i_cons(&a,2,t2,*((C_word*)lf[403]+1));
+t4=C_mutate((C_word*)lf[403]+1 /* (set! dynamic-winds ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10386,a[2]=((C_word*)t0)[4],a[3]=((C_word)li362),tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1682 ##sys#call-with-values */
+C_call_with_values(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t5);}
+
+/* a10385 in k10375 in dynamic-wind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10386(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_10386r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_10386r(t0,t1,t2);}}
+
+static void C_ccall f_10386r(C_word 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_word)C_slot(*((C_word*)lf[403]+1),C_fix(1));
+t4=C_mutate((C_word*)lf[403]+1 /* (set! dynamic-winds ...) */,t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10394,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1686 after */
+t6=((C_word*)t0)[2];
+((C_proc2)C_retrieve_proc(t6))(2,t6,t5);}
+
+/* k10392 in a10385 in k10375 in dynamic-wind in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10394(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 k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10284(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_10284r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_10284r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_10284r(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_word)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_10296,a[2]=t6,a[3]=t10,a[4]=t8,a[5]=t2,a[6]=((C_word)li359),tmp=(C_word)a,a+=7,tmp));
+t12=((C_word*)t10)[1];
+f_10296(t12,t1,t3);}
+else{
+t5=(C_word)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_10338,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)li360),tmp=(C_word)a,a+=9,tmp));
+t9=((C_word*)t7)[1];
+f_10338(t9,t1,t5);}}
+
+/* loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10338(C_word t0,C_word 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_10338,NULL,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(0));
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10355,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_10367,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1659 mapsafe */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_10116(t6,t5,((C_word*)t0)[3],t2,C_SCHEME_TRUE,lf[401]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10370,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1661 check */
+f_10161(t4,(C_word)C_i_cdr(t2),C_SCHEME_TRUE,lf[401]);}}
+
+/* k10368 in loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10370(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);}
+
+/* k10365 in loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10367(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);}
+
+/* k10353 in loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10355(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_10355,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10359,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_10363,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1660 mapsafe */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_10116(t4,t3,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,lf[401]);}
+
+/* k10361 in k10353 in loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10363(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1660 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_10338(t2,((C_word*)t0)[2],t1);}
+
+/* k10357 in k10353 in loop in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10359(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_10359,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));}
+
+/* loop1900 in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10296(C_word t0,C_word 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_10296,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=((C_word*)t0)[5];
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10325,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));
+/* g19161917 */
+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);}}
+
+/* k10323 in loop1900 in map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10325(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10325,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));
+/* loop19001913 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10296(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));
+/* loop19001913 */
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10296(t6,((C_word*)t0)[3],t5);}}
+
+/* for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10213(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_10213r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_10213r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_10213r(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_word)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_10225,a[2]=t6,a[3]=t2,a[4]=((C_word)li356),tmp=(C_word)a,a+=5,tmp));
+t8=((C_word*)t6)[1];
+f_10225(t8,t1,t3);}
+else{
+t5=(C_word)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_10255,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)li357),tmp=(C_word)a,a+=9,tmp));
+t9=((C_word*)t7)[1];
+f_10255(t9,t1,t5);}}
+
+/* loop in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10255(C_word 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_10255,NULL,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(0));
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10268,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_10279,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1648 mapsafe */
+t6=((C_word*)((C_word*)t0)[6])[1];
+f_10116(t6,t5,((C_word*)t0)[3],t2,C_SCHEME_TRUE,lf[399]);}
+else{
+/* library.scm: 1650 check */
+f_10161(t1,t2,C_SCHEME_TRUE,lf[399]);}}
+
+/* k10277 in loop in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+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_apply(4,0,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10266 in loop in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10268(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_10268,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10275,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1649 mapsafe */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_10116(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_TRUE,lf[399]);}
+
+/* k10273 in k10266 in loop in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10275(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1649 loop */
+t2=((C_word*)((C_word*)t0)[3])[1];
+f_10255(t2,((C_word*)t0)[2],t1);}
+
+/* loop1873 in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10225(C_word t0,C_word 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_10225,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=((C_word*)t0)[3];
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10235,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));
+/* g18801881 */
+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);}}
+
+/* k10233 in loop1873 in for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10235(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_10225(t3,((C_word*)t0)[2],t2);}
+
+/* check in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10161(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_10161,NULL,4,t1,t2,t3,t4);}
+t5=(C_word)C_i_not(t3);
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10171,a[2]=t2,a[3]=t4,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+if(C_truep(t5)){
+t7=t6;
+f_10171(t7,t5);}
+else{
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_10179,a[2]=((C_word)li354),tmp=(C_word)a,a+=3,tmp);
+t8=t6;
+f_10171(t8,f_10179(t2));}}
+
+/* loop in check in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static C_word C_fcall f_10179(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_eqp(t1,C_SCHEME_END_OF_LIST);
+if(C_truep(t2)){
+return(C_SCHEME_FALSE);}
+else{
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_eqp(t3,C_SCHEME_END_OF_LIST);
+if(C_truep(t4)){
+return(C_SCHEME_FALSE);}
+else{
+t5=(C_word)C_slot(t1,C_fix(1));
+t7=t5;
+t1=t7;
+goto loop;}}}
+
+/* k10169 in check in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10171(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 1639 ##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[402],((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 k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10116(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_10116,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=(C_word)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_word)C_slot(t3,C_fix(0));
+t8=(C_word)C_eqp(t7,C_SCHEME_END_OF_LIST);
+if(C_truep(t8)){
+/* library.scm: 1628 check */
+f_10161(t1,t3,t4,t5);}
+else{
+if(C_truep((C_word)C_i_pairp(t7))){
+t9=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10148,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: 1630 p */
+t10=t2;
+((C_proc3)C_retrieve_proc(t10))(3,t10,t9,t7);}
+else{
+/* library.scm: 1631 ##sys#error-not-a-proper-list */
+t9=*((C_word*)lf[132]+1);
+((C_proc4)(void*)(*((C_word*)t9+1)))(4,t9,t1,t7,t5);}}}}
+
+/* k10146 in mapsafe in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10148(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_10148,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10152,a[2]=t1,a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 1630 mapsafe */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_10116(t4,t2,((C_word*)t0)[3],t3,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k10150 in k10146 in mapsafe in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10152(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_10152,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));}
+
+/* ##sys#map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10071(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_10071,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_10077,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_10077(t7,t1,t3);}
+
+/* loop in ##sys#map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10077(C_word t0,C_word 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_10077,NULL,3,t0,t1,t2);}
+t3=(C_word)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_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10097,a[2]=((C_word*)t0)[4],a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_slot(t2,C_fix(0));
+/* library.scm: 1613 p */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
+else{
+/* library.scm: 1614 ##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[401]);}}}
+
+/* k10095 in loop in ##sys#map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10097(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_10097,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10101,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t3=(C_word)C_slot(((C_word*)t0)[3],C_fix(1));
+/* library.scm: 1613 loop */
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_10077(t4,t2,t3);}
+
+/* k10099 in k10095 in loop in ##sys#map in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10101(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_10101,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));}
+
+/* ##sys#for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10033(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_10033,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_10039,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=((C_word)li349),tmp=(C_word)a,a+=6,tmp));
+t7=((C_word*)t5)[1];
+f_10039(t7,t1,t3);}
+
+/* loop in ##sys#for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_fcall f_10039(C_word t0,C_word 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_10039,NULL,3,t0,t1,t2);}
+t3=(C_word)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_word)C_i_pairp(t2))){
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10055,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t5=(C_word)C_slot(t2,C_fix(0));
+/* library.scm: 1599 p */
+t6=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t4,t5);}
+else{
+/* library.scm: 1601 ##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[399]);}}}
+
+/* k10053 in loop in ##sys#for-each in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10055(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));
+/* library.scm: 1600 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10039(t3,((C_word*)t0)[2],t2);}
+
+/* ##sys#direct-return in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10027(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_10027,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_direct_return(t2,t3));}
+
+/* ##sys#call-with-direct-continuation in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10020(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_10020,3,t0,t1,t2);}
+t3=t2;
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,(C_word)C_direct_continuation(C_SCHEME_FALSE));}
+
+/* procedure? in k10011 in k10008 in k10005 in k10002 in k9999 in k9996 in k9993 in k9990 in k9987 in k9984 in k9981 in k9978 in k9816 */
+static void C_ccall f_10015(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_10015,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_closurep(t2));}
+
+/* char-name in k9816 */
+static void C_ccall f_9861(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*)tr3rv,(void*)f_9861r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_9861r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9861r(C_word t0,C_word 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_word)C_notvemptyp(t3);
+t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):C_SCHEME_FALSE);
+if(C_truep((C_word)C_charp(t2))){
+t6=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9874,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1537 lookup-char */
+t7=((C_word*)t0)[4];
+f_9820(t7,t6,t2);}
+else{
+if(C_truep(t5)){
+t6=(C_word)C_i_check_symbol_2(t2,lf[387]);
+t7=(C_word)C_i_check_char_2(t5,lf[387]);
+t8=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9892,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_word)C_slot(t2,C_fix(1));
+t10=(C_word)C_block_size(t9);
+if(C_truep((C_word)C_fixnum_lessp(t10,C_fix(2)))){
+/* library.scm: 1543 ##sys#signal-hook */
+t11=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t11+1)))(6,t11,t8,lf[56],lf[387],lf[388],t2);}
+else{
+t11=t8;
+f_9892(2,t11,C_SCHEME_UNDEFINED);}}
+else{
+t6=(C_word)C_i_check_symbol_2(t2,lf[387]);
+t7=(C_word)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_word)C_slot(t7,C_fix(1)):C_SCHEME_FALSE));}}}
+
+/* k9890 in char-name in k9816 */
+static void C_ccall f_9892(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_9892,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9895,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: 1544 lookup-char */
+t3=((C_word*)t0)[2];
+f_9820(t3,t2,((C_word*)t0)[4]);}
+
+/* k9893 in k9890 in char-name in k9816 */
+static void C_ccall f_9895(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_9895,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_assq(((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
+t3=(C_word)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_word)C_i_set_i_slot(t2,C_fix(1),((C_word*)t0)[3]));}
+else{
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[3]);
+t5=(C_word)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_word)C_fix((C_word)C_character_code(((C_word*)t0)[3]));
+t3=(C_word)C_fixnum_modulo(t2,C_fix(37));
+t4=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)t0)[3]);
+t5=(C_word)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)C_a_i_cons(&a,2,((C_word*)t0)[3],((C_word*)t0)[6]);
+t8=(C_word)C_slot(((C_word*)t0)[2],t3);
+t9=(C_word)C_a_i_cons(&a,2,t7,t8);
+t10=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,(C_word)C_i_setslot(((C_word*)t0)[2],t3,t9));}}
+
+/* k9872 in char-name in k9816 */
+static void C_ccall f_9874(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_slot(t1,C_fix(1)):C_SCHEME_FALSE));}
+
+/* lookup-char in k9816 */
+static void C_fcall f_9820(C_word t0,C_word 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_9820,NULL,3,t0,t1,t2);}
+t3=(C_word)C_fix((C_word)C_character_code(t2));
+t4=(C_word)C_fixnum_modulo(t3,C_fix(37));
+t5=(C_word)C_slot(((C_word*)t0)[2],t4);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9833,a[2]=t2,a[3]=((C_word)li338),tmp=(C_word)a,a+=4,tmp);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_9833(t6,t5));}
+
+/* loop in lookup-char in k9816 */
+static C_word C_fcall f_9833(C_word t0,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_i_pairp(t1))){
+t2=(C_word)C_slot(t1,C_fix(0));
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_eqp(t3,((C_word*)t0)[2]);
+if(C_truep(t4)){
+return(t2);}
+else{
+t5=(C_word)C_slot(t1,C_fix(1));
+t7=t5;
+t1=t7;
+goto loop;}}
+else{
+return(C_SCHEME_FALSE);}}
+
+/* char-alphabetic? */
+static void C_ccall f_9810(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_9810,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[386]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_alphabeticp(t2));}
+
+/* char-whitespace? */
+static void C_ccall f_9804(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_9804,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[385]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_whitespacep(t2));}
+
+/* char-numeric? */
+static void C_ccall f_9798(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_9798,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[384]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_numericp(t2));}
+
+/* char-lower-case? */
+static void C_ccall f_9792(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_9792,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[383]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_lower_casep(t2));}
+
+/* char-upper-case? */
+static void C_ccall f_9786(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_9786,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[382]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_upper_casep(t2));}
+
+/* char-ci<=? */
+static void C_ccall f_9772(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_9772,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9780,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1500 char-downcase */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9778 in char-ci<=? */
+static void C_ccall f_9780(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_9780,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9784,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1500 char-downcase */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k9782 in k9778 in char-ci<=? */
+static void C_ccall f_9784(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_fixnum_less_or_equal_p(((C_word*)t0)[2],t1));}
+
+/* char-ci>=? */
+static void C_ccall f_9758(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_9758,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9766,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1499 char-downcase */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9764 in char-ci>=? */
+static void C_ccall f_9766(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_9766,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9770,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1499 char-downcase */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k9768 in k9764 in char-ci>=? */
+static void C_ccall f_9770(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_fixnum_greater_or_equal_p(((C_word*)t0)[2],t1));}
+
+/* char-ci<? */
+static void C_ccall f_9744(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_9744,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9752,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1498 char-downcase */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9750 in char-ci<? */
+static void C_ccall f_9752(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_9752,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9756,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1498 char-downcase */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k9754 in k9750 in char-ci<? */
+static void C_ccall f_9756(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_fixnum_lessp(((C_word*)t0)[2],t1));}
+
+/* char-ci>? */
+static void C_ccall f_9730(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_9730,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9738,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1497 char-downcase */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9736 in char-ci>? */
+static void C_ccall f_9738(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_9738,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9742,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1497 char-downcase */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k9740 in k9736 in char-ci>? */
+static void C_ccall f_9742(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_fixnum_greaterp(((C_word*)t0)[2],t1));}
+
+/* char-ci=? */
+static void C_ccall f_9716(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_9716,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9724,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1496 char-downcase */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9722 in char-ci=? */
+static void C_ccall f_9724(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_9724,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9728,a[2]=t1,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1496 char-downcase */
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k9726 in k9722 in char-ci=? */
+static void C_ccall f_9728(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_eqp(((C_word*)t0)[2],t1));}
+
+/* char-downcase */
+static void C_ccall f_9705(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_9705,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[376]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_downcase(t2));}
+
+/* char-upcase */
+static void C_ccall f_9699(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_9699,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[375]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_u_i_char_upcase(t2));}
+
+/* char<=? */
+static void C_ccall f_9687(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_9687,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_char_2(t2,lf[374]);
+t5=(C_word)C_i_check_char_2(t3,lf[374]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_fixnum_less_or_equal_p(t2,t3));}
+
+/* char>=? */
+static void C_ccall f_9675(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_9675,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_char_2(t2,lf[373]);
+t5=(C_word)C_i_check_char_2(t3,lf[373]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_fixnum_greater_or_equal_p(t2,t3));}
+
+/* char<? */
+static void C_ccall f_9663(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_9663,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_char_2(t2,lf[372]);
+t5=(C_word)C_i_check_char_2(t3,lf[372]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_fixnum_lessp(t2,t3));}
+
+/* char>? */
+static void C_ccall f_9651(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_9651,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_char_2(t2,lf[371]);
+t5=(C_word)C_i_check_char_2(t3,lf[371]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_fixnum_greaterp(t2,t3));}
+
+/* char=? */
+static void C_ccall f_9639(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_9639,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_char_2(t2,lf[370]);
+t5=(C_word)C_i_check_char_2(t3,lf[370]);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_eqp(t2,t3));}
+
+/* integer->char */
+static void C_ccall f_9633(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_9633,3,t0,t1,t2);}
+t3=(C_word)C_i_check_exact_2(t2,lf[369]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_make_character((C_word)C_unfix(t2)));}
+
+/* char->integer */
+static void C_ccall f_9627(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_9627,3,t0,t1,t2);}
+t3=(C_word)C_i_check_char_2(t2,lf[368]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fix((C_word)C_character_code(t2)));}
+
+/* char? */
+static void C_ccall f_9624(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_9624,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_charp(t2));}
+
+/* ##sys#grow-vector */
+static void C_fcall f_9589(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_9589,NULL,4,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9593,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1437 ##sys#make-vector */
+t6=*((C_word*)lf[355]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,t4);}
+
+/* k9591 in ##sys#grow-vector */
+static void C_ccall f_9593(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_9593,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9601,a[2]=((C_word*)t0)[3],a[3]=t1,a[4]=t2,a[5]=((C_word)li316),tmp=(C_word)a,a+=6,tmp);
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,f_9601(t3,C_fix(0)));}
+
+/* doloop1676 in k9591 in ##sys#grow-vector */
+static C_word C_fcall f_9601(C_word t0,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;}}
+
+/* vector-resize */
+static void C_ccall f_9555(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_9555r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_9555r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_9555r(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_9559,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+t6=t5;
+f_9559(2,t6,C_SCHEME_FALSE);}
+else{
+t6=(C_word)C_i_cdr(t4);
+if(C_truep((C_word)C_i_nullp(t6))){
+t7=t5;
+f_9559(2,t7,(C_word)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);}}}
+
+/* k9557 in vector-resize */
+static void C_ccall f_9559(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_check_vector_2(((C_word*)t0)[4],lf[365]);
+t3=(C_word)C_i_check_exact_2(((C_word*)t0)[3],lf[365]);
+/* library.scm: 1434 ##sys#grow-vector */
+f_9589(((C_word*)t0)[2],((C_word*)t0)[4],((C_word*)t0)[3],t1);}
+
+/* vector-copy! */
+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;
+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*)tr4rv,(void*)f_9484r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_9484r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_9484r(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(6);
+t5=(C_word)C_i_check_vector_2(t2,lf[363]);
+t6=(C_word)C_i_check_vector_2(t3,lf[363]);
+t7=(C_word)C_block_size(t2);
+t8=(C_word)C_block_size(t3);
+t9=(C_word)C_notvemptyp(t4);
+t10=(C_truep(t9)?(C_word)C_i_vector_ref(t4,C_fix(0)):(C_word)C_i_fixnum_min(t8,t7));
+t11=(C_word)C_i_check_exact_2(t10,lf[363]);
+t12=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9506,a[2]=t1,a[3]=t3,a[4]=t2,a[5]=t10,tmp=(C_word)a,a+=6,tmp);
+t13=(C_word)C_fixnum_greaterp(t10,t8);
+t14=(C_truep(t13)?t13:(C_word)C_fixnum_greaterp(t10,t7));
+if(C_truep(t14)){
+/* library.scm: 1423 ##sys#signal-hook */
+t15=*((C_word*)lf[9]+1);
+((C_proc8)(void*)(*((C_word*)t15+1)))(8,t15,t12,lf[149],lf[363],lf[364],t2,t3,t10);}
+else{
+t15=t12;
+f_9506(2,t15,C_SCHEME_UNDEFINED);}}
+
+/* k9504 in vector-copy! */
+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 ab[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9506,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9511,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word)li313),tmp=(C_word)a,a+=6,tmp);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_9511(t2,C_fix(0)));}
+
+/* doloop1642 in k9504 in vector-copy! */
+static C_word C_fcall f_9511(C_word t0,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_SCHEME_UNDEFINED;
+return(t2);}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[3],t1);
+t3=(C_word)C_i_setslot(((C_word*)t0)[2],t1,t2);
+t4=(C_word)C_fixnum_plus(t1,C_fix(1));
+t7=t4;
+t1=t7;
+goto loop;}}
+
+/* vector-fill! */
+static void C_ccall f_9456(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_9456,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_vector_2(t2,lf[362]);
+t5=(C_word)C_block_size(t2);
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9465,a[2]=t3,a[3]=t2,a[4]=t5,a[5]=((C_word)li311),tmp=(C_word)a,a+=6,tmp);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,f_9465(t6,C_fix(0)));}
+
+/* doloop1615 in vector-fill! */
+static C_word C_fcall f_9465(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_fixnum_greater_or_equal_p(t1,((C_word*)t0)[4]))){
+t2=C_SCHEME_UNDEFINED;
+return(t2);}
+else{
+t2=(C_word)C_i_setslot(((C_word*)t0)[3],t1,((C_word*)t0)[2]);
+t3=(C_word)C_fixnum_plus(t1,C_fix(1));
+t6=t3;
+t1=t6;
+goto loop;}}
+
+/* vector */
+static void C_ccall f_9450(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_9450r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_9450r(t0,t1,t2);}}
+
+static void C_ccall f_9450r(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+/* library.scm: 1404 ##sys#list->vector */
+t3=*((C_word*)lf[361]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t1,t2);}
+
+/* vector->list */
+static void C_ccall f_9417(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_9417,3,t0,t1,t2);}
+t3=(C_word)C_i_check_vector_2(t2,lf[359]);
+t4=(C_word)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_9426,a[2]=t6,a[3]=t2,a[4]=t4,a[5]=((C_word)li308),tmp=(C_word)a,a+=6,tmp));
+t8=((C_word*)t6)[1];
+f_9426(t8,t1,C_fix(0));}
+
+/* loop in vector->list */
+static void C_fcall f_9426(C_word t0,C_word 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_9426,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_word)C_slot(((C_word*)t0)[3],t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9444,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 1401 loop */
+t7=t4;
+t8=t5;
+t1=t7;
+t2=t8;
+goto loop;}}
+
+/* k9442 in loop in vector->list */
+static void C_ccall f_9444(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_9444,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));}
+
+/* list->vector */
+static void C_ccall f_9365(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_9365,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_listp(t2))){
+t3=(C_word)C_i_length(t2);
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9381,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1384 ##sys#make-vector */
+t5=*((C_word*)lf[355]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+else{
+/* library.scm: 1382 ##sys#error-not-a-proper-list */
+t3=*((C_word*)lf[132]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t1,t2,lf[358]);}}
+
+/* k9379 in list->vector */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9381,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9386,a[2]=t1,a[3]=((C_word)li306),tmp=(C_word)a,a+=4,tmp);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,f_9386(t2,((C_word*)t0)[2],C_fix(0)));}
+
+/* loop in k9379 in list->vector */
+static C_word C_fcall f_9386(C_word t0,C_word 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_word)C_i_nullp(t1))){
+t3=((C_word*)t0)[2];
+return(t3);}
+else{
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_i_setslot(((C_word*)t0)[2],t2,t3);
+t5=(C_word)C_slot(t1,C_fix(1));
+t6=(C_word)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_9336(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*)tr3rv,(void*)f_9336r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_9336r(t0,t1,t2,t3);}}
+
+static void C_ccall f_9336r(C_word 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_word)C_i_check_exact_2(t2,lf[356]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9343,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_fixnum_lessp(t2,C_fix(0)))){
+/* library.scm: 1358 ##sys#error */
+t6=*((C_word*)lf[8]+1);
+((C_proc5)(void*)(*((C_word*)t6+1)))(5,t6,t5,lf[356],lf[357],t2);}
+else{
+t6=t5;
+f_9343(2,t6,C_SCHEME_UNDEFINED);}}
+
+/* k9341 in ##sys#make-vector */
+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 t4;
+C_word *a;
+if(C_truep((C_word)C_vemptyp(((C_word*)t0)[4]))){
+t2=C_SCHEME_UNDEFINED;
+/* library.scm: 1359 ##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_word)C_i_vector_ref(((C_word*)t0)[4],C_fix(0));
+/* library.scm: 1359 ##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_9333(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_9333,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_vector_set(t2,t3,t4));}
+
+/* f_9330 */
+static void C_ccall f_9330(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_9330,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_vector_ref(t2,t3));}
+
+/* vector-length */
+static void C_ccall f_9327(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_9327,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_vector_length(t2));}
+
+/* vector? */
+static void C_ccall f_9324(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_9324,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_vectorp(t2));}
+
+/* blob=? */
+static void C_ccall f_9299(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_9299,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9303,a[2]=t1,a[3]=t3,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1342 ##sys#check-blob */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t4,t2,lf[350]);}
+
+/* k9301 in blob=? */
+static void C_ccall f_9303(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_9303,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9306,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: 1343 ##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[350]);}
+
+/* k9304 in k9301 in blob=? */
+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 t5;
+C_word *a;
+t2=(C_word)C_block_size(((C_word*)t0)[4]);
+t3=(C_word)C_block_size(((C_word*)t0)[3]);
+t4=(C_word)C_eqp(t3,t2);
+t5=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?(C_word)C_i_zerop((C_word)C_string_compare(((C_word*)t0)[4],((C_word*)t0)[3],t2)):C_SCHEME_FALSE));}
+
+/* blob->string */
+static void C_ccall f_9287(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_9287,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9291,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1335 ##sys#check-blob */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t3,t2,lf[349]);}
+
+/* k9289 in blob->string */
+static void C_ccall f_9291(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_9291,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9297,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1337 ##sys#make-string */
+t4=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k9295 in k9289 in blob->string */
+static void C_ccall f_9297(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_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_9275(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_9275,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[348]);
+t4=(C_word)C_block_size(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9285,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1330 ##sys#make-blob */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[344]+1)))(3,*((C_word*)lf[344]+1),t5,t4);}
+
+/* k9283 in string->blob */
+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 *a;
+t2=(C_word)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_9266(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_9266,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9270,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1324 ##sys#check-blob */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[60]+1)))(4,*((C_word*)lf[60]+1),t3,t2,lf[347]);}
+
+/* k9268 in blob-size */
+static void C_ccall f_9270(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_block_size(((C_word*)t0)[2]));}
+
+/* blob? */
+static void C_ccall f_9260(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_9260,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(C_word)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_9251(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_9251,3,t0,t1,t2);}
+t3=(C_word)C_i_check_exact_2(t2,lf[345]);
+/* library.scm: 1317 ##sys#make-blob */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[344]+1)))(3,*((C_word*)lf[344]+1),t1,t2);}
+
+/* ##sys#make-blob */
+static void C_ccall f_9245(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_9245,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9249,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1311 ##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);}
+
+/* k9247 in ##sys#make-blob */
+static void C_ccall f_9249(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_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_9205(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*)tr4rv,(void*)f_9205r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_9205r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_9205r(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_word)C_i_check_list_2(t3,lf[342]);
+t6=(C_word)C_i_memq(t2,t3);
+if(C_truep(t6)){
+t7=(C_word)C_slot(t6,C_fix(1));
+if(C_truep((C_word)C_i_pairp(t7))){
+t8=t1;
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,(C_word)C_slot(t7,C_fix(0)));}
+else{
+/* library.scm: 1302 ##sys#error */
+t8=*((C_word*)lf[8]+1);
+((C_proc6)(void*)(*((C_word*)t8+1)))(6,t8,t1,lf[342],lf[343],t3,t2);}}
+else{
+if(C_truep((C_word)C_notvemptyp(t4))){
+t7=(C_word)C_i_vector_ref(t4,C_fix(0));
+/* g15271528 */
+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_9190(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_9190,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9197,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1291 keyword? */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t3,t2);}
+
+/* k9195 in keyword->string */
+static void C_ccall f_9197(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 1292 ##sys#symbol->string */
+t2=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+/* library.scm: 1293 ##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[339],lf[340],((C_word*)t0)[2]);}}
+
+/* string->keyword */
+static void C_ccall f_9169(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_9169,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[338]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9180,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9184,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1286 string */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,C_make_character(0));}
+
+/* k9182 in string->keyword */
+static void C_ccall f_9184(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1286 ##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]);}
+
+/* k9178 in string->keyword */
+static void C_ccall f_9180(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1286 ##sys#intern-symbol */
+C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* keyword? */
+static void C_ccall f_9149(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_9149,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_symbolp(t2))){
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_subbyte(t3,C_fix(0));
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)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_9095(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_9095r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_9095r(t0,t1,t2);}}
+
+static void C_ccall f_9095r(C_word t0,C_word 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_word)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_9112,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9116,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f23853,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1274 ##sys#number->string */
+t9=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t9+1)))(3,t9,t8,((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t8=(C_word)C_i_car(t2);
+t9=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9129,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_word)C_blockp(t8))){
+if(C_truep((C_word)C_stringp(t8))){
+t10=t9;
+f_9129(2,t10,t8);}
+else{
+if(C_truep((C_word)C_symbolp(t8))){
+/* library.scm: 1271 ##sys#symbol->string */
+t10=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t10+1)))(3,t10,t9,t8);}
+else{
+/* library.scm: 1262 ##sys#signal-hook */
+t10=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t10+1)))(6,t10,t9,lf[56],lf[334],lf[336],t8);}}}
+else{
+t10=t9;
+f_9129(2,t10,C_SCHEME_FALSE);}}}
+
+/* k9127 in gensym */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9129,2,t0,t1);}
+if(C_truep(t1)){
+t2=t1;
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f23857,a[2]=t2,a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1274 ##sys#number->string */
+t4=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)((C_word*)t0)[4])[1]);}
+else{
+/* library.scm: 1262 ##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[334],lf[336],((C_word*)t0)[2]);}}
+
+/* f23857 in k9127 in gensym */
+static void C_ccall f23857(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1265 ##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);}
+
+/* f23853 in gensym */
+static void C_ccall f23853(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1265 ##sys#string-append */
+t2=*((C_word*)lf[171]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[2],lf[335],t1);}
+
+/* k9114 in gensym */
+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 ab[4],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9116,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9120,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1274 ##sys#number->string */
+t3=*((C_word*)lf[314]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k9118 in k9114 in gensym */
+static void C_ccall f_9120(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1265 ##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);}
+
+/* k9110 in gensym */
+static void C_ccall f_9112(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1264 ##sys#make-symbol */
+C_make_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* string->uninterned-symbol */
+static void C_ccall f_9082(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_9082,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[333]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9093,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1257 string-copy */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9091 in string->uninterned-symbol */
+static void C_ccall f_9093(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1257 ##sys#make-symbol */
+C_make_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* string->symbol */
+static void C_ccall f_9069(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_9069,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[332]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9080,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1251 string-copy */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k9078 in string->symbol */
+static void C_ccall f_9080(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1251 ##sys#intern-symbol */
+C_string_to_symbol(3,0,((C_word*)t0)[2],t1);}
+
+/* symbol->string */
+static void C_ccall f_9056(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_9056,3,t0,t1,t2);}
+t3=(C_word)C_i_check_symbol_2(t2,lf[331]);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9067,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1245 ##sys#symbol->string */
+t5=*((C_word*)lf[324]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k9065 in symbol->string */
+static void C_ccall f_9067(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1245 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_9043(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_9043,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_9051,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep(t2)){
+/* library.scm: 1240 ##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: 1238 ##sys#string->symbol */
+t6=*((C_word*)lf[323]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t1,t5);}}
+
+/* k9049 in ##sys#string->qualified-symbol */
+static void C_ccall f_9051(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1238 ##sys#string->symbol */
+t2=*((C_word*)lf[323]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* ##sys#qualified-symbol? */
+static void C_ccall f_9020(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_9020,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_block_size(t3);
+if(C_truep((C_word)C_fixnum_greaterp(t4,C_fix(0)))){
+t5=(C_word)C_subbyte(t3,C_fix(0));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)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_9002(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_9002,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_block_size(t3);
+t5=f_8931(t3,t4);
+if(C_truep(t5)){
+/* library.scm: 1229 ##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_8976(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_8976,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_block_size(t3);
+t5=f_8931(t3,t4);
+if(C_truep(t5)){
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8996,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: 1221 ##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);}}
+
+/* k8994 in ##sys#symbol->qualified-string */
+static void C_ccall f_8996(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_8996,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9000,a[2]=t1,a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[6],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1221 ##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]);}
+
+/* k8998 in k8994 in ##sys#symbol->qualified-string */
+static void C_ccall f_9000(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1221 string-append */
+t2=((C_word*)t0)[4];
+((C_proc6)C_retrieve_proc(t2))(6,t2,((C_word*)t0)[3],lf[327],((C_word*)t0)[2],lf[328],t1);}
+
+/* ##sys#symbol->string */
+static void C_ccall f_8958(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_8958,3,t0,t1,t2);}
+t3=(C_word)C_slot(t2,C_fix(1));
+t4=(C_word)C_block_size(t3);
+t5=f_8931(t3,t4);
+if(C_truep(t5)){
+/* library.scm: 1213 ##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_8931(C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+C_word t4;
+C_word t5;
+C_stack_check;
+t3=(C_word)C_subbyte(t1,C_fix(0));
+if(C_truep((C_word)C_fixnum_greaterp(t2,C_fix(0)))){
+if(C_truep((C_word)C_fixnum_lessp(t3,t2))){
+t4=(C_word)C_fixnum_less_or_equal_p(t3,C_fix(31));
+return((C_truep(t4)?(C_word)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_8919(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_8919,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string(t2);
+/* library.scm: 1193 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t1,t2);}
+
+/* ##sys#interned-symbol? */
+static void C_ccall f_8916(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_8916,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_lookup_symbol(t2));}
+
+/* symbol? */
+static void C_ccall f_8911(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_8911,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_symbolp(t2));}
+
+/* flonum-print-precision */
+static void C_ccall f_8879(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_8879r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_8879r(t0,t1,t2);}}
+
+static void C_ccall f_8879r(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_8883,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_i_nullp(t2))){
+t4=t3;
+f_8883(2,t4,C_SCHEME_FALSE);}
+else{
+t4=(C_word)C_i_cdr(t2);
+if(C_truep((C_word)C_i_nullp(t4))){
+t5=t3;
+f_8883(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);}}}
+
+/* k8881 in flonum-print-precision */
+static void C_ccall f_8883(C_word 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_get_print_precision();
+if(C_truep(t1)){
+t3=(C_word)C_i_check_exact_2(t1,lf[316]);
+t4=(C_word)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_8814(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_8814r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_8814r(t0,t1,t2);}}
+
+static void C_ccall f_8814r(C_word 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_word)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_8826,a[2]=t4,a[3]=((C_word)li270),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_8826(t6,t1,t2,C_SCHEME_TRUE);}}
+
+/* loop in lcm */
+static void C_fcall f_8826(C_word t0,C_word 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_8826,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8836,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: 1163 ##sys#check-integer */
+t7=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t4,lf[311]);}
+else{
+t7=t6;
+f_8836(2,t7,C_SCHEME_UNDEFINED);}}
+
+/* k8834 in loop in lcm */
+static void C_ccall f_8836(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_8836,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[5]))){
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_abs(&a,1,((C_word*)t0)[3]));}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8851,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: 1167 ##sys#check-integer */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[311]);}}
+
+/* k8849 in k8834 in loop in lcm */
+static void C_ccall f_8851(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_8851,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8862,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)[5],C_fix(0));
+/* library.scm: 1168 ##sys#lcm */
+t4=*((C_word*)lf[310]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t2,((C_word*)t0)[2],t3);}
+
+/* k8860 in k8849 in k8834 in loop in lcm */
+static void C_ccall f_8862(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_8862,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=(C_word)C_a_i_cons(&a,2,t1,t2);
+/* library.scm: 1168 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_8826(t4,((C_word*)t0)[2],t3,C_SCHEME_FALSE);}
+
+/* ##sys#lcm */
+static void C_ccall f_8800(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_8800,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_times(&a,2,t2,t3);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8812,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 1155 ##sys#gcd */
+t6=*((C_word*)lf[308]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t2,t3);}
+
+/* k8810 in ##sys#lcm */
+static void C_ccall f_8812(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_8743(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_8743r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_8743r(t0,t1,t2);}}
+
+static void C_ccall f_8743r(C_word t0,C_word 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_word)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_8755,a[2]=t5,a[3]=((C_word)li267),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_8755(t7,t1,t2,C_SCHEME_TRUE);}}
+
+/* loop in gcd */
+static void C_fcall f_8755(C_word t0,C_word 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_8755,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_8765,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: 1147 ##sys#check-integer */
+t7=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t7+1)))(4,t7,t6,t4,lf[309]);}
+else{
+t7=t6;
+f_8765(2,t7,C_SCHEME_UNDEFINED);}}
+
+/* k8763 in loop in gcd */
+static void C_ccall f_8765(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_8765,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(((C_word*)t0)[5]))){
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_abs(&a,1,((C_word*)t0)[3]));}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_8780,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: 1151 ##sys#check-integer */
+t4=*((C_word*)lf[71]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[309]);}}
+
+/* k8778 in k8763 in loop in gcd */
+static void C_ccall f_8780(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_8780,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8791,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: 1152 ##sys#gcd */
+t3=*((C_word*)lf[308]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k8789 in k8778 in k8763 in loop in gcd */
+static void C_ccall f_8791(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_8791,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=(C_word)C_a_i_cons(&a,2,t1,t2);
+/* library.scm: 1152 loop */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_8755(t4,((C_word*)t0)[2],t3,C_SCHEME_FALSE);}
+
+/* ##sys#gcd */
+static void C_ccall f_8718(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_8718,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_8724,a[2]=((C_word*)t0)[2],a[3]=t5,a[4]=((C_word)li265),tmp=(C_word)a,a+=5,tmp));
+t7=((C_word*)t5)[1];
+f_8724(t7,t1,t2,t3);}
+
+/* loop in ##sys#gcd */
+static void C_fcall f_8724(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_8724,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_i_zerop(t3))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_abs(&a,1,t2));}
+else{
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8741,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1139 remainder */
+t5=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,t3);}}
+
+/* k8739 in loop in ##sys#gcd */
+static void C_ccall f_8741(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 1139 loop */
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_8724(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* atan */
+static void C_ccall f_8706(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*)tr3rv,(void*)f_8706r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_8706r(t0,t1,t2,t3);}}
+
+static void C_ccall f_8706r(C_word t0,C_word 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_word)C_vemptyp(t3))){
+t4=(C_word)C_a_i_atan(&a,1,t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)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_8703(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_8703,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_sqrt(&a,1,t2));}
+
+/* acos */
+static void C_ccall f_8700(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_8700,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_acos(&a,1,t2));}
+
+/* asin */
+static void C_ccall f_8697(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_8697,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_asin(&a,1,t2));}
+
+/* tan */
+static void C_ccall f_8694(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_8694,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_tan(&a,1,t2));}
+
+/* cos */
+static void C_ccall f_8691(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_8691,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_cos(&a,1,t2));}
+
+/* sin */
+static void C_ccall f_8688(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_8688,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_sin(&a,1,t2));}
+
+/* log */
+static void C_ccall f_8685(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_8685,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_log(&a,1,t2));}
+
+/* exp */
+static void C_ccall f_8682(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_8682,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_exp(&a,1,t2));}
+
+/* min */
+static void C_ccall f_8676(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_8676r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_8676r(t0,t1,t2,t3);}}
+
+static void C_ccall f_8676r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+/* library.scm: 1101 maxmin */
+f_8623(t1,t2,t3,((C_word*)t0)[2]);}
+
+/* max */
+static void C_ccall f_8670(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_8670r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_8670r(t0,t1,t2,t3);}}
+
+static void C_ccall f_8670r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+/* library.scm: 1100 maxmin */
+f_8623(t1,t2,t3,((C_word*)t0)[2]);}
+
+/* maxmin */
+static void C_fcall f_8623(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_8623,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_8629,a[2]=t4,a[3]=t6,a[4]=((C_word)li252),tmp=(C_word)a,a+=5,tmp));
+t8=((C_word*)t6)[1];
+f_8629(t8,t1,t2,t3);}
+
+/* loop in maxmin */
+static void C_fcall f_8629(C_word t0,C_word 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_8629,NULL,4,t0,t1,t2,t3);}
+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=(C_word)C_slot(t3,C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8646,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_8653,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: 1091 pred */
+t8=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t8))(4,t8,t7,t5,t2);}}
+
+/* k8651 in loop in maxmin */
+static void C_ccall f_8653(C_word c,C_word t0,C_word 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_word)C_blockp(((C_word*)t0)[7]))){
+if(C_truep((C_word)C_flonump(((C_word*)t0)[7]))){
+if(C_truep((C_word)C_blockp(((C_word*)t0)[6]))){
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 1091 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_8629(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}
+else{
+/* library.scm: 1095 exact->inexact */
+C_exact_to_inexact(3,0,((C_word*)t0)[2],((C_word*)t0)[6]);}}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 1091 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_8629(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}}
+else{
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 1091 loop */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_8629(t3,((C_word*)t0)[3],((C_word*)t0)[6],t2);}}
+else{
+t2=((C_word*)t0)[7];
+t3=(C_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* library.scm: 1091 loop */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_8629(t4,((C_word*)t0)[3],t2,t3);}}
+
+/* k8644 in loop in maxmin */
+static void C_ccall f_8646(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));
+/* library.scm: 1091 loop */
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_8629(t3,((C_word*)t0)[2],t1,t2);}
+
+/* odd? */
+static void C_ccall f_8618(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_8618,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_oddp(t2));}
+
+/* even? */
+static void C_ccall f_8615(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_8615,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_evenp(t2));}
+
+/* modulo */
+static void C_ccall f_8586(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_8586,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_divide(&a,2,t2,t3);
+if(C_truep((C_word)C_i_integerp(t4))){
+t5=(C_word)C_a_i_times(&a,2,t4,t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_a_i_minus(&a,2,t2,t5));}
+else{
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8607,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 1070 floor */
+t6=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t6))(3,t6,t5,t4);}}
+
+/* k8605 in modulo */
+static void C_ccall f_8607(C_word c,C_word t0,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_8607,2,t0,t1);}
+t2=(C_word)C_quickflonumtruncate(t1);
+if(C_truep((C_word)C_i_nequalp(t1,t2))){
+t3=(C_word)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_word)C_a_i_minus(&a,2,((C_word*)t0)[2],t3));}
+else{
+t3=t1;
+t4=(C_word)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_word)C_a_i_minus(&a,2,((C_word*)t0)[2],t4));}}
+
+/* remainder */
+static void C_ccall f_8572(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_8572,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8584,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_quotient(4,0,t4,t2,t3);}
+
+/* k8582 in remainder */
+static void C_ccall f_8584(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_8584,2,t0,t1);}
+t2=(C_word)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_word)C_a_i_minus(&a,2,((C_word*)t0)[2],t2));}
+
+/* round */
+static void C_ccall f_8563(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_8563,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[292]);
+if(C_truep((C_word)C_fixnump(t2))){
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t4=(C_word)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_8551(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_8551,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[291]);
+if(C_truep((C_word)C_fixnump(t2))){
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+/* library.scm: 1053 fptruncate */
+t4=*((C_word*)lf[224]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t2);}}
+
+/* ceiling */
+static void C_ccall f_8539(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_8539,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[290]);
+if(C_truep((C_word)C_fixnump(t2))){
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+/* library.scm: 1047 fpceiling */
+t4=*((C_word*)lf[226]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t1,t2);}}
+
+/* floor */
+static void C_ccall f_8527(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_8527,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[289]);
+if(C_truep((C_word)C_fixnump(t2))){
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+/* library.scm: 1041 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_8523(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_8523,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_inexact_to_exact(t2));}
+
+/* signum */
+static void C_ccall f_8488(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_8488,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_greaterp(t2,C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8501,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1028 ##sys#exact? */
+t4=*((C_word*)lf[258]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+else{
+if(C_truep((C_word)C_i_lessp(t2,C_fix(0)))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8513,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1029 ##sys#exact? */
+t4=*((C_word*)lf[258]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+else{
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_8519,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 1030 ##sys#exact? */
+t4=*((C_word*)lf[258]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}}
+
+/* k8517 in signum */
+static void C_ccall f_8519(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[284]));}
+
+/* k8511 in signum */
+static void C_ccall f_8513(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[283]));}
+
+/* k8499 in signum */
+static void C_ccall f_8501(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[282]));}
+
+/* denominator */
+static void C_ccall f_8475(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_8475,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[278]);
+if(C_truep((C_word)C_i_integerp(t2))){
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(1));}
+else{
+/* library.scm: 1023 ##sys#signal-hook */
+t4=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[56],lf[276],lf[279],t2);}}
+
+/* numerator */
+static void C_ccall f_8463(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_8463,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[276]);
+if(C_truep((C_word)C_i_integerp(t2))){
+t4=t2;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+/* library.scm: 1017 ##sys#signal-hook */
+t4=*((C_word*)lf[9]+1);
+((C_proc6)(void*)(*((C_word*)t4+1)))(6,t4,t1,lf[56],lf[276],lf[277],t2);}}
+
+/* imag-part */
+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 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_8457,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[275]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_fix(0));}
+
+/* real-part */
+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 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_8451,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[274]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t2);}
+
+/* angle */
+static void C_ccall f_8432(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_8432,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[271]);
+t4=(C_word)C_i_lessp(t2,C_fix(0));
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_truep(t4)?lf[272]:lf[273]));}
+
+/* abs */
+static void C_ccall f_8429(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_8429,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_abs(&a,1,t2));}
+
+/* negative? */
+static void C_ccall f_8426(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_8426,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_negativep(t2));}
+
+/* positive? */
+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_word)C_i_positivep(t2));}
+
+/* zero? */
+static void C_ccall f_8420(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_8420,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_zerop(t2));}
+
+/* ##sys#double->number */
+static void C_ccall f_8417(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_8417,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_double_to_number(t2));}
+
+/* ##sys#flonum-in-fixnum-range? */
+static void C_ccall f_8414(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_8414,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_flonum_in_fixnum_range_p(t2));}
+
+/* ##sys#fits-in-unsigned-int? */
+static void C_ccall f_8411(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_8411,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fits_in_unsigned_int_p(t2));}
+
+/* ##sys#fits-in-int? */
+static void C_ccall f_8408(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_8408,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fits_in_int_p(t2));}
+
+/* ##sys#inexact? */
+static void C_ccall f_8402(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_8402,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_inexactp(t2));}
+
+/* ##sys#exact? */
+static void C_ccall f_8399(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_8399,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_exactp(t2));}
+
+/* ##sys#integer? */
+static void C_ccall f_8395(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_8395,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_integerp(t2));}
+
+/* rational? */
+static void C_ccall f_8391(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_8391,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_rationalp(t2));}
+
+/* ##sys#number? */
+static void C_ccall f_8385(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_8385,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_numberp(t2));}
+
+/* sub1 */
+static void C_ccall f_8378(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_8378,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_minus(&a,2,t2,C_fix(1)));}
+
+/* add1 */
+static void C_ccall f_8372(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_8372,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_a_i_plus(&a,2,t2,C_fix(1)));}
+
+/* fpsqrt */
+static void C_ccall f_8346(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_8346,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8361,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_sqrt(&a,1,t2));}
+else{
+/* library.scm: 800 ##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[237],t4);}}
+
+/* k8359 in fpsqrt */
+static void C_ccall f_8361(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_8361,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_sqrt(&a,1,((C_word*)t0)[2]));}
+
+/* fplog */
+static void C_ccall f_8329(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_8329,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8344,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_log(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8342 in fplog */
+static void C_ccall f_8344(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_8344,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_log(&a,1,((C_word*)t0)[2]));}
+
+/* fpexpt */
+static void C_ccall f_8306(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_8306,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8327,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_expt(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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[235],t5,t6);}}
+
+/* k8325 in fpexpt */
+static void C_ccall f_8327(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_8327,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_expt(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fpexp */
+static void C_ccall f_8289(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_8289,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8304,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_exp(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8302 in fpexp */
+static void C_ccall f_8304(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_8304,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_exp(&a,1,((C_word*)t0)[2]));}
+
+/* fpatan2 */
+static void C_ccall f_8266(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_8266,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8287,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_atan2(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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[233],t5,t6);}}
+
+/* k8285 in fpatan2 */
+static void C_ccall f_8287(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_8287,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_atan2(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fpatan */
+static void C_ccall f_8249(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_8249,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8264,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_atan(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8262 in fpatan */
+static void C_ccall f_8264(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_8264,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_atan(&a,1,((C_word*)t0)[2]));}
+
+/* fpacos */
+static void C_ccall f_8232(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_8232,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8247,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_acos(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8245 in fpacos */
+static void C_ccall f_8247(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_8247,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_acos(&a,1,((C_word*)t0)[2]));}
+
+/* fpasin */
+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 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_8215,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8230,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_asin(&a,1,t2));}
+else{
+/* library.scm: 800 ##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[230],t4);}}
+
+/* k8228 in fpasin */
+static void C_ccall f_8230(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_8230,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_asin(&a,1,((C_word*)t0)[2]));}
+
+/* fptan */
+static void C_ccall f_8198(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_8198,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8213,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_tan(&a,1,t2));}
+else{
+/* library.scm: 800 ##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[229],t4);}}
+
+/* k8211 in fptan */
+static void C_ccall f_8213(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_8213,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_tan(&a,1,((C_word*)t0)[2]));}
+
+/* fpcos */
+static void C_ccall f_8181(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_8181,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8196,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_cos(&a,1,t2));}
+else{
+/* library.scm: 800 ##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[228],t4);}}
+
+/* k8194 in fpcos */
+static void C_ccall f_8196(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_8196,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_cos(&a,1,((C_word*)t0)[2]));}
+
+/* fpsin */
+static void C_ccall f_8164(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_8164,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8179,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_sin(&a,1,t2));}
+else{
+/* library.scm: 800 ##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[227],t4);}}
+
+/* k8177 in fpsin */
+static void C_ccall f_8179(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_8179,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_sin(&a,1,((C_word*)t0)[2]));}
+
+/* fpceiling */
+static void C_ccall f_8147(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_8147,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8162,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_ceiling(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8160 in fpceiling */
+static void C_ccall f_8162(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_8162,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_ceiling(&a,1,((C_word*)t0)[2]));}
+
+/* fpround */
+static void C_ccall f_8130(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_8130,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8145,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_round(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8143 in fpround */
+static void C_ccall f_8145(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_8145,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_round(&a,1,((C_word*)t0)[2]));}
+
+/* fptruncate */
+static void C_ccall f_8113(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_8113,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8128,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_truncate(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8126 in fptruncate */
+static void C_ccall f_8128(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_8128,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_truncate(&a,1,((C_word*)t0)[2]));}
+
+/* fpfloor */
+static void C_ccall f_8096(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_8096,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8111,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_floor(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8109 in fpfloor */
+static void C_ccall f_8111(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_8111,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_floor(&a,1,((C_word*)t0)[2]));}
+
+/* fpmin */
+static void C_ccall f_8073(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_8073,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8094,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_i_flonum_min(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k8092 in fpmin */
+static void C_ccall f_8094(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_word)C_i_flonum_min(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fpmax */
+static void C_ccall f_8050(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_8050,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8071,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_i_flonum_max(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k8069 in fpmax */
+static void C_ccall f_8071(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_word)C_i_flonum_max(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fpneg */
+static void C_ccall f_8033(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_8033,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_8048,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_i_flonump(t4))){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_a_i_flonum_negate(&a,1,t2));}
+else{
+/* library.scm: 800 ##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);}}
+
+/* k8046 in fpneg */
+static void C_ccall f_8048(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_8048,2,t0,t1);}
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_negate(&a,1,((C_word*)t0)[2]));}
+
+/* fp<= */
+static void C_ccall f_8010(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_8010,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8031,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_flonum_less_or_equal_p(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k8029 in fp<= */
+static void C_ccall f_8031(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_word)C_flonum_less_or_equal_p(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp>= */
+static void C_ccall f_7987(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_7987,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_8008,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_flonum_greater_or_equal_p(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k8006 in fp>= */
+static void C_ccall f_8008(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_word)C_flonum_greater_or_equal_p(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp< */
+static void C_ccall f_7964(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_7964,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7985,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_flonum_lessp(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7983 in fp< */
+static void C_ccall f_7985(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_word)C_flonum_lessp(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp> */
+static void C_ccall f_7941(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_7941,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7962,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_flonum_greaterp(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7960 in fp> */
+static void C_ccall f_7962(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_word)C_flonum_greaterp(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp= */
+static void C_ccall f_7918(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_7918,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7939,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_flonum_equalp(t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7937 in fp= */
+static void C_ccall f_7939(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_word)C_flonum_equalp(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp/ */
+static void C_ccall f_7895(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_7895,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7916,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_quotient(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7914 in fp/ */
+static void C_ccall f_7916(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_7916,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_quotient(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp* */
+static void C_ccall f_7872(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_7872,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7893,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_times(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7891 in fp* */
+static void C_ccall f_7893(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_7893,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_times(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp- */
+static void C_ccall f_7849(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_7849,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7870,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_difference(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7868 in fp- */
+static void C_ccall f_7870(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_7870,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_difference(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fp+ */
+static void C_ccall f_7826(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_7826,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7847,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_i_flonump(t5);
+t8=(C_truep(t7)?(C_word)C_i_flonump(t6):C_SCHEME_FALSE);
+if(C_truep(t8)){
+t9=t1;
+((C_proc2)(void*)(*((C_word*)t9+1)))(2,t9,(C_word)C_a_i_flonum_plus(&a,2,t2,t3));}
+else{
+/* library.scm: 804 ##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);}}
+
+/* k7845 in fp+ */
+static void C_ccall f_7847(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_7847,2,t0,t1);}
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_i_flonum_plus(&a,2,((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* finite? */
+static void C_ccall f_7820(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_7820,3,t0,t1,t2);}
+t3=(C_word)C_i_check_number_2(t2,lf[210]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_finitep(t2));}
+
+/* flonum? */
+static void C_ccall f_7817(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_7817,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_flonump(t2));}
+
+/* fxmod */
+static void C_ccall f_7790(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_7790,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7805,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_eqp(C_fix(0),t6);
+if(C_truep(t7)){
+/* library.scm: 765 ##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_word)C_fixnum_modulo(t2,t3));}}
+
+/* k7803 in fxmod */
+static void C_ccall f_7805(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_word)C_fixnum_modulo(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fx/ */
+static void C_ccall f_7773(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_7773,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7788,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+t6=t3;
+t7=(C_word)C_eqp(C_fix(0),t6);
+if(C_truep(t7)){
+/* library.scm: 765 ##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_word)C_fixnum_divide(t2,t3));}}
+
+/* k7786 in fx/ */
+static void C_ccall f_7788(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_word)C_fixnum_divide(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* fxshr */
+static void C_ccall f_7770(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_7770,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_shift_right(t2,t3));}
+
+/* fxshl */
+static void C_ccall f_7767(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_7767,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_shift_left(t2,t3));}
+
+/* fxnot */
+static void C_ccall f_7764(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_7764,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fixnum_not(t2));}
+
+/* fxxor */
+static void C_ccall f_7761(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_7761,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_xor(t2,t3));}
+
+/* fxior */
+static void C_ccall f_7758(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_7758,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_or(t2,t3));}
+
+/* fxand */
+static void C_ccall f_7755(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_7755,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_and(t2,t3));}
+
+/* fxneg */
+static void C_ccall f_7752(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_7752,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fixnum_negate(t2));}
+
+/* fxmax */
+static void C_ccall f_7749(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_7749,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_fixnum_max(t2,t3));}
+
+/* fxmin */
+static void C_ccall f_7746(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_7746,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_fixnum_min(t2,t3));}
+
+/* fx<= */
+static void C_ccall f_7743(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_7743,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_less_or_equal_p(t2,t3));}
+
+/* fx>= */
+static void C_ccall f_7740(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_7740,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_greater_or_equal_p(t2,t3));}
+
+/* fx< */
+static void C_ccall f_7737(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_7737,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_lessp(t2,t3));}
+
+/* fx> */
+static void C_ccall f_7734(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_7734,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_greaterp(t2,t3));}
+
+/* fx= */
+static void C_ccall f_7728(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_7728,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(t2,t3));}
+
+/* fx* */
+static void C_ccall f_7725(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_7725,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_times(t2,t3));}
+
+/* fx- */
+static void C_ccall f_7722(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_7722,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_difference(t2,t3));}
+
+/* fx+ */
+static void C_ccall f_7719(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_7719,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_fixnum_plus(t2,t3));}
+
+/* fixnum? */
+static void C_ccall f_7716(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_7716,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fixnump(t2));}
+
+/* ##sys#fragments->string */
+static void C_ccall f_7677(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_7677,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7681,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 727 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t2);}
+
+/* k7679 in ##sys#fragments->string */
+static void C_ccall f_7681(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_7681,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7686,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_7686(t2,((C_word*)t0)[2],C_fix(0)));}
+
+/* loop in k7679 in ##sys#fragments->string */
+static C_word C_fcall f_7686(C_word t0,C_word 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_word)C_i_nullp(t1))){
+t3=((C_word*)t0)[2];
+return(t3);}
+else{
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_block_size(t3);
+t5=(C_word)C_substring_copy(t3,((C_word*)t0)[2],C_fix(0),t4,t2);
+t6=(C_word)C_slot(t1,C_fix(1));
+t7=(C_word)C_fixnum_plus(t2,t4);
+t10=t6;
+t11=t7;
+t1=t10;
+t2=t11;
+goto loop;}}
+
+/* string */
+static void C_ccall f_7671(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_7671r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7671r(t0,t1,t2);}}
+
+static void C_ccall f_7671r(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+/* library.scm: 724 list->string */
+t3=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t3))(3,t3,t1,t2);}
+
+/* string-append */
+static void C_ccall f_7632(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_7632r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_7632r(t0,t1,t2);}}
+
+static void C_ccall f_7632r(C_word t0,C_word 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_7636,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_7638,a[2]=t7,a[3]=t4,a[4]=((C_word)li155),tmp=(C_word)a,a+=5,tmp));
+t9=((C_word*)t7)[1];
+f_7638(t9,t5,t2,C_fix(0));}
+
+/* loop in string-append */
+static void C_fcall f_7638(C_word t0,C_word 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_7638,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7649,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 714 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t3);}
+else{
+t5=(C_word)C_slot(t2,C_fix(0));
+t6=(C_word)C_i_check_string_2(t5,lf[172]);
+t7=(C_word)C_block_size(t5);
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7661,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_word)C_slot(t2,C_fix(1));
+t10=(C_word)C_fixnum_plus(t3,t7);
+/* library.scm: 718 loop */
+t13=t8;
+t14=t9;
+t15=t10;
+t1=t13;
+t2=t14;
+t3=t15;
+goto loop;}}
+
+/* k7659 in loop in string-append */
+static void C_ccall f_7661(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_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);}
+
+/* k7647 in loop in string-append */
+static void C_ccall f_7649(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);}
+
+/* k7634 in string-append */
+static void C_ccall f_7636(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_7616(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_7616,4,t0,t1,t2,t3);}
+t4=(C_word)C_block_size(t2);
+t5=(C_word)C_block_size(t3);
+t6=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_7626,a[2]=t1,a[3]=t5,a[4]=t3,a[5]=t4,a[6]=t2,tmp=(C_word)a,a+=7,tmp);
+t7=(C_word)C_fixnum_plus(t4,t5);
+/* library.scm: 705 ##sys#make-string */
+t8=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t6,t7);}
+
+/* k7624 in ##sys#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 t3;
+C_word t4;
+C_word *a;
+t2=(C_word)C_substring_copy(((C_word*)t0)[6],t1,C_fix(0),((C_word*)t0)[5],C_fix(0));
+t3=(C_word)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_7595(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_7595,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7601,a[2]=((C_word)li152),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 695 compare */
+f_7506(t1,t2,t3,lf[170],t4);}
+
+/* a7600 in string-ci>=? */
+static void C_ccall f_7601(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_7601,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t4,C_fix(0));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(C_word)C_fixnum_less_or_equal_p(t2,t3):(C_word)C_fixnum_greaterp(t4,C_fix(0))));}
+
+/* string-ci<=? */
+static void C_ccall f_7574(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_7574,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7580,a[2]=((C_word)li150),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 688 compare */
+f_7506(t1,t2,t3,lf[169],t4);}
+
+/* a7579 in string-ci<=? */
+static void C_ccall f_7580(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_7580,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t4,C_fix(0));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(C_word)C_fixnum_greater_or_equal_p(t2,t3):(C_word)C_fixnum_lessp(t4,C_fix(0))));}
+
+/* string-ci>? */
+static void C_ccall f_7550(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_7550,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7556,a[2]=((C_word)li148),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 681 compare */
+f_7506(t1,t2,t3,lf[168],t4);}
+
+/* a7555 in string-ci>? */
+static void C_ccall f_7556(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_7556,5,t0,t1,t2,t3,t4);}
+t5=(C_word)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_word)C_fixnum_lessp(t3,t2);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?(C_word)C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
+
+/* string-ci<? */
+static void C_ccall f_7526(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_7526,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7532,a[2]=((C_word)li146),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 674 compare */
+f_7506(t1,t2,t3,lf[167],t4);}
+
+/* a7531 in string-ci<? */
+static void C_ccall f_7532(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_7532,5,t0,t1,t2,t3,t4);}
+t5=(C_word)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_word)C_fixnum_lessp(t2,t3);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?(C_word)C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
+
+/* compare */
+static void C_fcall f_7506(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_7506,NULL,5,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_check_string_2(t2,t4);
+t7=(C_word)C_i_check_string_2(t3,t4);
+t8=(C_word)C_block_size(t2);
+t9=(C_word)C_block_size(t3);
+if(C_truep((C_word)C_fixnum_lessp(t8,t9))){
+t10=(C_word)C_string_compare_case_insensitive(t2,t3,t8);
+/* library.scm: 666 k */
+t11=t5;
+((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}
+else{
+t10=(C_word)C_string_compare_case_insensitive(t2,t3,t9);
+/* library.scm: 666 k */
+t11=t5;
+((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}}
+
+/* string>=? */
+static void C_ccall f_7485(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_7485,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7491,a[2]=((C_word)li143),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 653 compare */
+f_7396(t1,t2,t3,lf[166],t4);}
+
+/* a7490 in string>=? */
+static void C_ccall f_7491(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_7491,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t4,C_fix(0));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(C_word)C_fixnum_greater_or_equal_p(t2,t3):(C_word)C_fixnum_greaterp(t4,C_fix(0))));}
+
+/* string<=? */
+static void C_ccall f_7464(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_7464,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7470,a[2]=((C_word)li141),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 646 compare */
+f_7396(t1,t2,t3,lf[165],t4);}
+
+/* a7469 in string<=? */
+static void C_ccall f_7470(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_7470,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_eqp(t4,C_fix(0));
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_truep(t5)?(C_word)C_fixnum_less_or_equal_p(t2,t3):(C_word)C_fixnum_lessp(t4,C_fix(0))));}
+
+/* string>? */
+static void C_ccall f_7440(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_7440,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7446,a[2]=((C_word)li139),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 639 compare */
+f_7396(t1,t2,t3,lf[164],t4);}
+
+/* a7445 in string>? */
+static void C_ccall f_7446(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_7446,5,t0,t1,t2,t3,t4);}
+t5=(C_word)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_word)C_fixnum_lessp(t3,t2);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?(C_word)C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
+
+/* string<? */
+static void C_ccall f_7416(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_7416,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_7422,a[2]=((C_word)li137),tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 632 compare */
+f_7396(t1,t2,t3,lf[163],t4);}
+
+/* a7421 in string<? */
+static void C_ccall f_7422(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_7422,5,t0,t1,t2,t3,t4);}
+t5=(C_word)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_word)C_fixnum_lessp(t2,t3);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_truep(t6)?(C_word)C_eqp(t4,C_fix(0)):C_SCHEME_FALSE));}}
+
+/* compare */
+static void C_fcall f_7396(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_7396,NULL,5,t1,t2,t3,t4,t5);}
+t6=(C_word)C_i_check_string_2(t2,t4);
+t7=(C_word)C_i_check_string_2(t3,t4);
+t8=(C_word)C_block_size(t2);
+t9=(C_word)C_block_size(t3);
+if(C_truep((C_word)C_fixnum_lessp(t8,t9))){
+t10=(C_word)C_string_compare(t2,t3,t8);
+/* library.scm: 624 k */
+t11=t5;
+((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}
+else{
+t10=(C_word)C_string_compare(t2,t3,t9);
+/* library.scm: 624 k */
+t11=t5;
+((C_proc5)C_retrieve_proc(t11))(5,t11,t1,t8,t9,t10);}}
+
+/* string-ci=? */
+static void C_ccall f_7393(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_7393,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_string_ci_equal_p(t2,t3));}
+
+/* string=? */
+static void C_ccall f_7390(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_7390,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_string_equal_p(t2,t3));}
+
+/* ##sys#substring */
+static void C_ccall f_7380(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_7380,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7384,a[2]=t1,a[3]=t4,a[4]=t3,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_fixnum_difference(t4,t3);
+/* library.scm: 608 ##sys#make-string */
+t7=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t5,t6);}
+
+/* k7382 in ##sys#substring */
+static void C_ccall f_7384(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_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_7329(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*)tr4rv,(void*)f_7329r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_7329r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_7329r(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_word)C_i_check_string_2(t2,lf[159]);
+t6=(C_word)C_i_check_exact_2(t3,lf[159]);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7339,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_notvemptyp(t4))){
+t8=(C_word)C_i_vector_ref(t4,C_fix(0));
+t9=(C_word)C_i_check_exact_2(t8,lf[159]);
+t10=t7;
+f_7339(t10,t8);}
+else{
+t8=t7;
+f_7339(t8,(C_word)C_block_size(t2));}}
+
+/* k7337 in substring */
+static void C_fcall f_7339(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_7339,NULL,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[4]);
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_7348,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_word)C_fixnum_less_or_equal_p(((C_word*)t0)[2],t1))){
+t4=(C_word)C_fixnum_greater_or_equal_p(((C_word*)t0)[2],C_fix(0));
+t5=t3;
+f_7348(t5,(C_truep(t4)?(C_word)C_fixnum_less_or_equal_p(t1,t2):C_SCHEME_FALSE));}
+else{
+t4=t3;
+f_7348(t4,C_SCHEME_FALSE);}}
+
+/* k7346 in k7337 in substring */
+static void C_fcall f_7348(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+/* library.scm: 604 ##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: 605 ##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_7317(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_7317,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[158]);
+t4=(C_word)C_block_size(t2);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7327,a[2]=t1,a[3]=t4,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 585 ##sys#make-string */
+t6=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,t4);}
+
+/* k7325 in string-copy */
+static void C_ccall f_7327(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_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_7304(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_7304,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_string_2(t2,lf[157]);
+t5=(C_word)C_i_check_char_2(t3,lf[157]);
+t6=(C_word)C_block_size(t2);
+t7=(C_word)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_7252(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_7252,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_listp(t2))){
+t3=(C_word)C_i_length(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7265,a[2]=t1,a[3]=t2,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 562 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+else{
+/* library.scm: 570 ##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]);}}
+
+/* k7263 in ##sys#reverse-list->string */
+static void C_ccall f_7265(C_word c,C_word t0,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_7265,2,t0,t1);}
+t2=(C_word)C_fixnum_difference(((C_word*)t0)[4],C_fix(1));
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7274,a[2]=t1,a[3]=((C_word)li128),tmp=(C_word)a,a+=4,tmp);
+t4=f_7274(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 k7263 in ##sys#reverse-list->string */
+static C_word C_fcall f_7274(C_word t0,C_word 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_word)C_fixnum_greater_or_equal_p(t2,C_fix(0)))){
+t3=(C_word)C_slot(t1,C_fix(0));
+t4=(C_word)C_i_check_char_2(t3,lf[156]);
+t5=(C_word)C_setsubchar(((C_word*)t0)[2],t2,t3);
+t6=(C_word)C_slot(t1,C_fix(1));
+t7=(C_word)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_7200(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_7200,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_listp(t2))){
+t3=(C_word)C_i_length(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7216,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* library.scm: 536 ##sys#make-string */
+t5=*((C_word*)lf[147]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+else{
+/* library.scm: 534 ##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]);}}
+
+/* k7214 in ##sys#list->string */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_7216,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7221,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_7221(t2,C_fix(0),((C_word*)t0)[2]));}
+
+/* doloop417 in k7214 in ##sys#list->string */
+static C_word C_fcall f_7221(C_word t0,C_word 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_word)C_fixnum_greater_or_equal_p(t1,((C_word*)t0)[3]))){
+t3=((C_word*)t0)[2];
+return(t3);}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_i_check_char_2(t3,lf[154]);
+t5=(C_word)C_setsubchar(((C_word*)t0)[2],t1,t3);
+t6=(C_word)C_fixnum_plus(t1,C_fix(1));
+t7=(C_word)C_slot(t2,C_fix(1));
+t10=t6;
+t11=t7;
+t1=t10;
+t2=t11;
+goto loop;}}
+
+/* ##sys#string->list */
+static void C_ccall f_7170(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_7170,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[152]);
+t4=(C_word)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_7179,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_7179(t8,t1,C_fix(0));}
+
+/* loop in ##sys#string->list */
+static void C_fcall f_7179(C_word t0,C_word 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_7179,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_7193,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_fixnum_plus(t2,C_fix(1));
+/* library.scm: 519 loop */
+t6=t3;
+t7=t4;
+t1=t6;
+t2=t7;
+goto loop;}}
+
+/* k7191 in loop in ##sys#string->list */
+static void C_ccall f_7193(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_7193,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)C_subchar(((C_word*)t0)[3],((C_word*)t0)[2]),t1));}
+
+/* make-string */
+static void C_ccall f_7134(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*)tr3rv,(void*)f_7134r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_7134r(t0,t1,t2,t3);}}
+
+static void C_ccall f_7134r(C_word 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_word)C_i_check_exact_2(t2,lf[148]);
+t5=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_7141,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_fixnum_lessp(t2,C_fix(0)))){
+/* library.scm: 503 ##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_7141(2,t6,C_SCHEME_UNDEFINED);}}
+
+/* k7139 in make-string */
+static void C_ccall f_7141(C_word c,C_word t0,C_word t1){
+C_word 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_vemptyp(((C_word*)t0)[4]))){
+t2=((C_word*)t0)[3];
+t3=((C_word*)t0)[2];
+/* library.scm: 494 ##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_word)C_i_vector_ref(((C_word*)t0)[4],C_fix(0));
+t3=(C_word)C_i_check_char_2(t2,lf[148]);
+t4=((C_word*)t0)[3];
+t5=((C_word*)t0)[2];
+/* library.scm: 494 ##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_7101(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_7101r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_7101r(t0,t1,t2,t3);}}
+
+static void C_ccall f_7101r(C_word t0,C_word 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_7105,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+t5=t1;
+t6=t2;
+/* library.scm: 494 ##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_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+t7=t1;
+t8=t2;
+/* library.scm: 494 ##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);}}}
+
+/* k7103 in ##sys#make-string */
+static void C_ccall f_7105(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: 494 ##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_7098(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_7098,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_string_set(t2,t3,t4));}
+
+/* f_7095 */
+static void C_ccall f_7095(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_7095,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_string_ref(t2,t3));}
+
+/* string-length */
+static void C_ccall f_7092(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_7092,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_string_length(t2));}
+
+/* string? */
+static void C_ccall f_7089(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_7089,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_stringp(t2));}
+
+/* list? */
+static void C_ccall f_7086(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_7086,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_listp(t2));}
+
+/* assoc */
+static void C_ccall f_7083(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_7083,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_assoc(t2,t3));}
+
+/* assv */
+static void C_ccall f_7080(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_7080,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_assv(t2,t3));}
+
+/* assq */
+static void C_ccall f_7077(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_7077,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_assq(t2,t3));}
+
+/* member */
+static void C_ccall f_7074(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_7074,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_member(t2,t3));}
+
+/* memv */
+static void C_ccall f_7071(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_7071,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_memv(t2,t3));}
+
+/* memq */
+static void C_ccall f_7068(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_7068,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_memq(t2,t3));}
+
+/* reverse */
+static void C_ccall f_7029(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_7029,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_7035,a[2]=t2,a[3]=t4,a[4]=((C_word)li109),tmp=(C_word)a,a+=5,tmp));
+t6=((C_word*)t4)[1];
+f_7035(t6,t1,t2,C_SCHEME_END_OF_LIST);}
+
+/* loop in reverse */
+static void C_fcall f_7035(C_word t0,C_word 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_7035,NULL,4,t0,t1,t2,t3);}
+t4=(C_word)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_word)C_i_pairp(t2))){
+t5=(C_word)C_slot(t2,C_fix(1));
+t6=(C_word)C_slot(t2,C_fix(0));
+t7=(C_word)C_a_i_cons(&a,2,t6,t3);
+/* library.scm: 473 loop */
+t10=t1;
+t11=t5;
+t12=t7;
+t1=t10;
+t2=t11;
+t3=t12;
+goto loop;}
+else{
+/* library.scm: 474 ##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_6950(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_6950r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_6950r(t0,t1,t2);}}
+
+static void C_ccall f_6950r(C_word t0,C_word 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_word)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_6962,a[2]=t5,a[3]=((C_word)li107),tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_6962(t7,t1,t2);}}
+
+/* loop in append */
+static void C_fcall f_6962(C_word t0,C_word 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_6962,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=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_slot(t2,C_fix(0)));}
+else{
+t5=(C_word)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_6981,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_6981(t9,t1,t5);}}
+
+/* copy in loop in append */
+static void C_fcall f_6981(C_word t0,C_word 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_6981,NULL,3,t0,t1,t2);}
+t3=(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST);
+if(C_truep(t3)){
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+/* library.scm: 458 loop */
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_6962(t5,t1,t4);}
+else{
+if(C_truep((C_word)C_i_pairp(t2))){
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_7012,a[2]=t4,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_slot(t2,C_fix(1));
+/* library.scm: 460 copy */
+t10=t5;
+t11=t6;
+t1=t10;
+t2=t11;
+goto loop;}
+else{
+t4=(C_word)C_slot(((C_word*)t0)[4],C_fix(0));
+/* library.scm: 461 ##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]);}}}
+
+/* k7010 in copy in loop in append */
+static void C_ccall f_7012(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_7012,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));}
+
+/* ##sys#error-not-a-proper-list */
+static void C_ccall f_6933(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*)tr3rv,(void*)f_6933r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6933r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6933r(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)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+/* library.scm: 441 ##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: 441 ##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_6890(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_6890,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_6896,a[2]=t5,a[3]=t2,a[4]=((C_word)li103),tmp=(C_word)a,a+=5,tmp));
+t7=((C_word*)t5)[1];
+f_6896(t7,t1,t3);}
+
+/* loop in ##sys#delq */
+static void C_fcall f_6896(C_word t0,C_word 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_6896,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_nullp(t2))){
+t3=t2;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+else{
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=(C_word)C_eqp(((C_word*)t0)[3],t3);
+if(C_truep(t4)){
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_slot(t2,C_fix(1)));}
+else{
+t5=(C_word)C_slot(t2,C_fix(0));
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6923,a[2]=t5,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_slot(t2,C_fix(1));
+/* library.scm: 438 loop */
+t10=t6;
+t11=t7;
+t1=t10;
+t2=t11;
+goto loop;}}}
+
+/* k6921 in loop in ##sys#delq */
+static void C_ccall f_6923(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_6923,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));}
+
+/* list-ref */
+static void C_ccall f_6887(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_6887,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_list_ref(t2,t3));}
+
+/* list-tail */
+static void C_ccall f_6884(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_6884,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_list_tail(t2,t3));}
+
+/* length */
+static void C_ccall f_6881(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_6881,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_length(t2));}
+
+/* list */
+static void C_ccall f_6878(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_6878r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_6878r(t0,t1,t2);}}
+
+static void C_ccall f_6878r(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_6872(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_6872,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_eqp(t2,C_SCHEME_END_OF_LIST));}
+
+/* cdddar */
+static void C_ccall f_6854(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_6854,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cdr(t3);
+t5=(C_word)C_i_cdr(t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_cdr(t5));}
+
+/* cddadr */
+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 *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_word)C_i_cdr((C_word)C_i_cadr(t2));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
+
+/* cddaar */
+static void C_ccall f_6826(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_6826,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=(C_word)C_i_cdr(t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_cdr(t5));}
+
+/* cdaddr */
+static void C_ccall f_6820(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_6820,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr((C_word)C_i_caddr(t2)));}
+
+/* cdadar */
+static void C_ccall f_6809(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_6809,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cadr(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cdr(t4));}
+
+/* cdaadr */
+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 *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_word)C_i_car((C_word)C_i_cadr(t2));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
+
+/* cdaaar */
+static void C_ccall f_6781(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_6781,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=(C_word)C_i_car(t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_cdr(t5));}
+
+/* caddar */
+static void C_ccall f_6774(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_6774,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_caddr(t3));}
+
+/* cadadr */
+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 *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=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cadr((C_word)C_i_cadr(t2)));}
+
+/* cadaar */
+static void C_ccall f_6760(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_6760,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cadr(t4));}
+
+/* caaddr */
+static void C_ccall f_6754(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_6754,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_car((C_word)C_i_caddr(t2)));}
+
+/* caadar */
+static void C_ccall f_6743(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_6743,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cadr(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_car(t4));}
+
+/* caaadr */
+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 *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_word)C_i_car((C_word)C_i_cadr(t2));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_car(t3));}
+
+/* caaaar */
+static void C_ccall f_6715(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_6715,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=(C_word)C_i_car(t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_i_car(t5));}
+
+/* f_6701 */
+static void C_ccall f_6701(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_6701,3,t0,t1,t2);}
+t3=(C_word)C_i_cdr(t2);
+t4=(C_word)C_i_cdr(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cdr(t4));}
+
+/* f_6687 */
+static void C_ccall f_6687(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_6687,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_cdr(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cdr(t4));}
+
+/* f_6681 */
+static void C_ccall f_6681(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_6681,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr((C_word)C_i_cadr(t2)));}
+
+/* f_6667 */
+static void C_ccall f_6667(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_6667,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_cdr(t4));}
+
+/* f_6660 */
+static void C_ccall f_6660(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_6660,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cadr(t3));}
+
+/* f_6654 */
+static void C_ccall f_6654(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_6654,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_car((C_word)C_i_cadr(t2)));}
+
+/* f_6640 */
+static void C_ccall f_6640(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_6640,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(C_word)C_i_car(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_car(t4));}
+
+/* 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 *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_word)C_i_cdr(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_cdr(t3));}
+
+/* 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_word)C_i_car(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)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_word)C_i_car(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_car(t3));}
+
+/* cddddr */
+static void C_ccall f_6607(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_6607,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cddddr(t2));}
+
+/* cadddr */
+static void C_ccall f_6604(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_6604,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cadddr(t2));}
+
+/* f_6601 */
+static void C_ccall f_6601(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_6601,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_caddr(t2));}
+
+/* f_6598 */
+static void C_ccall f_6598(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_6598,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cadr(t2));}
+
+/* set-cdr! */
+static void C_ccall f_6595(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_6595,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_cdr(t2,t3));}
+
+/* set-car! */
+static void C_ccall f_6592(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_6592,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_set_car(t2,t3));}
+
+/* f_6589 */
+static void C_ccall f_6589(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_6589,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_cdr(t2));}
+
+/* f_6586 */
+static void C_ccall f_6586(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_6586,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_car(t2));}
+
+/* cons */
+static void C_ccall f_6583(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_6583,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_a_i_cons(&a,2,t2,t3));}
+
+/* pair? */
+static void C_ccall f_6580(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_6580,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_pairp(t2));}
+
+/* equal? */
+static void C_ccall f_6577(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_6577,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_equalp(t2,t3));}
+
+/* eqv? */
+static void C_ccall f_6574(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_6574,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_eqvp(t2,t3));}
+
+/* eq? */
+static void C_ccall f_6571(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_6571,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(t2,t3));}
+
+/* boolean? */
+static void C_ccall f_6568(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_6568,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_booleanp(t2));}
+
+/* not */
+static void C_ccall f_6565(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_6565,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_not(t2));}
+
+/* ##sys#dunload */
+static void C_ccall f_6552(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_6552,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6557,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 371 ##sys#make-c-string */
+t4=*((C_word*)lf[86]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k6555 in ##sys#dunload */
+static void C_ccall f_6557(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_6557,2,t0,t1);}
+if(C_truep((C_word)C_dunload(t1))){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6563,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 372 ##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);}}
+
+/* k6561 in k6555 in ##sys#dunload */
+static void C_ccall f_6563(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_6532(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_6532,3,t0,t1,t2);}
+t3=(C_word)C_i_check_string_2(t2,lf[79]);
+t4=(C_word)C_execute_shell_command(t2);
+if(C_truep((C_word)C_fixnum_lessp(t4,C_fix(0)))){
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_6545,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 359 ##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);}}
+
+/* k6543 in system */
+static void C_ccall f_6545(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* library.scm: 360 ##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_6516(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_6516,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_structurep(t2,lf[77]))){
+t3=(C_word)C_slot(t2,C_fix(1));
+/* g164165 */
+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_6503(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*)tr3rv,(void*)f_6503r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6503r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6503r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_closure_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6481(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*)tr3rv,(void*)f_6481r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6481r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6481r(C_word t0,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_word)C_blockp(t2))?(C_word)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_word)C_notvemptyp(t3))){
+t5=(C_word)C_i_vector_ref(t3,C_fix(0));
+/* library.scm: 339 ##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: 339 ##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_6450(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_6450r,5,t0,t1,t2,t3,t4);}
+else{
+a=C_alloc((c-5)*3);
+t5=C_restore_rest(a,C_rest_count(0));
+f_6450r(t0,t1,t2,t3,t4,t5);}}
+
+static void C_ccall f_6450r(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_word)C_i_check_exact_2(t2,t5);
+t7=(C_word)C_fixnum_less_or_equal_p(t3,t2);
+t8=(C_truep(t7)?(C_word)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_word)C_i_pairp(t5))){
+t9=(C_word)C_i_car(t5);
+/* library.scm: 334 ##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: 334 ##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_6431(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*)tr3rv,(void*)f_6431r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6431r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6431r(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_word)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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+/* library.scm: 328 ##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: 328 ##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_6418(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*)tr3rv,(void*)f_6418r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6418r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6418r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_char_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6405(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*)tr3rv,(void*)f_6405r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6405r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6405r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_vector_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6392(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*)tr3rv,(void*)f_6392r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6392r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6392r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_symbol_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6379(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*)tr3rv,(void*)f_6379r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6379r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6379r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_inexact_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6366(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*)tr3rv,(void*)f_6366r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6366r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6366r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_exact_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6353(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*)tr3rv,(void*)f_6353r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6353r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6353r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_number_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6340(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*)tr3rv,(void*)f_6340r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6340r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6340r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_string_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6327(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*)tr3rv,(void*)f_6327r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6327r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6327r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_list_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6314(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*)tr3rv,(void*)f_6314r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6314r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6314r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_pair_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6300(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*)tr3rv,(void*)f_6300r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_6300r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6300r(C_word t0,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_word)C_notvemptyp(t3))){
+t4=(C_word)C_i_vector_ref(t3,C_fix(0));
+t5=(C_word)C_i_check_bytevector_2(t2,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}
+else{
+t4=(C_word)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_6287(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*)tr4rv,(void*)f_6287r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_6287r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_6287r(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_word)C_notvemptyp(t4))){
+t5=(C_word)C_i_vector_ref(t4,C_fix(0));
+t6=(C_word)C_i_check_structure_2(t2,t3,t5);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,t6);}
+else{
+t5=(C_word)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_6284(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_6284,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_a_get_current_seconds(&a,1,C_SCHEME_FALSE));}
+
+/* ##sys#block-set! */
+static void C_ccall f_6250(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_6250,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6254,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+t6=(C_word)C_i_not((C_word)C_blockp(t2));
+if(C_truep(t6)){
+if(C_truep(t6)){
+/* library.scm: 261 ##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_6254(2,t7,C_SCHEME_UNDEFINED);}}
+else{
+t7=(C_truep((C_word)C_specialp(t2))?(C_word)C_eqp(t3,C_fix(0)):C_SCHEME_FALSE);
+if(C_truep(t7)){
+if(C_truep(t7)){
+/* library.scm: 261 ##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_6254(2,t8,C_SCHEME_UNDEFINED);}}
+else{
+if(C_truep((C_word)C_byteblockp(t2))){
+/* library.scm: 261 ##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_6254(2,t8,C_SCHEME_UNDEFINED);}}}}
+
+/* k6252 in ##sys#block-set! */
+static void C_ccall f_6254(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_6254,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_6257,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_block_size(((C_word*)t0)[4]);
+/* library.scm: 262 ##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]);}
+
+/* k6255 in k6252 in ##sys#block-set! */
+static void C_ccall f_6257(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_word)C_i_setslot(((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* ##sys#block-ref */
+static void C_ccall f_6241(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_6241,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_block_ref(t2,t3));}
+
+/* ##sys#flo2fix */
+static void C_ccall f_6237(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_6237,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_quickflonumtruncate(t2));}
+
+/* ##sys#halt */
+static void C_ccall f_6234(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_6234,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_halt(C_SCHEME_FALSE));}
+
+/* ##sys#void */
+static void C_ccall f_6229(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_6229,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_UNDEFINED);}
+
+/* ##sys#setbyte */
+static void C_ccall f_6226(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_6226,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_setbyte(t2,t3,t4));}
+
+/* ##sys#byte */
+static void C_ccall f_6223(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_6223,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_subbyte(t2,t3));}
+
+/* ##sys#message */
+static void C_ccall f_6220(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_6220,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_message(t2));}
+
+/* ##sys#immediate? */
+static void C_ccall f_6214(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_6214,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_not((C_word)C_blockp(t2)));}
+
+/* ##sys#start-timer */
+static void C_ccall f_6210(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_6210,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_start_timer());}
+
+/* current-gc-milliseconds */
+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_word)C_fudge(C_fix(31)));}
+
+/* current-milliseconds */
+static void C_ccall f_6194(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_6194,2,t0,t1);}
+t2=t1;
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_fudge(C_fix(16)));}
+
+/* ##sys#fudge */
+static void C_ccall f_6186(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_6186,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fudge(t2));}
+
+/* argc+argv */
+static void C_ccall f_6178(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_6178,2,t0,t1);}
+/* library.scm: 223 ##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_6173(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_6173,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_set_i_slot(t2,t3,t4));}
+
+/* ##sys#setslot */
+static void C_ccall f_6170(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_6170,5,t0,t1,t2,t3,t4);}
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_setslot(t2,t3,t4));}
+
+/* set-gc-report! */
+static void C_ccall f_6166(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_6166,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_set_gc_report(t2));}
+
+/* enable-warnings */
+static void C_ccall f_6151(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*)tr2rv,(void*)f_6151r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest_vector(a,C_rest_count(0));
+f_6151r(t0,t1,t2);}}
+
+static void C_ccall f_6151r(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_word)C_notvemptyp(t2))){
+t3=(C_word)C_i_vector_ref(t2,C_fix(0));
+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_6142(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_6142r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_6142r(t0,t1,t2,t3);}}
+
+static void C_ccall f_6142r(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_6126(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_6126r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_6126r(t0,t1,t2);}}
+
+static void C_ccall f_6126r(C_word t0,C_word t1,C_word t2){
+C_word tmp;
+C_word t3;
+if(C_truep((C_word)C_i_pairp(t2))){
+C_apply(5,0,t1,*((C_word*)lf[9]+1),lf[10],t2);}
+else{
+/* library.scm: 197 ##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_6117(C_word 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_6117,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6121,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+/* library.scm: 192 ##sys#reset-handler */
+t3=*((C_word*)lf[7]+1);
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+
+/* k6119 in reset */
+static void C_ccall f_6121(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_6107(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_6107r,2,t0,t1);}
+else{
+a=C_alloc((c-2)*3);
+t2=C_restore_rest(a,C_rest_count(0));
+f_6107r(t0,t1,t2);}}
+
+static void C_ccall f_6107r(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_6115,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* library.scm: 191 ##sys#exit-handler */
+t4=*((C_word*)lf[5]+1);
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}
+
+/* k6113 in exit */
+static void C_ccall f_6115(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[1609] = {
+{"toplevel:library_scm",(void*)C_library_toplevel},
+{"f_9818:library_scm",(void*)f_9818},
+{"f_9980:library_scm",(void*)f_9980},
+{"f_9983:library_scm",(void*)f_9983},
+{"f_9986:library_scm",(void*)f_9986},
+{"f_9989:library_scm",(void*)f_9989},
+{"f_9992:library_scm",(void*)f_9992},
+{"f_9995:library_scm",(void*)f_9995},
+{"f_9998:library_scm",(void*)f_9998},
+{"f_10001:library_scm",(void*)f_10001},
+{"f_10004:library_scm",(void*)f_10004},
+{"f_10007:library_scm",(void*)f_10007},
+{"f_10010:library_scm",(void*)f_10010},
+{"f_10013:library_scm",(void*)f_10013},
+{"f_10636:library_scm",(void*)f_10636},
+{"f_10640:library_scm",(void*)f_10640},
+{"f_10644:library_scm",(void*)f_10644},
+{"f_10647:library_scm",(void*)f_10647},
+{"f_10650:library_scm",(void*)f_10650},
+{"f_10653:library_scm",(void*)f_10653},
+{"f_21972:library_scm",(void*)f_21972},
+{"f_10806:library_scm",(void*)f_10806},
+{"f_11824:library_scm",(void*)f_11824},
+{"f_11828:library_scm",(void*)f_11828},
+{"f_11832:library_scm",(void*)f_11832},
+{"f_11836:library_scm",(void*)f_11836},
+{"f_11840:library_scm",(void*)f_11840},
+{"f_21951:library_scm",(void*)f_21951},
+{"f_21953:library_scm",(void*)f_21953},
+{"f_21957:library_scm",(void*)f_21957},
+{"f_14635:library_scm",(void*)f_14635},
+{"f_21940:library_scm",(void*)f_21940},
+{"f_21942:library_scm",(void*)f_21942},
+{"f_21946:library_scm",(void*)f_21946},
+{"f_14639:library_scm",(void*)f_14639},
+{"f_21929:library_scm",(void*)f_21929},
+{"f_21931:library_scm",(void*)f_21931},
+{"f_21935:library_scm",(void*)f_21935},
+{"f_14643:library_scm",(void*)f_14643},
+{"f_14896:library_scm",(void*)f_14896},
+{"f_14900:library_scm",(void*)f_14900},
+{"f_14904:library_scm",(void*)f_14904},
+{"f_21710:library_scm",(void*)f_21710},
+{"f_16390:library_scm",(void*)f_16390},
+{"f_21706:library_scm",(void*)f_21706},
+{"f_16396:library_scm",(void*)f_16396},
+{"f_21702:library_scm",(void*)f_21702},
+{"f_16402:library_scm",(void*)f_16402},
+{"f_21698:library_scm",(void*)f_21698},
+{"f_16408:library_scm",(void*)f_16408},
+{"f_21694:library_scm",(void*)f_21694},
+{"f_16414:library_scm",(void*)f_16414},
+{"f_21690:library_scm",(void*)f_21690},
+{"f_16420:library_scm",(void*)f_16420},
+{"f_21686:library_scm",(void*)f_21686},
+{"f_21682:library_scm",(void*)f_21682},
+{"f_16426:library_scm",(void*)f_16426},
+{"f_21668:library_scm",(void*)f_21668},
+{"f_16654:library_scm",(void*)f_16654},
+{"f_21664:library_scm",(void*)f_21664},
+{"f_16657:library_scm",(void*)f_16657},
+{"f_21660:library_scm",(void*)f_21660},
+{"f_16660:library_scm",(void*)f_16660},
+{"f_21656:library_scm",(void*)f_21656},
+{"f_16663:library_scm",(void*)f_16663},
+{"f_21652:library_scm",(void*)f_21652},
+{"f_16666:library_scm",(void*)f_16666},
+{"f_16669:library_scm",(void*)f_16669},
+{"f_16672:library_scm",(void*)f_16672},
+{"f_16675:library_scm",(void*)f_16675},
+{"f_16678:library_scm",(void*)f_16678},
+{"f_21470:library_scm",(void*)f_21470},
+{"f_21619:library_scm",(void*)f_21619},
+{"f_21474:library_scm",(void*)f_21474},
+{"f_21570:library_scm",(void*)f_21570},
+{"f_21573:library_scm",(void*)f_21573},
+{"f_21576:library_scm",(void*)f_21576},
+{"f_21585:library_scm",(void*)f_21585},
+{"f_21603:library_scm",(void*)f_21603},
+{"f_21593:library_scm",(void*)f_21593},
+{"f_21597:library_scm",(void*)f_21597},
+{"f_21579:library_scm",(void*)f_21579},
+{"f_21583:library_scm",(void*)f_21583},
+{"f_21483:library_scm",(void*)f_21483},
+{"f_21564:library_scm",(void*)f_21564},
+{"f_21486:library_scm",(void*)f_21486},
+{"f_21528:library_scm",(void*)f_21528},
+{"f_21540:library_scm",(void*)f_21540},
+{"f_21546:library_scm",(void*)f_21546},
+{"f_21516:library_scm",(void*)f_21516},
+{"f_21489:library_scm",(void*)f_21489},
+{"f_21492:library_scm",(void*)f_21492},
+{"f_21495:library_scm",(void*)f_21495},
+{"f_21501:library_scm",(void*)f_21501},
+{"f_21504:library_scm",(void*)f_21504},
+{"f_21507:library_scm",(void*)f_21507},
+{"f_17231:library_scm",(void*)f_17231},
+{"f_21461:library_scm",(void*)f_21461},
+{"f_21465:library_scm",(void*)f_21465},
+{"f_17235:library_scm",(void*)f_17235},
+{"f_21442:library_scm",(void*)f_21442},
+{"f_21446:library_scm",(void*)f_21446},
+{"f_17239:library_scm",(void*)f_17239},
+{"f_21436:library_scm",(void*)f_21436},
+{"f_17243:library_scm",(void*)f_17243},
+{"f_17250:library_scm",(void*)f_17250},
+{"f_18727:library_scm",(void*)f_18727},
+{"f_21419:library_scm",(void*)f_21419},
+{"f_21424:library_scm",(void*)f_21424},
+{"f_19414:library_scm",(void*)f_19414},
+{"f_21351:library_scm",(void*)f_21351},
+{"f25416:library_scm",(void*)f25416},
+{"f_21372:library_scm",(void*)f_21372},
+{"f_21411:library_scm",(void*)f_21411},
+{"f_21391:library_scm",(void*)f_21391},
+{"f_21401:library_scm",(void*)f_21401},
+{"f_21354:library_scm",(void*)f_21354},
+{"f_21356:library_scm",(void*)f_21356},
+{"f_19418:library_scm",(void*)f_19418},
+{"f_19422:library_scm",(void*)f_19422},
+{"f_19697:library_scm",(void*)f_19697},
+{"f_19700:library_scm",(void*)f_19700},
+{"f_19703:library_scm",(void*)f_19703},
+{"f_21273:library_scm",(void*)f_21273},
+{"f_21283:library_scm",(void*)f_21283},
+{"f_21328:library_scm",(void*)f_21328},
+{"f_21312:library_scm",(void*)f_21312},
+{"f_21293:library_scm",(void*)f_21293},
+{"f_21257:library_scm",(void*)f_21257},
+{"f_21217:library_scm",(void*)f_21217},
+{"f_21241:library_scm",(void*)f_21241},
+{"f_21233:library_scm",(void*)f_21233},
+{"f_20711:library_scm",(void*)f_20711},
+{"f_20748:library_scm",(void*)f_20748},
+{"f_20752:library_scm",(void*)f_20752},
+{"f_21207:library_scm",(void*)f_21207},
+{"f_20756:library_scm",(void*)f_20756},
+{"f_21197:library_scm",(void*)f_21197},
+{"f_20760:library_scm",(void*)f_20760},
+{"f_21187:library_scm",(void*)f_21187},
+{"f_20764:library_scm",(void*)f_20764},
+{"f_21177:library_scm",(void*)f_21177},
+{"f_20768:library_scm",(void*)f_20768},
+{"f_21167:library_scm",(void*)f_21167},
+{"f_21175:library_scm",(void*)f_21175},
+{"f_20772:library_scm",(void*)f_20772},
+{"f_21157:library_scm",(void*)f_21157},
+{"f_20776:library_scm",(void*)f_20776},
+{"f_21147:library_scm",(void*)f_21147},
+{"f_21155:library_scm",(void*)f_21155},
+{"f_20780:library_scm",(void*)f_20780},
+{"f_21137:library_scm",(void*)f_21137},
+{"f_20784:library_scm",(void*)f_20784},
+{"f_21127:library_scm",(void*)f_21127},
+{"f_21135:library_scm",(void*)f_21135},
+{"f_20788:library_scm",(void*)f_20788},
+{"f_21117:library_scm",(void*)f_21117},
+{"f_20792:library_scm",(void*)f_20792},
+{"f_21107:library_scm",(void*)f_21107},
+{"f_21115:library_scm",(void*)f_21115},
+{"f_20796:library_scm",(void*)f_20796},
+{"f_21097:library_scm",(void*)f_21097},
+{"f_20800:library_scm",(void*)f_20800},
+{"f_20804:library_scm",(void*)f_20804},
+{"f_20808:library_scm",(void*)f_20808},
+{"f_20950:library_scm",(void*)f_20950},
+{"f_21085:library_scm",(void*)f_21085},
+{"f_21076:library_scm",(void*)f_21076},
+{"f_21011:library_scm",(void*)f_21011},
+{"f_21013:library_scm",(void*)f_21013},
+{"f_21020:library_scm",(void*)f_21020},
+{"f_21032:library_scm",(void*)f_21032},
+{"f_20952:library_scm",(void*)f_20952},
+{"f_20965:library_scm",(void*)f_20965},
+{"f_20876:library_scm",(void*)f_20876},
+{"f_20889:library_scm",(void*)f_20889},
+{"f_20810:library_scm",(void*)f_20810},
+{"f_20823:library_scm",(void*)f_20823},
+{"f_20817:library_scm",(void*)f_20817},
+{"f_20714:library_scm",(void*)f_20714},
+{"f_20736:library_scm",(void*)f_20736},
+{"f_20720:library_scm",(void*)f_20720},
+{"f_20682:library_scm",(void*)f_20682},
+{"f_20686:library_scm",(void*)f_20686},
+{"f_20689:library_scm",(void*)f_20689},
+{"f_20703:library_scm",(void*)f_20703},
+{"f_20699:library_scm",(void*)f_20699},
+{"f_20673:library_scm",(void*)f_20673},
+{"f_20680:library_scm",(void*)f_20680},
+{"f_20654:library_scm",(void*)f_20654},
+{"f_20660:library_scm",(void*)f_20660},
+{"f_20615:library_scm",(void*)f_20615},
+{"f_20625:library_scm",(void*)f_20625},
+{"f_20641:library_scm",(void*)f_20641},
+{"f_20538:library_scm",(void*)f_20538},
+{"f_20551:library_scm",(void*)f_20551},
+{"f_20603:library_scm",(void*)f_20603},
+{"f_20561:library_scm",(void*)f_20561},
+{"f_20566:library_scm",(void*)f_20566},
+{"f_20515:library_scm",(void*)f_20515},
+{"f_20519:library_scm",(void*)f_20519},
+{"f_20522:library_scm",(void*)f_20522},
+{"f_20464:library_scm",(void*)f_20464},
+{"f_20471:library_scm",(void*)f_20471},
+{"f_20486:library_scm",(void*)f_20486},
+{"f_20491:library_scm",(void*)f_20491},
+{"f_20495:library_scm",(void*)f_20495},
+{"f_20501:library_scm",(void*)f_20501},
+{"f_20412:library_scm",(void*)f_20412},
+{"f_20435:library_scm",(void*)f_20435},
+{"f_20443:library_scm",(void*)f_20443},
+{"f_20439:library_scm",(void*)f_20439},
+{"f_20416:library_scm",(void*)f_20416},
+{"f_20189:library_scm",(void*)f_20189},
+{"f_20364:library_scm",(void*)f_20364},
+{"f_20359:library_scm",(void*)f_20359},
+{"f_20191:library_scm",(void*)f_20191},
+{"f_20195:library_scm",(void*)f_20195},
+{"f_20336:library_scm",(void*)f_20336},
+{"f_20198:library_scm",(void*)f_20198},
+{"f_20221:library_scm",(void*)f_20221},
+{"f_20257:library_scm",(void*)f_20257},
+{"f_20318:library_scm",(void*)f_20318},
+{"f_20265:library_scm",(void*)f_20265},
+{"f_20291:library_scm",(void*)f_20291},
+{"f_20269:library_scm",(void*)f_20269},
+{"f_20275:library_scm",(void*)f_20275},
+{"f_20278:library_scm",(void*)f_20278},
+{"f_20235:library_scm",(void*)f_20235},
+{"f_20239:library_scm",(void*)f_20239},
+{"f_20245:library_scm",(void*)f_20245},
+{"f_20200:library_scm",(void*)f_20200},
+{"f_20215:library_scm",(void*)f_20215},
+{"f_20204:library_scm",(void*)f_20204},
+{"f_20166:library_scm",(void*)f_20166},
+{"f_20171:library_scm",(void*)f_20171},
+{"f_19944:library_scm",(void*)f_19944},
+{"f_20144:library_scm",(void*)f_20144},
+{"f_20123:library_scm",(void*)f_20123},
+{"f_20116:library_scm",(void*)f_20116},
+{"f_20100:library_scm",(void*)f_20100},
+{"f_20084:library_scm",(void*)f_20084},
+{"f_20068:library_scm",(void*)f_20068},
+{"f_20052:library_scm",(void*)f_20052},
+{"f_20036:library_scm",(void*)f_20036},
+{"f_20020:library_scm",(void*)f_20020},
+{"f_20004:library_scm",(void*)f_20004},
+{"f_19979:library_scm",(void*)f_19979},
+{"f_19966:library_scm",(void*)f_19966},
+{"f_19746:library_scm",(void*)f_19746},
+{"f_19896:library_scm",(void*)f_19896},
+{"f_19891:library_scm",(void*)f_19891},
+{"f_19748:library_scm",(void*)f_19748},
+{"f_19752:library_scm",(void*)f_19752},
+{"f_19755:library_scm",(void*)f_19755},
+{"f_19761:library_scm",(void*)f_19761},
+{"f_19869:library_scm",(void*)f_19869},
+{"f_19860:library_scm",(void*)f_19860},
+{"f_19863:library_scm",(void*)f_19863},
+{"f_19764:library_scm",(void*)f_19764},
+{"f_19844:library_scm",(void*)f_19844},
+{"f_19796:library_scm",(void*)f_19796},
+{"f_19800:library_scm",(void*)f_19800},
+{"f_19803:library_scm",(void*)f_19803},
+{"f_19823:library_scm",(void*)f_19823},
+{"f_19819:library_scm",(void*)f_19819},
+{"f_19806:library_scm",(void*)f_19806},
+{"f_19767:library_scm",(void*)f_19767},
+{"f_19770:library_scm",(void*)f_19770},
+{"f_19788:library_scm",(void*)f_19788},
+{"f_19782:library_scm",(void*)f_19782},
+{"f_19704:library_scm",(void*)f_19704},
+{"f_19710:library_scm",(void*)f_19710},
+{"f_19734:library_scm",(void*)f_19734},
+{"f_19718:library_scm",(void*)f_19718},
+{"f_19727:library_scm",(void*)f_19727},
+{"f_19722:library_scm",(void*)f_19722},
+{"f_19686:library_scm",(void*)f_19686},
+{"f_19690:library_scm",(void*)f_19690},
+{"f_19680:library_scm",(void*)f_19680},
+{"f_19648:library_scm",(void*)f_19648},
+{"f_19654:library_scm",(void*)f_19654},
+{"f_19666:library_scm",(void*)f_19666},
+{"f_19603:library_scm",(void*)f_19603},
+{"f_19575:library_scm",(void*)f_19575},
+{"f_19581:library_scm",(void*)f_19581},
+{"f_19585:library_scm",(void*)f_19585},
+{"f_19594:library_scm",(void*)f_19594},
+{"f_19492:library_scm",(void*)f_19492},
+{"f_19512:library_scm",(void*)f_19512},
+{"f_19524:library_scm",(void*)f_19524},
+{"f_19540:library_scm",(void*)f_19540},
+{"f_19515:library_scm",(void*)f_19515},
+{"f_19518:library_scm",(void*)f_19518},
+{"f_19428:library_scm",(void*)f_19428},
+{"f_19473:library_scm",(void*)f_19473},
+{"f_19449:library_scm",(void*)f_19449},
+{"f_19432:library_scm",(void*)f_19432},
+{"f_18958:library_scm",(void*)f_18958},
+{"f_18971:library_scm",(void*)f_18971},
+{"f_18974:library_scm",(void*)f_18974},
+{"f_19096:library_scm",(void*)f_19096},
+{"f_19099:library_scm",(void*)f_19099},
+{"f_19102:library_scm",(void*)f_19102},
+{"f_19118:library_scm",(void*)f_19118},
+{"f_19123:library_scm",(void*)f_19123},
+{"f_19127:library_scm",(void*)f_19127},
+{"f_19360:library_scm",(void*)f_19360},
+{"f_19297:library_scm",(void*)f_19297},
+{"f_19349:library_scm",(void*)f_19349},
+{"f_19357:library_scm",(void*)f_19357},
+{"f_19330:library_scm",(void*)f_19330},
+{"f_19338:library_scm",(void*)f_19338},
+{"f_19313:library_scm",(void*)f_19313},
+{"f_19306:library_scm",(void*)f_19306},
+{"f_19139:library_scm",(void*)f_19139},
+{"f_19274:library_scm",(void*)f_19274},
+{"f_19151:library_scm",(void*)f_19151},
+{"f_19168:library_scm",(void*)f_19168},
+{"f_19199:library_scm",(void*)f_19199},
+{"f_19249:library_scm",(void*)f_19249},
+{"f_19186:library_scm",(void*)f_19186},
+{"f_19162:library_scm",(void*)f_19162},
+{"f_19104:library_scm",(void*)f_19104},
+{"f_19108:library_scm",(void*)f_19108},
+{"f_19112:library_scm",(void*)f_19112},
+{"f_18983:library_scm",(void*)f_18983},
+{"f_18986:library_scm",(void*)f_18986},
+{"f_18989:library_scm",(void*)f_18989},
+{"f_18995:library_scm",(void*)f_18995},
+{"f_19002:library_scm",(void*)f_19002},
+{"f_19004:library_scm",(void*)f_19004},
+{"f_19033:library_scm",(void*)f_19033},
+{"f_19036:library_scm",(void*)f_19036},
+{"f_19043:library_scm",(void*)f_19043},
+{"f_19030:library_scm",(void*)f_19030},
+{"f_19017:library_scm",(void*)f_19017},
+{"f_18913:library_scm",(void*)f_18913},
+{"f_18917:library_scm",(void*)f_18917},
+{"f_18920:library_scm",(void*)f_18920},
+{"f_18928:library_scm",(void*)f_18928},
+{"f_18932:library_scm",(void*)f_18932},
+{"f_18923:library_scm",(void*)f_18923},
+{"f_18866:library_scm",(void*)f_18866},
+{"f_18870:library_scm",(void*)f_18870},
+{"f_18877:library_scm",(void*)f_18877},
+{"f_18879:library_scm",(void*)f_18879},
+{"f_18901:library_scm",(void*)f_18901},
+{"f_18908:library_scm",(void*)f_18908},
+{"f_18844:library_scm",(void*)f_18844},
+{"f_18840:library_scm",(void*)f_18840},
+{"f_18819:library_scm",(void*)f_18819},
+{"f_18797:library_scm",(void*)f_18797},
+{"f_18803:library_scm",(void*)f_18803},
+{"f_18812:library_scm",(void*)f_18812},
+{"f_18788:library_scm",(void*)f_18788},
+{"f_18736:library_scm",(void*)f_18736},
+{"f_18751:library_scm",(void*)f_18751},
+{"f_18730:library_scm",(void*)f_18730},
+{"f_18707:library_scm",(void*)f_18707},
+{"f_18719:library_scm",(void*)f_18719},
+{"f_18704:library_scm",(void*)f_18704},
+{"f_18700:library_scm",(void*)f_18700},
+{"f_18697:library_scm",(void*)f_18697},
+{"f_18694:library_scm",(void*)f_18694},
+{"f_18691:library_scm",(void*)f_18691},
+{"f_18688:library_scm",(void*)f_18688},
+{"f_18685:library_scm",(void*)f_18685},
+{"f_18682:library_scm",(void*)f_18682},
+{"f_18679:library_scm",(void*)f_18679},
+{"f_18676:library_scm",(void*)f_18676},
+{"f_18673:library_scm",(void*)f_18673},
+{"f_18670:library_scm",(void*)f_18670},
+{"f_18664:library_scm",(void*)f_18664},
+{"f_18668:library_scm",(void*)f_18668},
+{"f_18661:library_scm",(void*)f_18661},
+{"f_18658:library_scm",(void*)f_18658},
+{"f_18651:library_scm",(void*)f_18651},
+{"f_18644:library_scm",(void*)f_18644},
+{"f_18626:library_scm",(void*)f_18626},
+{"f_18623:library_scm",(void*)f_18623},
+{"f_18585:library_scm",(void*)f_18585},
+{"f_18594:library_scm",(void*)f_18594},
+{"f_18604:library_scm",(void*)f_18604},
+{"f_18614:library_scm",(void*)f_18614},
+{"f_18589:library_scm",(void*)f_18589},
+{"f_18524:library_scm",(void*)f_18524},
+{"f_18530:library_scm",(void*)f_18530},
+{"f_18540:library_scm",(void*)f_18540},
+{"f_18550:library_scm",(void*)f_18550},
+{"f_18504:library_scm",(void*)f_18504},
+{"f_18501:library_scm",(void*)f_18501},
+{"f_18494:library_scm",(void*)f_18494},
+{"f_18499:library_scm",(void*)f_18499},
+{"f_18488:library_scm",(void*)f_18488},
+{"f_18492:library_scm",(void*)f_18492},
+{"f_18472:library_scm",(void*)f_18472},
+{"f_18482:library_scm",(void*)f_18482},
+{"f_18466:library_scm",(void*)f_18466},
+{"f_18470:library_scm",(void*)f_18470},
+{"f_18450:library_scm",(void*)f_18450},
+{"f_18460:library_scm",(void*)f_18460},
+{"f_18447:library_scm",(void*)f_18447},
+{"f_18444:library_scm",(void*)f_18444},
+{"f_18441:library_scm",(void*)f_18441},
+{"f_18438:library_scm",(void*)f_18438},
+{"f_18426:library_scm",(void*)f_18426},
+{"f_18419:library_scm",(void*)f_18419},
+{"f_18413:library_scm",(void*)f_18413},
+{"f_18417:library_scm",(void*)f_18417},
+{"f_18403:library_scm",(void*)f_18403},
+{"f_18411:library_scm",(void*)f_18411},
+{"f_18397:library_scm",(void*)f_18397},
+{"f_18401:library_scm",(void*)f_18401},
+{"f_18394:library_scm",(void*)f_18394},
+{"f_18391:library_scm",(void*)f_18391},
+{"f_18388:library_scm",(void*)f_18388},
+{"f_18385:library_scm",(void*)f_18385},
+{"f_18382:library_scm",(void*)f_18382},
+{"f_18379:library_scm",(void*)f_18379},
+{"f_18376:library_scm",(void*)f_18376},
+{"f_18371:library_scm",(void*)f_18371},
+{"f_18368:library_scm",(void*)f_18368},
+{"f_18365:library_scm",(void*)f_18365},
+{"f_18362:library_scm",(void*)f_18362},
+{"f_17976:library_scm",(void*)f_17976},
+{"f_18047:library_scm",(void*)f_18047},
+{"f_18051:library_scm",(void*)f_18051},
+{"f_18036:library_scm",(void*)f_18036},
+{"f_18010:library_scm",(void*)f_18010},
+{"f_18014:library_scm",(void*)f_18014},
+{"f_17999:library_scm",(void*)f_17999},
+{"f_17967:library_scm",(void*)f_17967},
+{"f_17971:library_scm",(void*)f_17971},
+{"f_17921:library_scm",(void*)f_17921},
+{"f_17929:library_scm",(void*)f_17929},
+{"f_17903:library_scm",(void*)f_17903},
+{"f_17905:library_scm",(void*)f_17905},
+{"f_17897:library_scm",(void*)f_17897},
+{"f_17761:library_scm",(void*)f_17761},
+{"f_17829:library_scm",(void*)f_17829},
+{"f_17827:library_scm",(void*)f_17827},
+{"f_17775:library_scm",(void*)f_17775},
+{"f_17785:library_scm",(void*)f_17785},
+{"f_17783:library_scm",(void*)f_17783},
+{"f_17779:library_scm",(void*)f_17779},
+{"f_17869:library_scm",(void*)f_17869},
+{"f_17711:library_scm",(void*)f_17711},
+{"f_17725:library_scm",(void*)f_17725},
+{"f_17751:library_scm",(void*)f_17751},
+{"f_17723:library_scm",(void*)f_17723},
+{"f_17708:library_scm",(void*)f_17708},
+{"f_17694:library_scm",(void*)f_17694},
+{"f_17704:library_scm",(void*)f_17704},
+{"f_17700:library_scm",(void*)f_17700},
+{"f_17534:library_scm",(void*)f_17534},
+{"f_17663:library_scm",(void*)f_17663},
+{"f_17666:library_scm",(void*)f_17666},
+{"f_17669:library_scm",(void*)f_17669},
+{"f_17648:library_scm",(void*)f_17648},
+{"f_17651:library_scm",(void*)f_17651},
+{"f_17587:library_scm",(void*)f_17587},
+{"f_17617:library_scm",(void*)f_17617},
+{"f_17591:library_scm",(void*)f_17591},
+{"f_17577:library_scm",(void*)f_17577},
+{"f_17580:library_scm",(void*)f_17580},
+{"f_17538:library_scm",(void*)f_17538},
+{"f_17525:library_scm",(void*)f_17525},
+{"f_17508:library_scm",(void*)f_17508},
+{"f_17512:library_scm",(void*)f_17512},
+{"f_17285:library_scm",(void*)f_17285},
+{"f_17500:library_scm",(void*)f_17500},
+{"f_17373:library_scm",(void*)f_17373},
+{"f_17376:library_scm",(void*)f_17376},
+{"f_17396:library_scm",(void*)f_17396},
+{"f_17308:library_scm",(void*)f_17308},
+{"f_17311:library_scm",(void*)f_17311},
+{"f_17357:library_scm",(void*)f_17357},
+{"f_17314:library_scm",(void*)f_17314},
+{"f_17322:library_scm",(void*)f_17322},
+{"f_17334:library_scm",(void*)f_17334},
+{"f_17340:library_scm",(void*)f_17340},
+{"f_17317:library_scm",(void*)f_17317},
+{"f_17273:library_scm",(void*)f_17273},
+{"f_17276:library_scm",(void*)f_17276},
+{"f_17280:library_scm",(void*)f_17280},
+{"f_17252:library_scm",(void*)f_17252},
+{"f_17256:library_scm",(void*)f_17256},
+{"f_17262:library_scm",(void*)f_17262},
+{"f_17204:library_scm",(void*)f_17204},
+{"f_17207:library_scm",(void*)f_17207},
+{"f_17090:library_scm",(void*)f_17090},
+{"f_17125:library_scm",(void*)f_17125},
+{"f_17120:library_scm",(void*)f_17120},
+{"f_17115:library_scm",(void*)f_17115},
+{"f_17110:library_scm",(void*)f_17110},
+{"f_17092:library_scm",(void*)f_17092},
+{"f_17096:library_scm",(void*)f_17096},
+{"f_17109:library_scm",(void*)f_17109},
+{"f_17001:library_scm",(void*)f_17001},
+{"f_17011:library_scm",(void*)f_17011},
+{"f_17019:library_scm",(void*)f_17019},
+{"f_17077:library_scm",(void*)f_17077},
+{"f_17027:library_scm",(void*)f_17027},
+{"f_17040:library_scm",(void*)f_17040},
+{"f_17043:library_scm",(void*)f_17043},
+{"f_17046:library_scm",(void*)f_17046},
+{"f_17064:library_scm",(void*)f_17064},
+{"f_17067:library_scm",(void*)f_17067},
+{"f_17049:library_scm",(void*)f_17049},
+{"f_17057:library_scm",(void*)f_17057},
+{"f_17014:library_scm",(void*)f_17014},
+{"f_16845:library_scm",(void*)f_16845},
+{"f_16953:library_scm",(void*)f_16953},
+{"f_16948:library_scm",(void*)f_16948},
+{"f_16847:library_scm",(void*)f_16847},
+{"f_16851:library_scm",(void*)f_16851},
+{"f_16859:library_scm",(void*)f_16859},
+{"f_16878:library_scm",(void*)f_16878},
+{"f_16897:library_scm",(void*)f_16897},
+{"f_16889:library_scm",(void*)f_16889},
+{"f_16803:library_scm",(void*)f_16803},
+{"f_16809:library_scm",(void*)f_16809},
+{"f_16833:library_scm",(void*)f_16833},
+{"f_16800:library_scm",(void*)f_16800},
+{"f_16724:library_scm",(void*)f_16724},
+{"f_16765:library_scm",(void*)f_16765},
+{"f_16794:library_scm",(void*)f_16794},
+{"f_16728:library_scm",(void*)f_16728},
+{"f_16734:library_scm",(void*)f_16734},
+{"f_16763:library_scm",(void*)f_16763},
+{"f_16732:library_scm",(void*)f_16732},
+{"f_16680:library_scm",(void*)f_16680},
+{"f_16686:library_scm",(void*)f_16686},
+{"f_16698:library_scm",(void*)f_16698},
+{"f_16684:library_scm",(void*)f_16684},
+{"f_16636:library_scm",(void*)f_16636},
+{"f_16651:library_scm",(void*)f_16651},
+{"f_16602:library_scm",(void*)f_16602},
+{"f_16618:library_scm",(void*)f_16618},
+{"f_16631:library_scm",(void*)f_16631},
+{"f_16428:library_scm",(void*)f_16428},
+{"f_16432:library_scm",(void*)f_16432},
+{"f_16491:library_scm",(void*)f_16491},
+{"f_16438:library_scm",(void*)f_16438},
+{"f_16441:library_scm",(void*)f_16441},
+{"f_16444:library_scm",(void*)f_16444},
+{"f_16447:library_scm",(void*)f_16447},
+{"f_16470:library_scm",(void*)f_16470},
+{"f_16474:library_scm",(void*)f_16474},
+{"f_16478:library_scm",(void*)f_16478},
+{"f_16482:library_scm",(void*)f_16482},
+{"f_16449:library_scm",(void*)f_16449},
+{"f_16463:library_scm",(void*)f_16463},
+{"f_16498:library_scm",(void*)f_16498},
+{"f_16502:library_scm",(void*)f_16502},
+{"f_16506:library_scm",(void*)f_16506},
+{"f_16421:library_scm",(void*)f_16421},
+{"f_16415:library_scm",(void*)f_16415},
+{"f_16409:library_scm",(void*)f_16409},
+{"f_16403:library_scm",(void*)f_16403},
+{"f_16397:library_scm",(void*)f_16397},
+{"f_16391:library_scm",(void*)f_16391},
+{"f_16325:library_scm",(void*)f_16325},
+{"f_16386:library_scm",(void*)f_16386},
+{"f_16382:library_scm",(void*)f_16382},
+{"f_16375:library_scm",(void*)f_16375},
+{"f_16371:library_scm",(void*)f_16371},
+{"f_16336:library_scm",(void*)f_16336},
+{"f_16344:library_scm",(void*)f_16344},
+{"f_16340:library_scm",(void*)f_16340},
+{"f_16285:library_scm",(void*)f_16285},
+{"f_16289:library_scm",(void*)f_16289},
+{"f_16297:library_scm",(void*)f_16297},
+{"f_16312:library_scm",(void*)f_16312},
+{"f_16305:library_scm",(void*)f_16305},
+{"f_16292:library_scm",(void*)f_16292},
+{"f_16248:library_scm",(void*)f_16248},
+{"f_16252:library_scm",(void*)f_16252},
+{"f_16255:library_scm",(void*)f_16255},
+{"f_16229:library_scm",(void*)f_16229},
+{"f_16233:library_scm",(void*)f_16233},
+{"f_16246:library_scm",(void*)f_16246},
+{"f_16211:library_scm",(void*)f_16211},
+{"f_16218:library_scm",(void*)f_16218},
+{"f_16139:library_scm",(void*)f_16139},
+{"f_16145:library_scm",(void*)f_16145},
+{"f_16174:library_scm",(void*)f_16174},
+{"f_21861:library_scm",(void*)f_21861},
+{"f_21889:library_scm",(void*)f_21889},
+{"f_21893:library_scm",(void*)f_21893},
+{"f_21896:library_scm",(void*)f_21896},
+{"f_21820:library_scm",(void*)f_21820},
+{"f_21830:library_scm",(void*)f_21830},
+{"f_21806:library_scm",(void*)f_21806},
+{"f_21803:library_scm",(void*)f_21803},
+{"f_21793:library_scm",(void*)f_21793},
+{"f_21774:library_scm",(void*)f_21774},
+{"f_21778:library_scm",(void*)f_21778},
+{"f_21755:library_scm",(void*)f_21755},
+{"f_21759:library_scm",(void*)f_21759},
+{"f_21737:library_scm",(void*)f_21737},
+{"f_21712:library_scm",(void*)f_21712},
+{"f_16084:library_scm",(void*)f_16084},
+{"f_16106:library_scm",(void*)f_16106},
+{"f_16112:library_scm",(void*)f_16112},
+{"f_16115:library_scm",(void*)f_16115},
+{"f_16080:library_scm",(void*)f_16080},
+{"f_16077:library_scm",(void*)f_16077},
+{"f_16074:library_scm",(void*)f_16074},
+{"f_16047:library_scm",(void*)f_16047},
+{"f_16053:library_scm",(void*)f_16053},
+{"f_16020:library_scm",(void*)f_16020},
+{"f_16026:library_scm",(void*)f_16026},
+{"f_15993:library_scm",(void*)f_15993},
+{"f_15999:library_scm",(void*)f_15999},
+{"f_15952:library_scm",(void*)f_15952},
+{"f_15958:library_scm",(void*)f_15958},
+{"f_15987:library_scm",(void*)f_15987},
+{"f_15960:library_scm",(void*)f_15960},
+{"f_15964:library_scm",(void*)f_15964},
+{"f_15967:library_scm",(void*)f_15967},
+{"f_15971:library_scm",(void*)f_15971},
+{"f_15974:library_scm",(void*)f_15974},
+{"f_15978:library_scm",(void*)f_15978},
+{"f_15981:library_scm",(void*)f_15981},
+{"f_15889:library_scm",(void*)f_15889},
+{"f_15908:library_scm",(void*)f_15908},
+{"f_15950:library_scm",(void*)f_15950},
+{"f_15911:library_scm",(void*)f_15911},
+{"f_15939:library_scm",(void*)f_15939},
+{"f_15923:library_scm",(void*)f_15923},
+{"f_15914:library_scm",(void*)f_15914},
+{"f_15869:library_scm",(void*)f_15869},
+{"f_15852:library_scm",(void*)f_15852},
+{"f_15856:library_scm",(void*)f_15856},
+{"f_15866:library_scm",(void*)f_15866},
+{"f_14906:library_scm",(void*)f_14906},
+{"f_14910:library_scm",(void*)f_14910},
+{"f_14913:library_scm",(void*)f_14913},
+{"f_14916:library_scm",(void*)f_14916},
+{"f_14919:library_scm",(void*)f_14919},
+{"f_15228:library_scm",(void*)f_15228},
+{"f_15467:library_scm",(void*)f_15467},
+{"f_15796:library_scm",(void*)f_15796},
+{"f_15799:library_scm",(void*)f_15799},
+{"f_15808:library_scm",(void*)f_15808},
+{"f_15821:library_scm",(void*)f_15821},
+{"f_15824:library_scm",(void*)f_15824},
+{"f_15762:library_scm",(void*)f_15762},
+{"f_15765:library_scm",(void*)f_15765},
+{"f_15746:library_scm",(void*)f_15746},
+{"f_15756:library_scm",(void*)f_15756},
+{"f_15749:library_scm",(void*)f_15749},
+{"f_15734:library_scm",(void*)f_15734},
+{"f_15702:library_scm",(void*)f_15702},
+{"f_15712:library_scm",(void*)f_15712},
+{"f_15705:library_scm",(void*)f_15705},
+{"f_15631:library_scm",(void*)f_15631},
+{"f_15634:library_scm",(void*)f_15634},
+{"f_15643:library_scm",(void*)f_15643},
+{"f_15675:library_scm",(void*)f_15675},
+{"f_15678:library_scm",(void*)f_15678},
+{"f_15665:library_scm",(void*)f_15665},
+{"f_15656:library_scm",(void*)f_15656},
+{"f_15493:library_scm",(void*)f_15493},
+{"f_15498:library_scm",(void*)f_15498},
+{"f_15546:library_scm",(void*)f_15546},
+{"f_15603:library_scm",(void*)f_15603},
+{"f_15606:library_scm",(void*)f_15606},
+{"f_15613:library_scm",(void*)f_15613},
+{"f_15511:library_scm",(void*)f_15511},
+{"f_15484:library_scm",(void*)f_15484},
+{"f_15474:library_scm",(void*)f_15474},
+{"f_15435:library_scm",(void*)f_15435},
+{"f_15444:library_scm",(void*)f_15444},
+{"f_15389:library_scm",(void*)f_15389},
+{"f_15416:library_scm",(void*)f_15416},
+{"f_15410:library_scm",(void*)f_15410},
+{"f_15398:library_scm",(void*)f_15398},
+{"f_15353:library_scm",(void*)f_15353},
+{"f_15277:library_scm",(void*)f_15277},
+{"f_15283:library_scm",(void*)f_15283},
+{"f_15323:library_scm",(void*)f_15323},
+{"f_15330:library_scm",(void*)f_15330},
+{"f_15307:library_scm",(void*)f_15307},
+{"f_15314:library_scm",(void*)f_15314},
+{"f_15287:library_scm",(void*)f_15287},
+{"f_15103:library_scm",(void*)f_15103},
+{"f_15119:library_scm",(void*)f_15119},
+{"f_15134:library_scm",(void*)f_15134},
+{"f_15184:library_scm",(void*)f_15184},
+{"f_15150:library_scm",(void*)f_15150},
+{"f_15157:library_scm",(void*)f_15157},
+{"f_15054:library_scm",(void*)f_15054},
+{"f_15061:library_scm",(void*)f_15061},
+{"f_15066:library_scm",(void*)f_15066},
+{"f_15079:library_scm",(void*)f_15079},
+{"f_15082:library_scm",(void*)f_15082},
+{"f_15033:library_scm",(void*)f_15033},
+{"f_14992:library_scm",(void*)f_14992},
+{"f_14996:library_scm",(void*)f_14996},
+{"f_14999:library_scm",(void*)f_14999},
+{"f_15018:library_scm",(void*)f_15018},
+{"f_15021:library_scm",(void*)f_15021},
+{"f_15002:library_scm",(void*)f_15002},
+{"f_14921:library_scm",(void*)f_14921},
+{"f_14931:library_scm",(void*)f_14931},
+{"f_14968:library_scm",(void*)f_14968},
+{"f_14955:library_scm",(void*)f_14955},
+{"f_14937:library_scm",(void*)f_14937},
+{"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_14848:library_scm",(void*)f_14848},
+{"f_14856:library_scm",(void*)f_14856},
+{"f_14863:library_scm",(void*)f_14863},
+{"f_14866:library_scm",(void*)f_14866},
+{"f_14817:library_scm",(void*)f_14817},
+{"f_14821:library_scm",(void*)f_14821},
+{"f_14824:library_scm",(void*)f_14824},
+{"f_14786:library_scm",(void*)f_14786},
+{"f_14790:library_scm",(void*)f_14790},
+{"f_14793:library_scm",(void*)f_14793},
+{"f_14758:library_scm",(void*)f_14758},
+{"f_14762:library_scm",(void*)f_14762},
+{"f_14721:library_scm",(void*)f_14721},
+{"f_14725:library_scm",(void*)f_14725},
+{"f_14731:library_scm",(void*)f_14731},
+{"f_14734:library_scm",(void*)f_14734},
+{"f_14709:library_scm",(void*)f_14709},
+{"f_14713:library_scm",(void*)f_14713},
+{"f_14696:library_scm",(void*)f_14696},
+{"f_14645:library_scm",(void*)f_14645},
+{"f_14659:library_scm",(void*)f_14659},
+{"f_14666:library_scm",(void*)f_14666},
+{"f_14673:library_scm",(void*)f_14673},
+{"f_14583:library_scm",(void*)f_14583},
+{"f_14585:library_scm",(void*)f_14585},
+{"f_14598:library_scm",(void*)f_14598},
+{"f_14631:library_scm",(void*)f_14631},
+{"f_14601:library_scm",(void*)f_14601},
+{"f_14610:library_scm",(void*)f_14610},
+{"f_14621:library_scm",(void*)f_14621},
+{"f_14560:library_scm",(void*)f_14560},
+{"f_14523:library_scm",(void*)f_14523},
+{"f_14548:library_scm",(void*)f_14548},
+{"f_14536:library_scm",(void*)f_14536},
+{"f_14461:library_scm",(void*)f_14461},
+{"f_14449:library_scm",(void*)f_14449},
+{"f_14284:library_scm",(void*)f_14284},
+{"f_11891:library_scm",(void*)f_11891},
+{"f_11895:library_scm",(void*)f_11895},
+{"f_11898:library_scm",(void*)f_11898},
+{"f_11901:library_scm",(void*)f_11901},
+{"f_11904:library_scm",(void*)f_11904},
+{"f_11907:library_scm",(void*)f_11907},
+{"f_11984:library_scm",(void*)f_11984},
+{"f_13601:library_scm",(void*)f_13601},
+{"f_13604:library_scm",(void*)f_13604},
+{"f_13610:library_scm",(void*)f_13610},
+{"f_14254:library_scm",(void*)f_14254},
+{"f_14167:library_scm",(void*)f_14167},
+{"f_13693:library_scm",(void*)f_13693},
+{"f_13696:library_scm",(void*)f_13696},
+{"f_13755:library_scm",(void*)f_13755},
+{"f_14059:library_scm",(void*)f_14059},
+{"f_14062:library_scm",(void*)f_14062},
+{"f_14080:library_scm",(void*)f_14080},
+{"f_14136:library_scm",(void*)f_14136},
+{"f_14099:library_scm",(void*)f_14099},
+{"f_14074:library_scm",(void*)f_14074},
+{"f_14036:library_scm",(void*)f_14036},
+{"f_14039:library_scm",(void*)f_14039},
+{"f_14050:library_scm",(void*)f_14050},
+{"f_14027:library_scm",(void*)f_14027},
+{"f_14023:library_scm",(void*)f_14023},
+{"f_14003:library_scm",(void*)f_14003},
+{"f_14010:library_scm",(void*)f_14010},
+{"f_13987:library_scm",(void*)f_13987},
+{"f_13994:library_scm",(void*)f_13994},
+{"f_13971:library_scm",(void*)f_13971},
+{"f_13978:library_scm",(void*)f_13978},
+{"f_13956:library_scm",(void*)f_13956},
+{"f_13959:library_scm",(void*)f_13959},
+{"f_13944:library_scm",(void*)f_13944},
+{"f_13929:library_scm",(void*)f_13929},
+{"f_13932:library_scm",(void*)f_13932},
+{"f_13917:library_scm",(void*)f_13917},
+{"f_13853:library_scm",(void*)f_13853},
+{"f_13856:library_scm",(void*)f_13856},
+{"f_13859:library_scm",(void*)f_13859},
+{"f_13875:library_scm",(void*)f_13875},
+{"f_13869:library_scm",(void*)f_13869},
+{"f_13864:library_scm",(void*)f_13864},
+{"f_13837:library_scm",(void*)f_13837},
+{"f_13844:library_scm",(void*)f_13844},
+{"f_13821:library_scm",(void*)f_13821},
+{"f_13828:library_scm",(void*)f_13828},
+{"f_13809:library_scm",(void*)f_13809},
+{"f_13797:library_scm",(void*)f_13797},
+{"f_13785:library_scm",(void*)f_13785},
+{"f_13773:library_scm",(void*)f_13773},
+{"f_13749:library_scm",(void*)f_13749},
+{"f_13705:library_scm",(void*)f_13705},
+{"f_13708:library_scm",(void*)f_13708},
+{"f_13714:library_scm",(void*)f_13714},
+{"f_13657:library_scm",(void*)f_13657},
+{"f_13684:library_scm",(void*)f_13684},
+{"f_13680:library_scm",(void*)f_13680},
+{"f_13666:library_scm",(void*)f_13666},
+{"f_13673:library_scm",(void*)f_13673},
+{"f_13641:library_scm",(void*)f_13641},
+{"f_13648:library_scm",(void*)f_13648},
+{"f_13625:library_scm",(void*)f_13625},
+{"f_13632:library_scm",(void*)f_13632},
+{"f_13586:library_scm",(void*)f_13586},
+{"f_13594:library_scm",(void*)f_13594},
+{"f_13517:library_scm",(void*)f_13517},
+{"f_13539:library_scm",(void*)f_13539},
+{"f_13524:library_scm",(void*)f_13524},
+{"f_13431:library_scm",(void*)f_13431},
+{"f_13435:library_scm",(void*)f_13435},
+{"f_13438:library_scm",(void*)f_13438},
+{"f_13444:library_scm",(void*)f_13444},
+{"f_13449:library_scm",(void*)f_13449},
+{"f_13497:library_scm",(void*)f_13497},
+{"f_13468:library_scm",(void*)f_13468},
+{"f_13482:library_scm",(void*)f_13482},
+{"f_13486:library_scm",(void*)f_13486},
+{"f_13478:library_scm",(void*)f_13478},
+{"f_13348:library_scm",(void*)f_13348},
+{"f_13354:library_scm",(void*)f_13354},
+{"f_13358:library_scm",(void*)f_13358},
+{"f_13417:library_scm",(void*)f_13417},
+{"f_13394:library_scm",(void*)f_13394},
+{"f_13132:library_scm",(void*)f_13132},
+{"f_13136:library_scm",(void*)f_13136},
+{"f_13139:library_scm",(void*)f_13139},
+{"f_13321:library_scm",(void*)f_13321},
+{"f_13328:library_scm",(void*)f_13328},
+{"f_13151:library_scm",(void*)f_13151},
+{"f_13168:library_scm",(void*)f_13168},
+{"f_13184:library_scm",(void*)f_13184},
+{"f_13174:library_scm",(void*)f_13174},
+{"f_13057:library_scm",(void*)f_13057},
+{"f_13130:library_scm",(void*)f_13130},
+{"f_13071:library_scm",(void*)f_13071},
+{"f_13073:library_scm",(void*)f_13073},
+{"f_13119:library_scm",(void*)f_13119},
+{"f_13092:library_scm",(void*)f_13092},
+{"f_13099:library_scm",(void*)f_13099},
+{"f_13027:library_scm",(void*)f_13027},
+{"f_13055:library_scm",(void*)f_13055},
+{"f_13042:library_scm",(void*)f_13042},
+{"f_13031:library_scm",(void*)f_13031},
+{"f_13038:library_scm",(void*)f_13038},
+{"f_12972:library_scm",(void*)f_12972},
+{"f_12980:library_scm",(void*)f_12980},
+{"f_12982:library_scm",(void*)f_12982},
+{"f_12992:library_scm",(void*)f_12992},
+{"f_12998:library_scm",(void*)f_12998},
+{"f_13005:library_scm",(void*)f_13005},
+{"f_12910:library_scm",(void*)f_12910},
+{"f_12918:library_scm",(void*)f_12918},
+{"f_12920:library_scm",(void*)f_12920},
+{"f_12930:library_scm",(void*)f_12930},
+{"f_12936:library_scm",(void*)f_12936},
+{"f_12939:library_scm",(void*)f_12939},
+{"f_12946:library_scm",(void*)f_12946},
+{"f_12840:library_scm",(void*)f_12840},
+{"f_12908:library_scm",(void*)f_12908},
+{"f_12850:library_scm",(void*)f_12850},
+{"f_12853:library_scm",(void*)f_12853},
+{"f_12780:library_scm",(void*)f_12780},
+{"f_12838:library_scm",(void*)f_12838},
+{"f_12790:library_scm",(void*)f_12790},
+{"f_12793:library_scm",(void*)f_12793},
+{"f_12828:library_scm",(void*)f_12828},
+{"f_12815:library_scm",(void*)f_12815},
+{"f_12733:library_scm",(void*)f_12733},
+{"f_12738:library_scm",(void*)f_12738},
+{"f_12750:library_scm",(void*)f_12750},
+{"f_12765:library_scm",(void*)f_12765},
+{"f_12756:library_scm",(void*)f_12756},
+{"f_12715:library_scm",(void*)f_12715},
+{"f_12719:library_scm",(void*)f_12719},
+{"f_12725:library_scm",(void*)f_12725},
+{"f_12504:library_scm",(void*)f_12504},
+{"f_12713:library_scm",(void*)f_12713},
+{"f_12527:library_scm",(void*)f_12527},
+{"f_12548:library_scm",(void*)f_12548},
+{"f_12552:library_scm",(void*)f_12552},
+{"f_12706:library_scm",(void*)f_12706},
+{"f_12555:library_scm",(void*)f_12555},
+{"f_12558:library_scm",(void*)f_12558},
+{"f_12702:library_scm",(void*)f_12702},
+{"f_12582:library_scm",(void*)f_12582},
+{"f_12585:library_scm",(void*)f_12585},
+{"f_12594:library_scm",(void*)f_12594},
+{"f_12664:library_scm",(void*)f_12664},
+{"f_12632:library_scm",(void*)f_12632},
+{"f_12635:library_scm",(void*)f_12635},
+{"f_12638:library_scm",(void*)f_12638},
+{"f_12597:library_scm",(void*)f_12597},
+{"f_12600:library_scm",(void*)f_12600},
+{"f_12623:library_scm",(void*)f_12623},
+{"f_12606:library_scm",(void*)f_12606},
+{"f_12619:library_scm",(void*)f_12619},
+{"f_12530:library_scm",(void*)f_12530},
+{"f_12514:library_scm",(void*)f_12514},
+{"f_12525:library_scm",(void*)f_12525},
+{"f_12131:library_scm",(void*)f_12131},
+{"f_12502:library_scm",(void*)f_12502},
+{"f_12498:library_scm",(void*)f_12498},
+{"f_12494:library_scm",(void*)f_12494},
+{"f_12145:library_scm",(void*)f_12145},
+{"f_12147:library_scm",(void*)f_12147},
+{"f_12483:library_scm",(void*)f_12483},
+{"f_12164:library_scm",(void*)f_12164},
+{"f_12433:library_scm",(void*)f_12433},
+{"f_12447:library_scm",(void*)f_12447},
+{"f_12454:library_scm",(void*)f_12454},
+{"f_12440:library_scm",(void*)f_12440},
+{"f_12400:library_scm",(void*)f_12400},
+{"f_12406:library_scm",(void*)f_12406},
+{"f_12420:library_scm",(void*)f_12420},
+{"f_12424:library_scm",(void*)f_12424},
+{"f_12413:library_scm",(void*)f_12413},
+{"f_12328:library_scm",(void*)f_12328},
+{"f_12334:library_scm",(void*)f_12334},
+{"f_12387:library_scm",(void*)f_12387},
+{"f_12391:library_scm",(void*)f_12391},
+{"f_12380:library_scm",(void*)f_12380},
+{"f_12376:library_scm",(void*)f_12376},
+{"f_12340:library_scm",(void*)f_12340},
+{"f_12343:library_scm",(void*)f_12343},
+{"f_12346:library_scm",(void*)f_12346},
+{"f_12356:library_scm",(void*)f_12356},
+{"f_12360:library_scm",(void*)f_12360},
+{"f_12319:library_scm",(void*)f_12319},
+{"f_12311:library_scm",(void*)f_12311},
+{"f_12287:library_scm",(void*)f_12287},
+{"f_12266:library_scm",(void*)f_12266},
+{"f_12245:library_scm",(void*)f_12245},
+{"f_12228:library_scm",(void*)f_12228},
+{"f_12211:library_scm",(void*)f_12211},
+{"f_12194:library_scm",(void*)f_12194},
+{"f_12177:library_scm",(void*)f_12177},
+{"f_12095:library_scm",(void*)f_12095},
+{"f_12099:library_scm",(void*)f_12099},
+{"f_12107:library_scm",(void*)f_12107},
+{"f_12035:library_scm",(void*)f_12035},
+{"f_12041:library_scm",(void*)f_12041},
+{"f_12067:library_scm",(void*)f_12067},
+{"f_12051:library_scm",(void*)f_12051},
+{"f_12054:library_scm",(void*)f_12054},
+{"f_12064:library_scm",(void*)f_12064},
+{"f_11987:library_scm",(void*)f_11987},
+{"f_11995:library_scm",(void*)f_11995},
+{"f_11997:library_scm",(void*)f_11997},
+{"f_12026:library_scm",(void*)f_12026},
+{"f_12033:library_scm",(void*)f_12033},
+{"f_12010:library_scm",(void*)f_12010},
+{"f_12017:library_scm",(void*)f_12017},
+{"f_11969:library_scm",(void*)f_11969},
+{"f_11973:library_scm",(void*)f_11973},
+{"f_11960:library_scm",(void*)f_11960},
+{"f_11964:library_scm",(void*)f_11964},
+{"f_11924:library_scm",(void*)f_11924},
+{"f_11932:library_scm",(void*)f_11932},
+{"f_11934:library_scm",(void*)f_11934},
+{"f_11941:library_scm",(void*)f_11941},
+{"f_11948:library_scm",(void*)f_11948},
+{"f_11915:library_scm",(void*)f_11915},
+{"f_11909:library_scm",(void*)f_11909},
+{"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_11842:library_scm",(void*)f_11842},
+{"f_11850:library_scm",(void*)f_11850},
+{"f_11863:library_scm",(void*)f_11863},
+{"f_11853:library_scm",(void*)f_11853},
+{"f_11816:library_scm",(void*)f_11816},
+{"f_11813:library_scm",(void*)f_11813},
+{"f_11810:library_scm",(void*)f_11810},
+{"f_11773:library_scm",(void*)f_11773},
+{"f_11777:library_scm",(void*)f_11777},
+{"f_11780:library_scm",(void*)f_11780},
+{"f_11783:library_scm",(void*)f_11783},
+{"f_11739:library_scm",(void*)f_11739},
+{"f_11743:library_scm",(void*)f_11743},
+{"f_11746:library_scm",(void*)f_11746},
+{"f_11749:library_scm",(void*)f_11749},
+{"f_11714:library_scm",(void*)f_11714},
+{"f_11727:library_scm",(void*)f_11727},
+{"f_11702:library_scm",(void*)f_11702},
+{"f_11706:library_scm",(void*)f_11706},
+{"f_11709:library_scm",(void*)f_11709},
+{"f_11643:library_scm",(void*)f_11643},
+{"f_11647:library_scm",(void*)f_11647},
+{"f_11615:library_scm",(void*)f_11615},
+{"f_11619:library_scm",(void*)f_11619},
+{"f_11574:library_scm",(void*)f_11574},
+{"f_11578:library_scm",(void*)f_11578},
+{"f_11581:library_scm",(void*)f_11581},
+{"f_11584:library_scm",(void*)f_11584},
+{"f_11571:library_scm",(void*)f_11571},
+{"f_11472:library_scm",(void*)f_11472},
+{"f_11479:library_scm",(void*)f_11479},
+{"f_11553:library_scm",(void*)f_11553},
+{"f_11486:library_scm",(void*)f_11486},
+{"f_11490:library_scm",(void*)f_11490},
+{"f_11521:library_scm",(void*)f_11521},
+{"f_11503:library_scm",(void*)f_11503},
+{"f_11510:library_scm",(void*)f_11510},
+{"f_11568:library_scm",(void*)f_11568},
+{"f_11417:library_scm",(void*)f_11417},
+{"f_11429:library_scm",(void*)f_11429},
+{"f_11435:library_scm",(void*)f_11435},
+{"f_11461:library_scm",(void*)f_11461},
+{"f_11465:library_scm",(void*)f_11465},
+{"f_11445:library_scm",(void*)f_11445},
+{"f_11456:library_scm",(void*)f_11456},
+{"f_11452:library_scm",(void*)f_11452},
+{"f_11380:library_scm",(void*)f_11380},
+{"f_11389:library_scm",(void*)f_11389},
+{"f_11415:library_scm",(void*)f_11415},
+{"f_11399:library_scm",(void*)f_11399},
+{"f_11410:library_scm",(void*)f_11410},
+{"f_11406:library_scm",(void*)f_11406},
+{"f_11332:library_scm",(void*)f_11332},
+{"f_11336:library_scm",(void*)f_11336},
+{"f_11339:library_scm",(void*)f_11339},
+{"f_11320:library_scm",(void*)f_11320},
+{"f_11308:library_scm",(void*)f_11308},
+{"f_11312:library_scm",(void*)f_11312},
+{"f_11277:library_scm",(void*)f_11277},
+{"f25012:library_scm",(void*)f25012},
+{"f23907:library_scm",(void*)f23907},
+{"f_11281:library_scm",(void*)f_11281},
+{"f_11284:library_scm",(void*)f_11284},
+{"f_11243:library_scm",(void*)f_11243},
+{"f_11247:library_scm",(void*)f_11247},
+{"f_11250:library_scm",(void*)f_11250},
+{"f_11253:library_scm",(void*)f_11253},
+{"f_11230:library_scm",(void*)f_11230},
+{"f_11237:library_scm",(void*)f_11237},
+{"f_11201:library_scm",(void*)f_11201},
+{"f_11210:library_scm",(void*)f_11210},
+{"f_11228:library_scm",(void*)f_11228},
+{"f_11214:library_scm",(void*)f_11214},
+{"f_11179:library_scm",(void*)f_11179},
+{"f_11188:library_scm",(void*)f_11188},
+{"f_11199:library_scm",(void*)f_11199},
+{"f_11195:library_scm",(void*)f_11195},
+{"f_11159:library_scm",(void*)f_11159},
+{"f_11163:library_scm",(void*)f_11163},
+{"f_11169:library_scm",(void*)f_11169},
+{"f_11173:library_scm",(void*)f_11173},
+{"f_11139:library_scm",(void*)f_11139},
+{"f_11143:library_scm",(void*)f_11143},
+{"f_11149:library_scm",(void*)f_11149},
+{"f_11153:library_scm",(void*)f_11153},
+{"f_11115:library_scm",(void*)f_11115},
+{"f_11119:library_scm",(void*)f_11119},
+{"f_11130:library_scm",(void*)f_11130},
+{"f_11134:library_scm",(void*)f_11134},
+{"f_11124:library_scm",(void*)f_11124},
+{"f_11091:library_scm",(void*)f_11091},
+{"f_11095:library_scm",(void*)f_11095},
+{"f_11106:library_scm",(void*)f_11106},
+{"f_11110:library_scm",(void*)f_11110},
+{"f_11100:library_scm",(void*)f_11100},
+{"f_11085:library_scm",(void*)f_11085},
+{"f_11079:library_scm",(void*)f_11079},
+{"f_11073:library_scm",(void*)f_11073},
+{"f_11067:library_scm",(void*)f_11067},
+{"f_11042:library_scm",(void*)f_11042},
+{"f_11046:library_scm",(void*)f_11046},
+{"f_11058:library_scm",(void*)f_11058},
+{"f_10944:library_scm",(void*)f_10944},
+{"f_10953:library_scm",(void*)f_10953},
+{"f_10989:library_scm",(void*)f_10989},
+{"f_11002:library_scm",(void*)f_11002},
+{"f_10960:library_scm",(void*)f_10960},
+{"f_10963:library_scm",(void*)f_10963},
+{"f_10987:library_scm",(void*)f_10987},
+{"f_10969:library_scm",(void*)f_10969},
+{"f_10972:library_scm",(void*)f_10972},
+{"f_10983:library_scm",(void*)f_10983},
+{"f_10979:library_scm",(void*)f_10979},
+{"f_10966:library_scm",(void*)f_10966},
+{"f_10854:library_scm",(void*)f_10854},
+{"f_10894:library_scm",(void*)f_10894},
+{"f_10928:library_scm",(void*)f_10928},
+{"f_10917:library_scm",(void*)f_10917},
+{"f_10924:library_scm",(void*)f_10924},
+{"f_10873:library_scm",(void*)f_10873},
+{"f_10880:library_scm",(void*)f_10880},
+{"f_10844:library_scm",(void*)f_10844},
+{"f_10852:library_scm",(void*)f_10852},
+{"f_10810:library_scm",(void*)f_10810},
+{"f_10798:library_scm",(void*)f_10798},
+{"f_10792:library_scm",(void*)f_10792},
+{"f_10775:library_scm",(void*)f_10775},
+{"f_10790:library_scm",(void*)f_10790},
+{"f_10759:library_scm",(void*)f_10759},
+{"f_10772:library_scm",(void*)f_10772},
+{"f_10743:library_scm",(void*)f_10743},
+{"f_10756:library_scm",(void*)f_10756},
+{"f_10727:library_scm",(void*)f_10727},
+{"f_10740:library_scm",(void*)f_10740},
+{"f_10712:library_scm",(void*)f_10712},
+{"f_10716:library_scm",(void*)f_10716},
+{"f_10719:library_scm",(void*)f_10719},
+{"f_10682:library_scm",(void*)f_10682},
+{"f_10655:library_scm",(void*)f_10655},
+{"f_10667:library_scm",(void*)f_10667},
+{"f_22054:library_scm",(void*)f_22054},
+{"f_22175:library_scm",(void*)f_22175},
+{"f_22061:library_scm",(void*)f_22061},
+{"f_22074:library_scm",(void*)f_22074},
+{"f_22122:library_scm",(void*)f_22122},
+{"f_22126:library_scm",(void*)f_22126},
+{"f_22107:library_scm",(void*)f_22107},
+{"f_22143:library_scm",(void*)f_22143},
+{"f_21998:library_scm",(void*)f_21998},
+{"f_22006:library_scm",(void*)f_22006},
+{"f_22008:library_scm",(void*)f_22008},
+{"f_21995:library_scm",(void*)f_21995},
+{"f_21992:library_scm",(void*)f_21992},
+{"f_21986:library_scm",(void*)f_21986},
+{"f_21983:library_scm",(void*)f_21983},
+{"f_21980:library_scm",(void*)f_21980},
+{"f_21977:library_scm",(void*)f_21977},
+{"f_21974:library_scm",(void*)f_21974},
+{"f_10608:library_scm",(void*)f_10608},
+{"f_10587:library_scm",(void*)f_10587},
+{"f_10570:library_scm",(void*)f_10570},
+{"f_10567:library_scm",(void*)f_10567},
+{"f_10552:library_scm",(void*)f_10552},
+{"f_10561:library_scm",(void*)f_10561},
+{"f_10519:library_scm",(void*)f_10519},
+{"f_10529:library_scm",(void*)f_10529},
+{"f_10512:library_scm",(void*)f_10512},
+{"f_10502:library_scm",(void*)f_10502},
+{"f_10444:library_scm",(void*)f_10444},
+{"f_10489:library_scm",(void*)f_10489},
+{"f_10460:library_scm",(void*)f_10460},
+{"f_10466:library_scm",(void*)f_10466},
+{"f_10404:library_scm",(void*)f_10404},
+{"f_10410:library_scm",(void*)f_10410},
+{"f_10416:library_scm",(void*)f_10416},
+{"f_10420:library_scm",(void*)f_10420},
+{"f_10373:library_scm",(void*)f_10373},
+{"f_10377:library_scm",(void*)f_10377},
+{"f_10386:library_scm",(void*)f_10386},
+{"f_10394:library_scm",(void*)f_10394},
+{"f_10284:library_scm",(void*)f_10284},
+{"f_10338:library_scm",(void*)f_10338},
+{"f_10370:library_scm",(void*)f_10370},
+{"f_10367:library_scm",(void*)f_10367},
+{"f_10355:library_scm",(void*)f_10355},
+{"f_10363:library_scm",(void*)f_10363},
+{"f_10359:library_scm",(void*)f_10359},
+{"f_10296:library_scm",(void*)f_10296},
+{"f_10325:library_scm",(void*)f_10325},
+{"f_10213:library_scm",(void*)f_10213},
+{"f_10255:library_scm",(void*)f_10255},
+{"f_10279:library_scm",(void*)f_10279},
+{"f_10268:library_scm",(void*)f_10268},
+{"f_10275:library_scm",(void*)f_10275},
+{"f_10225:library_scm",(void*)f_10225},
+{"f_10235:library_scm",(void*)f_10235},
+{"f_10161:library_scm",(void*)f_10161},
+{"f_10179:library_scm",(void*)f_10179},
+{"f_10171:library_scm",(void*)f_10171},
+{"f_10116:library_scm",(void*)f_10116},
+{"f_10148:library_scm",(void*)f_10148},
+{"f_10152:library_scm",(void*)f_10152},
+{"f_10071:library_scm",(void*)f_10071},
+{"f_10077:library_scm",(void*)f_10077},
+{"f_10097:library_scm",(void*)f_10097},
+{"f_10101:library_scm",(void*)f_10101},
+{"f_10033:library_scm",(void*)f_10033},
+{"f_10039:library_scm",(void*)f_10039},
+{"f_10055:library_scm",(void*)f_10055},
+{"f_10027:library_scm",(void*)f_10027},
+{"f_10020:library_scm",(void*)f_10020},
+{"f_10015:library_scm",(void*)f_10015},
+{"f_9861:library_scm",(void*)f_9861},
+{"f_9892:library_scm",(void*)f_9892},
+{"f_9895:library_scm",(void*)f_9895},
+{"f_9874:library_scm",(void*)f_9874},
+{"f_9820:library_scm",(void*)f_9820},
+{"f_9833:library_scm",(void*)f_9833},
+{"f_9810:library_scm",(void*)f_9810},
+{"f_9804:library_scm",(void*)f_9804},
+{"f_9798:library_scm",(void*)f_9798},
+{"f_9792:library_scm",(void*)f_9792},
+{"f_9786:library_scm",(void*)f_9786},
+{"f_9772:library_scm",(void*)f_9772},
+{"f_9780:library_scm",(void*)f_9780},
+{"f_9784:library_scm",(void*)f_9784},
+{"f_9758:library_scm",(void*)f_9758},
+{"f_9766:library_scm",(void*)f_9766},
+{"f_9770:library_scm",(void*)f_9770},
+{"f_9744:library_scm",(void*)f_9744},
+{"f_9752:library_scm",(void*)f_9752},
+{"f_9756:library_scm",(void*)f_9756},
+{"f_9730:library_scm",(void*)f_9730},
+{"f_9738:library_scm",(void*)f_9738},
+{"f_9742:library_scm",(void*)f_9742},
+{"f_9716:library_scm",(void*)f_9716},
+{"f_9724:library_scm",(void*)f_9724},
+{"f_9728:library_scm",(void*)f_9728},
+{"f_9705:library_scm",(void*)f_9705},
+{"f_9699:library_scm",(void*)f_9699},
+{"f_9687:library_scm",(void*)f_9687},
+{"f_9675:library_scm",(void*)f_9675},
+{"f_9663:library_scm",(void*)f_9663},
+{"f_9651:library_scm",(void*)f_9651},
+{"f_9639:library_scm",(void*)f_9639},
+{"f_9633:library_scm",(void*)f_9633},
+{"f_9627:library_scm",(void*)f_9627},
+{"f_9624:library_scm",(void*)f_9624},
+{"f_9589:library_scm",(void*)f_9589},
+{"f_9593:library_scm",(void*)f_9593},
+{"f_9601:library_scm",(void*)f_9601},
+{"f_9555:library_scm",(void*)f_9555},
+{"f_9559:library_scm",(void*)f_9559},
+{"f_9484:library_scm",(void*)f_9484},
+{"f_9506:library_scm",(void*)f_9506},
+{"f_9511:library_scm",(void*)f_9511},
+{"f_9456:library_scm",(void*)f_9456},
+{"f_9465:library_scm",(void*)f_9465},
+{"f_9450:library_scm",(void*)f_9450},
+{"f_9417:library_scm",(void*)f_9417},
+{"f_9426:library_scm",(void*)f_9426},
+{"f_9444:library_scm",(void*)f_9444},
+{"f_9365:library_scm",(void*)f_9365},
+{"f_9381:library_scm",(void*)f_9381},
+{"f_9386:library_scm",(void*)f_9386},
+{"f_9336:library_scm",(void*)f_9336},
+{"f_9343:library_scm",(void*)f_9343},
+{"f_9333:library_scm",(void*)f_9333},
+{"f_9330:library_scm",(void*)f_9330},
+{"f_9327:library_scm",(void*)f_9327},
+{"f_9324:library_scm",(void*)f_9324},
+{"f_9299:library_scm",(void*)f_9299},
+{"f_9303:library_scm",(void*)f_9303},
+{"f_9306:library_scm",(void*)f_9306},
+{"f_9287:library_scm",(void*)f_9287},
+{"f_9291:library_scm",(void*)f_9291},
+{"f_9297:library_scm",(void*)f_9297},
+{"f_9275:library_scm",(void*)f_9275},
+{"f_9285:library_scm",(void*)f_9285},
+{"f_9266:library_scm",(void*)f_9266},
+{"f_9270:library_scm",(void*)f_9270},
+{"f_9260:library_scm",(void*)f_9260},
+{"f_9251:library_scm",(void*)f_9251},
+{"f_9245:library_scm",(void*)f_9245},
+{"f_9249:library_scm",(void*)f_9249},
+{"f_9205:library_scm",(void*)f_9205},
+{"f_9190:library_scm",(void*)f_9190},
+{"f_9197:library_scm",(void*)f_9197},
+{"f_9169:library_scm",(void*)f_9169},
+{"f_9184:library_scm",(void*)f_9184},
+{"f_9180:library_scm",(void*)f_9180},
+{"f_9149:library_scm",(void*)f_9149},
+{"f_9095:library_scm",(void*)f_9095},
+{"f_9129:library_scm",(void*)f_9129},
+{"f23857:library_scm",(void*)f23857},
+{"f23853:library_scm",(void*)f23853},
+{"f_9116:library_scm",(void*)f_9116},
+{"f_9120:library_scm",(void*)f_9120},
+{"f_9112:library_scm",(void*)f_9112},
+{"f_9082:library_scm",(void*)f_9082},
+{"f_9093:library_scm",(void*)f_9093},
+{"f_9069:library_scm",(void*)f_9069},
+{"f_9080:library_scm",(void*)f_9080},
+{"f_9056:library_scm",(void*)f_9056},
+{"f_9067:library_scm",(void*)f_9067},
+{"f_9043:library_scm",(void*)f_9043},
+{"f_9051:library_scm",(void*)f_9051},
+{"f_9020:library_scm",(void*)f_9020},
+{"f_9002:library_scm",(void*)f_9002},
+{"f_8976:library_scm",(void*)f_8976},
+{"f_8996:library_scm",(void*)f_8996},
+{"f_9000:library_scm",(void*)f_9000},
+{"f_8958:library_scm",(void*)f_8958},
+{"f_8931:library_scm",(void*)f_8931},
+{"f_8919:library_scm",(void*)f_8919},
+{"f_8916:library_scm",(void*)f_8916},
+{"f_8911:library_scm",(void*)f_8911},
+{"f_8879:library_scm",(void*)f_8879},
+{"f_8883:library_scm",(void*)f_8883},
+{"f_8814:library_scm",(void*)f_8814},
+{"f_8826:library_scm",(void*)f_8826},
+{"f_8836:library_scm",(void*)f_8836},
+{"f_8851:library_scm",(void*)f_8851},
+{"f_8862:library_scm",(void*)f_8862},
+{"f_8800:library_scm",(void*)f_8800},
+{"f_8812:library_scm",(void*)f_8812},
+{"f_8743:library_scm",(void*)f_8743},
+{"f_8755:library_scm",(void*)f_8755},
+{"f_8765:library_scm",(void*)f_8765},
+{"f_8780:library_scm",(void*)f_8780},
+{"f_8791:library_scm",(void*)f_8791},
+{"f_8718:library_scm",(void*)f_8718},
+{"f_8724:library_scm",(void*)f_8724},
+{"f_8741:library_scm",(void*)f_8741},
+{"f_8706:library_scm",(void*)f_8706},
+{"f_8703:library_scm",(void*)f_8703},
+{"f_8700:library_scm",(void*)f_8700},
+{"f_8697:library_scm",(void*)f_8697},
+{"f_8694:library_scm",(void*)f_8694},
+{"f_8691:library_scm",(void*)f_8691},
+{"f_8688:library_scm",(void*)f_8688},
+{"f_8685:library_scm",(void*)f_8685},
+{"f_8682:library_scm",(void*)f_8682},
+{"f_8676:library_scm",(void*)f_8676},
+{"f_8670:library_scm",(void*)f_8670},
+{"f_8623:library_scm",(void*)f_8623},
+{"f_8629:library_scm",(void*)f_8629},
+{"f_8653:library_scm",(void*)f_8653},
+{"f_8646:library_scm",(void*)f_8646},
+{"f_8618:library_scm",(void*)f_8618},
+{"f_8615:library_scm",(void*)f_8615},
+{"f_8586:library_scm",(void*)f_8586},
+{"f_8607:library_scm",(void*)f_8607},
+{"f_8572:library_scm",(void*)f_8572},
+{"f_8584:library_scm",(void*)f_8584},
+{"f_8563:library_scm",(void*)f_8563},
+{"f_8551:library_scm",(void*)f_8551},
+{"f_8539:library_scm",(void*)f_8539},
+{"f_8527:library_scm",(void*)f_8527},
+{"f_8523:library_scm",(void*)f_8523},
+{"f_8488:library_scm",(void*)f_8488},
+{"f_8519:library_scm",(void*)f_8519},
+{"f_8513:library_scm",(void*)f_8513},
+{"f_8501:library_scm",(void*)f_8501},
+{"f_8475:library_scm",(void*)f_8475},
+{"f_8463:library_scm",(void*)f_8463},
+{"f_8457:library_scm",(void*)f_8457},
+{"f_8451:library_scm",(void*)f_8451},
+{"f_8432:library_scm",(void*)f_8432},
+{"f_8429:library_scm",(void*)f_8429},
+{"f_8426:library_scm",(void*)f_8426},
+{"f_8423:library_scm",(void*)f_8423},
+{"f_8420:library_scm",(void*)f_8420},
+{"f_8417:library_scm",(void*)f_8417},
+{"f_8414:library_scm",(void*)f_8414},
+{"f_8411:library_scm",(void*)f_8411},
+{"f_8408:library_scm",(void*)f_8408},
+{"f_8402:library_scm",(void*)f_8402},
+{"f_8399:library_scm",(void*)f_8399},
+{"f_8395:library_scm",(void*)f_8395},
+{"f_8391:library_scm",(void*)f_8391},
+{"f_8385:library_scm",(void*)f_8385},
+{"f_8378:library_scm",(void*)f_8378},
+{"f_8372:library_scm",(void*)f_8372},
+{"f_8346:library_scm",(void*)f_8346},
+{"f_8361:library_scm",(void*)f_8361},
+{"f_8329:library_scm",(void*)f_8329},
+{"f_8344:library_scm",(void*)f_8344},
+{"f_8306:library_scm",(void*)f_8306},
+{"f_8327:library_scm",(void*)f_8327},
+{"f_8289:library_scm",(void*)f_8289},
+{"f_8304:library_scm",(void*)f_8304},
+{"f_8266:library_scm",(void*)f_8266},
+{"f_8287:library_scm",(void*)f_8287},
+{"f_8249:library_scm",(void*)f_8249},
+{"f_8264:library_scm",(void*)f_8264},
+{"f_8232:library_scm",(void*)f_8232},
+{"f_8247:library_scm",(void*)f_8247},
+{"f_8215:library_scm",(void*)f_8215},
+{"f_8230:library_scm",(void*)f_8230},
+{"f_8198:library_scm",(void*)f_8198},
+{"f_8213:library_scm",(void*)f_8213},
+{"f_8181:library_scm",(void*)f_8181},
+{"f_8196:library_scm",(void*)f_8196},
+{"f_8164:library_scm",(void*)f_8164},
+{"f_8179:library_scm",(void*)f_8179},
+{"f_8147:library_scm",(void*)f_8147},
+{"f_8162:library_scm",(void*)f_8162},
+{"f_8130:library_scm",(void*)f_8130},
+{"f_8145:library_scm",(void*)f_8145},
+{"f_8113:library_scm",(void*)f_8113},
+{"f_8128:library_scm",(void*)f_8128},
+{"f_8096:library_scm",(void*)f_8096},
+{"f_8111:library_scm",(void*)f_8111},
+{"f_8073:library_scm",(void*)f_8073},
+{"f_8094:library_scm",(void*)f_8094},
+{"f_8050:library_scm",(void*)f_8050},
+{"f_8071:library_scm",(void*)f_8071},
+{"f_8033:library_scm",(void*)f_8033},
+{"f_8048:library_scm",(void*)f_8048},
+{"f_8010:library_scm",(void*)f_8010},
+{"f_8031:library_scm",(void*)f_8031},
+{"f_7987:library_scm",(void*)f_7987},
+{"f_8008:library_scm",(void*)f_8008},
+{"f_7964:library_scm",(void*)f_7964},
+{"f_7985:library_scm",(void*)f_7985},
+{"f_7941:library_scm",(void*)f_7941},
+{"f_7962:library_scm",(void*)f_7962},
+{"f_7918:library_scm",(void*)f_7918},
+{"f_7939:library_scm",(void*)f_7939},
+{"f_7895:library_scm",(void*)f_7895},
+{"f_7916:library_scm",(void*)f_7916},
+{"f_7872:library_scm",(void*)f_7872},
+{"f_7893:library_scm",(void*)f_7893},
+{"f_7849:library_scm",(void*)f_7849},
+{"f_7870:library_scm",(void*)f_7870},
+{"f_7826:library_scm",(void*)f_7826},
+{"f_7847:library_scm",(void*)f_7847},
+{"f_7820:library_scm",(void*)f_7820},
+{"f_7817:library_scm",(void*)f_7817},
+{"f_7790:library_scm",(void*)f_7790},
+{"f_7805:library_scm",(void*)f_7805},
+{"f_7773:library_scm",(void*)f_7773},
+{"f_7788:library_scm",(void*)f_7788},
+{"f_7770:library_scm",(void*)f_7770},
+{"f_7767:library_scm",(void*)f_7767},
+{"f_7764:library_scm",(void*)f_7764},
+{"f_7761:library_scm",(void*)f_7761},
+{"f_7758:library_scm",(void*)f_7758},
+{"f_7755:library_scm",(void*)f_7755},
+{"f_7752:library_scm",(void*)f_7752},
+{"f_7749:library_scm",(void*)f_7749},
+{"f_7746:library_scm",(void*)f_7746},
+{"f_7743:library_scm",(void*)f_7743},
+{"f_7740:library_scm",(void*)f_7740},
+{"f_7737:library_scm",(void*)f_7737},
+{"f_7734:library_scm",(void*)f_7734},
+{"f_7728:library_scm",(void*)f_7728},
+{"f_7725:library_scm",(void*)f_7725},
+{"f_7722:library_scm",(void*)f_7722},
+{"f_7719:library_scm",(void*)f_7719},
+{"f_7716:library_scm",(void*)f_7716},
+{"f_7677:library_scm",(void*)f_7677},
+{"f_7681:library_scm",(void*)f_7681},
+{"f_7686:library_scm",(void*)f_7686},
+{"f_7671:library_scm",(void*)f_7671},
+{"f_7632:library_scm",(void*)f_7632},
+{"f_7638:library_scm",(void*)f_7638},
+{"f_7661:library_scm",(void*)f_7661},
+{"f_7649:library_scm",(void*)f_7649},
+{"f_7636:library_scm",(void*)f_7636},
+{"f_7616:library_scm",(void*)f_7616},
+{"f_7626:library_scm",(void*)f_7626},
+{"f_7595:library_scm",(void*)f_7595},
+{"f_7601:library_scm",(void*)f_7601},
+{"f_7574:library_scm",(void*)f_7574},
+{"f_7580:library_scm",(void*)f_7580},
+{"f_7550:library_scm",(void*)f_7550},
+{"f_7556:library_scm",(void*)f_7556},
+{"f_7526:library_scm",(void*)f_7526},
+{"f_7532:library_scm",(void*)f_7532},
+{"f_7506:library_scm",(void*)f_7506},
+{"f_7485:library_scm",(void*)f_7485},
+{"f_7491:library_scm",(void*)f_7491},
+{"f_7464:library_scm",(void*)f_7464},
+{"f_7470:library_scm",(void*)f_7470},
+{"f_7440:library_scm",(void*)f_7440},
+{"f_7446:library_scm",(void*)f_7446},
+{"f_7416:library_scm",(void*)f_7416},
+{"f_7422:library_scm",(void*)f_7422},
+{"f_7396:library_scm",(void*)f_7396},
+{"f_7393:library_scm",(void*)f_7393},
+{"f_7390:library_scm",(void*)f_7390},
+{"f_7380:library_scm",(void*)f_7380},
+{"f_7384:library_scm",(void*)f_7384},
+{"f_7329:library_scm",(void*)f_7329},
+{"f_7339:library_scm",(void*)f_7339},
+{"f_7348:library_scm",(void*)f_7348},
+{"f_7317:library_scm",(void*)f_7317},
+{"f_7327:library_scm",(void*)f_7327},
+{"f_7304:library_scm",(void*)f_7304},
+{"f_7252:library_scm",(void*)f_7252},
+{"f_7265:library_scm",(void*)f_7265},
+{"f_7274:library_scm",(void*)f_7274},
+{"f_7200:library_scm",(void*)f_7200},
+{"f_7216:library_scm",(void*)f_7216},
+{"f_7221:library_scm",(void*)f_7221},
+{"f_7170:library_scm",(void*)f_7170},
+{"f_7179:library_scm",(void*)f_7179},
+{"f_7193:library_scm",(void*)f_7193},
+{"f_7134:library_scm",(void*)f_7134},
+{"f_7141:library_scm",(void*)f_7141},
+{"f_7101:library_scm",(void*)f_7101},
+{"f_7105:library_scm",(void*)f_7105},
+{"f_7098:library_scm",(void*)f_7098},
+{"f_7095:library_scm",(void*)f_7095},
+{"f_7092:library_scm",(void*)f_7092},
+{"f_7089:library_scm",(void*)f_7089},
+{"f_7086:library_scm",(void*)f_7086},
+{"f_7083:library_scm",(void*)f_7083},
+{"f_7080:library_scm",(void*)f_7080},
+{"f_7077:library_scm",(void*)f_7077},
+{"f_7074:library_scm",(void*)f_7074},
+{"f_7071:library_scm",(void*)f_7071},
+{"f_7068:library_scm",(void*)f_7068},
+{"f_7029:library_scm",(void*)f_7029},
+{"f_7035:library_scm",(void*)f_7035},
+{"f_6950:library_scm",(void*)f_6950},
+{"f_6962:library_scm",(void*)f_6962},
+{"f_6981:library_scm",(void*)f_6981},
+{"f_7012:library_scm",(void*)f_7012},
+{"f_6933:library_scm",(void*)f_6933},
+{"f_6890:library_scm",(void*)f_6890},
+{"f_6896:library_scm",(void*)f_6896},
+{"f_6923:library_scm",(void*)f_6923},
+{"f_6887:library_scm",(void*)f_6887},
+{"f_6884:library_scm",(void*)f_6884},
+{"f_6881:library_scm",(void*)f_6881},
+{"f_6878:library_scm",(void*)f_6878},
+{"f_6872:library_scm",(void*)f_6872},
+{"f_6854:library_scm",(void*)f_6854},
+{"f_6844:library_scm",(void*)f_6844},
+{"f_6826:library_scm",(void*)f_6826},
+{"f_6820:library_scm",(void*)f_6820},
+{"f_6809:library_scm",(void*)f_6809},
+{"f_6799:library_scm",(void*)f_6799},
+{"f_6781:library_scm",(void*)f_6781},
+{"f_6774:library_scm",(void*)f_6774},
+{"f_6771:library_scm",(void*)f_6771},
+{"f_6760:library_scm",(void*)f_6760},
+{"f_6754:library_scm",(void*)f_6754},
+{"f_6743:library_scm",(void*)f_6743},
+{"f_6733:library_scm",(void*)f_6733},
+{"f_6715:library_scm",(void*)f_6715},
+{"f_6701:library_scm",(void*)f_6701},
+{"f_6687:library_scm",(void*)f_6687},
+{"f_6681:library_scm",(void*)f_6681},
+{"f_6667:library_scm",(void*)f_6667},
+{"f_6660:library_scm",(void*)f_6660},
+{"f_6654:library_scm",(void*)f_6654},
+{"f_6640:library_scm",(void*)f_6640},
+{"f_6630:library_scm",(void*)f_6630},
+{"f_6620:library_scm",(void*)f_6620},
+{"f_6610:library_scm",(void*)f_6610},
+{"f_6607:library_scm",(void*)f_6607},
+{"f_6604:library_scm",(void*)f_6604},
+{"f_6601:library_scm",(void*)f_6601},
+{"f_6598:library_scm",(void*)f_6598},
+{"f_6595:library_scm",(void*)f_6595},
+{"f_6592:library_scm",(void*)f_6592},
+{"f_6589:library_scm",(void*)f_6589},
+{"f_6586:library_scm",(void*)f_6586},
+{"f_6583:library_scm",(void*)f_6583},
+{"f_6580:library_scm",(void*)f_6580},
+{"f_6577:library_scm",(void*)f_6577},
+{"f_6574:library_scm",(void*)f_6574},
+{"f_6571:library_scm",(void*)f_6571},
+{"f_6568:library_scm",(void*)f_6568},
+{"f_6565:library_scm",(void*)f_6565},
+{"f_6552:library_scm",(void*)f_6552},
+{"f_6557:library_scm",(void*)f_6557},
+{"f_6563:library_scm",(void*)f_6563},
+{"f_6532:library_scm",(void*)f_6532},
+{"f_6545:library_scm",(void*)f_6545},
+{"f_6516:library_scm",(void*)f_6516},
+{"f_6503:library_scm",(void*)f_6503},
+{"f_6481:library_scm",(void*)f_6481},
+{"f_6450:library_scm",(void*)f_6450},
+{"f_6431:library_scm",(void*)f_6431},
+{"f_6418:library_scm",(void*)f_6418},
+{"f_6405:library_scm",(void*)f_6405},
+{"f_6392:library_scm",(void*)f_6392},
+{"f_6379:library_scm",(void*)f_6379},
+{"f_6366:library_scm",(void*)f_6366},
+{"f_6353:library_scm",(void*)f_6353},
+{"f_6340:library_scm",(void*)f_6340},
+{"f_6327:library_scm",(void*)f_6327},
+{"f_6314:library_scm",(void*)f_6314},
+{"f_6300:library_scm",(void*)f_6300},
+{"f_6287:library_scm",(void*)f_6287},
+{"f_6284:library_scm",(void*)f_6284},
+{"f_6250:library_scm",(void*)f_6250},
+{"f_6254:library_scm",(void*)f_6254},
+{"f_6257:library_scm",(void*)f_6257},
+{"f_6241:library_scm",(void*)f_6241},
+{"f_6237:library_scm",(void*)f_6237},
+{"f_6234:library_scm",(void*)f_6234},
+{"f_6229:library_scm",(void*)f_6229},
+{"f_6226:library_scm",(void*)f_6226},
+{"f_6223:library_scm",(void*)f_6223},
+{"f_6220:library_scm",(void*)f_6220},
+{"f_6214:library_scm",(void*)f_6214},
+{"f_6210:library_scm",(void*)f_6210},
+{"f_6200:library_scm",(void*)f_6200},
+{"f_6194:library_scm",(void*)f_6194},
+{"f_6186:library_scm",(void*)f_6186},
+{"f_6178:library_scm",(void*)f_6178},
+{"f_6173:library_scm",(void*)f_6173},
+{"f_6170:library_scm",(void*)f_6170},
+{"f_6166:library_scm",(void*)f_6166},
+{"f_6151:library_scm",(void*)f_6151},
+{"f_6142:library_scm",(void*)f_6142},
+{"f_6126:library_scm",(void*)f_6126},
+{"f_6117:library_scm",(void*)f_6117},
+{"f_6121:library_scm",(void*)f_6121},
+{"f_6107:library_scm",(void*)f_6107},
+{"f_6115:library_scm",(void*)f_6115},
+{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
new file mode 100644
index 00000000..b043c4c1
--- /dev/null
+++ b/bootstrap/lolevel.c
@@ -0,0 +1,6044 @@
+/* Generated from lolevel.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:25
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ 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[128];
+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,55,32,108,111,99,52,56,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,54,32,46,32,108,111,99,55,55,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,50,48,48,41};
+static C_char C_TLS li5[] C_aligned={C_lihdr(0,0,29),40,99,104,101,99,107,110,49,32,110,50,48,49,32,110,109,97,120,50,48,50,32,111,102,102,50,48,51,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,56,32,110,109,97,120,50,48,57,32,110,109,97,120,50,50,49,48,32,111,102,102,49,50,49,49,32,111,102,102,50,50,49,50,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,48,32,116,111,50,50,49,41,0,0,0,0};
+static C_char C_TLS li8[] C_aligned={C_lihdr(0,0,36),40,98,111,100,121,49,56,51,32,110,49,57,51,32,102,111,102,102,115,101,116,49,57,52,32,116,111,102,102,115,101,116,49,57,53,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,55,32,37,110,49,56,48,51,50,51,32,37,102,111,102,102,115,101,116,49,56,49,51,50,52,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,54,32,37,110,49,56,48,51,50,54,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,53,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,55,52,32,116,111,49,55,53,32,46,32,116,109,112,49,55,51,49,55,54,41};
+static C_char C_TLS li13[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,51,53,54,32,105,51,54,48,41};
+static C_char C_TLS li14[] C_aligned={C_lihdr(0,0,11),40,99,111,112,121,32,120,51,51,56,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,54,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,53,51,54,56,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,48,51,55,52,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,55,55,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,52,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,49,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,52,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,55,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,48,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,49,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,52,32,112,50,52,49,53,41,0};
+static C_char C_TLS li26[] C_aligned={C_lihdr(0,0,32),40,112,111,105,110,116,101,114,45,111,102,102,115,101,116,32,97,52,49,57,52,50,51,32,97,52,49,56,52,50,52,41};
+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,51,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,54,32,116,97,103,52,52,55,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,52,32,46,32,105,110,100,101,120,52,57,53,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,49,32,46,32,105,110,100,101,120,53,48,50,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,56,32,121,53,48,57,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,49,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,51,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,55,53,50,49,32,97,53,49,54,53,50,50,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,53,53,50,57,32,97,53,50,52,53,51,48,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,51,53,51,55,32,97,53,51,50,53,51,56,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,49,53,52,53,32,97,53,52,48,53,52,54,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,57,53,53,51,32,97,53,52,56,53,53,52,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,55,53,54,49,32,97,53,53,54,53,54,50,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,53,53,54,57,32,97,53,54,52,53,55,48,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,51,53,55,55,32,97,53,55,50,53,55,56,41,0,0,0,0,0,0};
+static C_char C_TLS li44[] C_aligned={C_lihdr(0,0,12),40,97,50,50,54,57,32,120,54,51,53,41,0,0,0,0};
+static C_char C_TLS li45[] C_aligned={C_lihdr(0,0,17),40,97,50,50,56,53,32,120,54,51,56,32,105,54,51,57,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,51,32,100,97,116,97,54,51,52,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,50,32,120,54,53,52,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,52,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,53,32,120,54,55,48,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,56,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,52,32,120,54,55,53,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,56,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,49,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,57,32,46,32,97,114,103,115,54,57,48,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,57,32,46,32,116,109,112,54,57,56,55,48,48,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,57,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,50,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,53,32,105,55,50,54,32,121,55,50,55,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,57,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,53,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,56,41,0,0};
+static C_char C_TLS li62[] C_aligned={C_lihdr(0,0,16),40,102,95,50,54,56,50,32,97,55,53,52,55,53,55,41};
+static C_char C_TLS li63[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,55,56,48,32,105,55,56,52,41};
+static C_char C_TLS li64[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,55,54,48,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,53,48,32,46,32,97,108,108,111,99,97,116,111,114,55,53,49,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,52,48,32,105,56,52,52,41};
+static C_char C_TLS li67[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,56,49,53,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,56,32,112,116,114,55,57,57,32,46,32,108,105,109,105,116,56,48,48,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,53,32,97,56,54,52,56,54,56,41};
+static C_char C_TLS li70[] C_aligned={C_lihdr(0,0,16),40,100,111,108,111,111,112,56,56,49,32,105,56,56,53,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,49,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,54,48,32,46,32,114,101,108,101,97,115,101,114,56,54,49,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,55,32,105,57,49,49,41};
+static C_char C_TLS li74[] C_aligned={C_lihdr(0,0,12),40,101,118,105,99,116,32,120,56,57,53,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,50,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,55,32,105,57,54,49,41};
+static C_char C_TLS li77[] C_aligned={C_lihdr(0,0,11),40,99,111,112,121,32,120,57,51,56,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,57,32,46,32,116,109,112,57,50,56,57,51,48,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,56,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,56,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,53,32,112,114,111,99,57,55,54,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,53,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,56,32,120,57,56,57,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,50,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,53,41,0,0,0};
+static C_char C_TLS li86[] C_aligned={C_lihdr(0,0,17),40,97,51,50,51,52,32,120,55,51,48,32,105,55,51,49,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,53,56,32,97,54,50,53,54,50,57,41,0};
+static C_char C_TLS li88[] C_aligned={C_lihdr(0,0,15),40,97,51,50,54,56,32,97,54,49,56,54,50,50,41,0};
+static C_char C_TLS li89[] C_aligned={C_lihdr(0,0,15),40,97,51,50,55,56,32,97,54,49,49,54,49,53,41,0};
+static C_char C_TLS li90[] C_aligned={C_lihdr(0,0,15),40,97,51,50,56,56,32,97,54,48,52,54,48,56,41,0};
+static C_char C_TLS li91[] C_aligned={C_lihdr(0,0,15),40,97,51,50,57,56,32,97,53,57,56,54,48,50,41,0};
+static C_char C_TLS li92[] C_aligned={C_lihdr(0,0,15),40,97,51,51,48,56,32,97,53,57,50,53,57,54,41,0};
+static C_char C_TLS li93[] C_aligned={C_lihdr(0,0,15),40,97,51,51,49,56,32,97,53,56,54,53,57,48,41,0};
+static C_char C_TLS li94[] C_aligned={C_lihdr(0,0,15),40,97,51,51,50,56,32,97,53,56,48,53,56,52,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 k2938 */
+static C_word C_fcall stub865(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub865(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 k2685 */
+static C_word C_fcall stub755(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub755(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 k3262 */
+#define return(x) C_cblock C_r = (C_flonum(&C_a,(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub626(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub626(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;}
+
+/* from k3272 */
+#define return(x) C_cblock C_r = (C_flonum(&C_a,(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub619(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub619(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;}
+
+/* from k3282 */
+#define return(x) C_cblock C_r = (C_int_to_num(&C_a,(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub612(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub612(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;}
+
+/* from k3292 */
+#define return(x) C_cblock C_r = (C_int_to_num(&C_a,(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub605(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub605(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;}
+
+/* from k3302 */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub599(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub599(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;}
+
+/* from k3312 */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub593(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub593(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;}
+
+/* from k3322 */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub587(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub587(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;}
+
+/* from k3332 */
+#define return(x) C_cblock C_r = (C_fix((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub581(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub581(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;}
+
+/* from k2218 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub574(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub574(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;}
+
+/* from k2204 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub566(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub566(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;}
+
+/* from k2190 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub558(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub558(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;}
+
+/* from k2176 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub550(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub550(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;}
+
+/* from k2162 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub542(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub542(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;}
+
+/* from k2148 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub534(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub534(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;}
+
+/* from k2134 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub526(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub526(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;}
+
+/* from k2120 */
+#define return(x) C_cblock C_r = (((C_word)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub518(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub518(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 k1912 */
+static C_word C_fcall stub429(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub429(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;}
+
+/* from k1902 */
+#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub420(C_word C_buf,C_word C_a0,C_word C_a1) C_regparm;
+C_regparm static C_word C_fcall stub420(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;}
+
+/* from g403 */
+#define return(x) C_cblock C_r = (C_mpointer(&C_a,(void*)(x))); goto C_ret; C_cblockend
+static C_word C_fcall stub406(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub406(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 k1808 */
+static C_word C_fcall stub371(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub371(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 k1801 */
+static C_word C_fcall stub366(C_word C_buf,C_word C_a0) C_regparm;
+C_regparm static C_word C_fcall stub366(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 k1349 */
+static C_word C_fcall stub153(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 stub153(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 k1321 */
+static C_word C_fcall stub137(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 stub137(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 k1293 */
+static C_word C_fcall stub121(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 stub121(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 k1265 */
+static C_word C_fcall stub105(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 stub105(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_2102)
+static void C_ccall f_2102(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_word t2) 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_3319)
+static void C_ccall f_3319(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_3309)
+static void C_ccall f_3309(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_3299)
+static void C_ccall f_3299(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_3289)
+static void C_ccall f_3289(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_3279)
+static void C_ccall f_3279(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_3269)
+static void C_ccall f_3269(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_3259)
+static void C_ccall f_3259(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_2389)
+static void C_ccall f_2389(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_word t2,C_word t3) 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_3242)
+static void C_ccall f_3242(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2528)
+static void C_ccall f_2528(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3222)
+static void C_ccall f_3222(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3213)
+static void C_ccall f_3213(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3204)
+static void C_ccall f_3204(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3198)
+static void C_ccall f_3198(C_word c,C_word t0,C_word t1,C_word t2) 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_noret;
+C_noret_decl(f_3171)
+static void C_ccall f_3171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3174)
+static void C_ccall f_3174(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_3196)
+static void C_ccall f_3196(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_3158)
+static void C_ccall f_3158(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_3162)
+static void C_ccall f_3162(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_word t2,...) C_noret;
+C_noret_decl(f_3029)
+static void C_ccall f_3029r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_3033)
+static void C_ccall f_3033(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3036)
+static void C_ccall f_3036(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3041)
+static void C_fcall f_3041(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3057)
+static void C_ccall f_3057(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_3112)
+static void C_fcall f_3112(C_word t0,C_word t1,C_word t2) 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_3106)
+static void C_ccall f_3106(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3086)
+static void C_ccall f_3086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3089)
+static void C_ccall f_3089(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_2945)
+static void C_ccall f_2945(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2949)
+static void C_ccall f_2949(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2954)
+static void C_fcall f_2954(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2967)
+static void C_ccall f_2967(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3024)
+static void C_ccall f_3024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2973)
+static void C_fcall f_2973(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_2986)
+static void C_fcall f_2986(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2988)
+static void C_fcall f_2988(C_word t0,C_word t1,C_word t2) 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_2979)
+static void C_ccall f_2979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2853)
+static void C_ccall f_2853(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2853)
+static void C_ccall f_2853r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_2862)
+static void C_fcall f_2862(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2907)
+static void C_fcall f_2907(C_word t0,C_word t1,C_word t2) 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(f3735)
+static void C_ccall f3735(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_2898)
+static void C_ccall f_2898(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_word t2) C_noret;
+C_noret_decl(f_2689)
+static void C_ccall f_2689(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_2689)
+static void C_ccall f_2689r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_2693)
+static void C_ccall f_2693(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2696)
+static void C_fcall f_2696(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_2699)
+static void C_ccall f_2699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2702)
+static void C_ccall f_2702(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2710)
+static void C_fcall f_2710(C_word t0,C_word t1,C_word t2) 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_2835)
+static void C_ccall f_2835(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2729)
+static void C_fcall f_2729(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_2827)
+static void C_ccall f_2827(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_noret;
+C_noret_decl(f_2732)
+static void C_ccall f_2732(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2735)
+static void C_fcall f_2735(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_2738)
+static void C_ccall f_2738(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2741)
+static void C_ccall f_2741(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2751)
+static void C_fcall f_2751(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2753)
+static void C_fcall f_2753(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2774)
+static void C_ccall f_2774(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2744)
+static void C_ccall f_2744(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2705)
+static void C_ccall f_2705(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2571)
+static void C_ccall f_2571(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2571)
+static void C_ccall f_2571r(C_word t0,C_word t1,C_word t2,C_word t4) 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_2586)
+static void C_fcall f_2586(C_word t0,C_word t1,C_word t2) 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_2605)
+static void C_ccall f_2605(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_2612)
+static void C_fcall f_2612(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2615)
+static void C_ccall f_2615(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2625)
+static void C_fcall f_2625(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2627)
+static void C_fcall f_2627(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2648)
+static void C_ccall f_2648(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2618)
+static void C_ccall f_2618(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2682)
+static void C_ccall f_2682(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2568)
+static void C_ccall f_2568(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2530)
+static void C_ccall f_2530(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_noret;
+C_noret_decl(f_2540)
+static void C_ccall f_2540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2545)
+static C_word C_fcall f_2545(C_word t0,C_word t1);
+C_noret_decl(f_2502)
+static void C_ccall f_2502(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_2489)
+static void C_ccall f_2489(C_word c,C_word t0,C_word t1,C_word t2) 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_2480)
+static void C_ccall f_2480(C_word c,C_word t0,C_word t1,C_word t2) 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_2431)
+static void C_ccall f_2431(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2431)
+static void C_ccall f_2431r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_2435)
+static void C_ccall f_2435(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2446)
+static void C_fcall f_2446(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_word t2,...) C_noret;
+C_noret_decl(f_2422)
+static void C_ccall f_2422r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_2400)
+static void C_ccall f_2400(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2391)
+static void C_ccall f_2391(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_2395)
+static void C_ccall f_2395(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_word t2,C_word t3) 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_2332)
+static void C_ccall f_2332(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2346)
+static void C_ccall f_2346(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2363)
+static void C_ccall f_2363(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_word t2) C_noret;
+C_noret_decl(f_2313)
+static void C_ccall f_2313(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2330)
+static void C_ccall f_2330(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_word t2,C_word t3) 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_2286)
+static void C_ccall f_2286(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2270)
+static void C_ccall f_2270(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2211)
+static void C_ccall f_2211(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2197)
+static void C_ccall f_2197(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_word t3) C_noret;
+C_noret_decl(f_2169)
+static void C_ccall f_2169(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2155)
+static void C_ccall f_2155(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2141)
+static void C_ccall f_2141(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2127)
+static void C_ccall f_2127(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2113)
+static void C_ccall f_2113(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2107)
+static void C_ccall f_2107(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2104)
+static void C_ccall f_2104(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2097)
+static void C_ccall f_2097(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_2068)
+static void C_ccall f_2068(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2068)
+static void C_ccall f_2068r(C_word t0,C_word t1,C_word t2,C_word t4) 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_2039)
+static void C_ccall f_2039(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_2039)
+static void C_ccall f_2039r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_2047)
+static void C_ccall f_2047(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_2016)
+static void C_ccall f_2016(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_2028)
+static void C_fcall f_2028(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1972)
+static void C_ccall f_1972(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_1972)
+static void C_ccall f_1972r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_1976)
+static void C_ccall f_1976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1952)
+static void C_ccall f_1952(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1956)
+static void C_ccall f_1956(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1967)
+static void C_fcall f_1967(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1959)
+static void C_ccall f_1959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1915)
+static void C_ccall f_1915(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1936)
+static void C_fcall f_1936(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_noret;
+C_noret_decl(f_1895)
+static void C_ccall f_1895(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1886)
+static void C_ccall f_1886(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_1880)
+static void C_ccall f_1880(C_word c,C_word t0,C_word t1,C_word t2) 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_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_1856)
+static void C_ccall f_1856(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1860)
+static void C_ccall f_1860(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1867)
+static void C_ccall f_1867(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_word t2) C_noret;
+C_noret_decl(f_1850)
+static void C_ccall f_1850(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_word t2) C_noret;
+C_noret_decl(f_1841)
+static void C_ccall f_1841(C_word c,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_word t2) C_noret;
+C_noret_decl(f_1815)
+static void C_ccall f_1815(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1805)
+static void C_ccall f_1805(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1798)
+static void C_ccall f_1798(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1717)
+static void C_ccall f_1717(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1723)
+static void C_fcall f_1723(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1753)
+static void C_ccall f_1753(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1768)
+static void C_fcall f_1768(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1789)
+static void C_ccall f_1789(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1756)
+static void C_ccall f_1756(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_word t2,C_word t3,...) C_noret;
+C_noret_decl(f_1363)
+static void C_ccall f_1363r(C_word t0,C_word t1,C_word t2,C_word t3,C_word t5) C_noret;
+C_noret_decl(f_1654)
+static void C_fcall f_1654(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1649)
+static void C_fcall f_1649(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1644)
+static void C_fcall f_1644(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_1365)
+static void C_fcall f_1365(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_1431)
+static void C_fcall f_1431(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_1571)
+static void C_ccall f_1571(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1596)
+static void C_fcall f_1596(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1613)
+static void C_ccall f_1613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1623)
+static void C_ccall f_1623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1603)
+static void C_ccall f_1603(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1522)
+static void C_fcall f_1522(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_1552)
+static void C_ccall f_1552(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1548)
+static void C_ccall f_1548(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1529)
+static void C_ccall f_1529(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1396)
+static void C_fcall f_1396(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_1403)
+static void C_fcall f_1403(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_1380)
+static void C_fcall f_1380(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_1374)
+static void C_fcall f_1374(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_1368)
+static void C_fcall f_1368(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_1231)
+static void C_fcall f_1231(C_word t0,C_word t1) 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_3041)
+static void C_fcall trf_3041(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3041(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3041(t0,t1,t2);}
+
+C_noret_decl(trf_3112)
+static void C_fcall trf_3112(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3112(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3112(t0,t1,t2);}
+
+C_noret_decl(trf_2954)
+static void C_fcall trf_2954(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2954(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2954(t0,t1,t2);}
+
+C_noret_decl(trf_2973)
+static void C_fcall trf_2973(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2973(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2973(t0,t1);}
+
+C_noret_decl(trf_2986)
+static void C_fcall trf_2986(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2986(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2986(t0,t1);}
+
+C_noret_decl(trf_2988)
+static void C_fcall trf_2988(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2988(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2988(t0,t1,t2);}
+
+C_noret_decl(trf_2862)
+static void C_fcall trf_2862(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2862(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2862(t0,t1,t2);}
+
+C_noret_decl(trf_2907)
+static void C_fcall trf_2907(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2907(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2907(t0,t1,t2);}
+
+C_noret_decl(trf_2696)
+static void C_fcall trf_2696(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2696(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2696(t0,t1);}
+
+C_noret_decl(trf_2710)
+static void C_fcall trf_2710(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2710(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2710(t0,t1,t2);}
+
+C_noret_decl(trf_2729)
+static void C_fcall trf_2729(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2729(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2729(t0,t1);}
+
+C_noret_decl(trf_2735)
+static void C_fcall trf_2735(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2735(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2735(t0,t1);}
+
+C_noret_decl(trf_2751)
+static void C_fcall trf_2751(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2751(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2751(t0,t1);}
+
+C_noret_decl(trf_2753)
+static void C_fcall trf_2753(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2753(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2753(t0,t1,t2);}
+
+C_noret_decl(trf_2586)
+static void C_fcall trf_2586(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2586(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2586(t0,t1,t2);}
+
+C_noret_decl(trf_2612)
+static void C_fcall trf_2612(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2612(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2612(t0,t1);}
+
+C_noret_decl(trf_2625)
+static void C_fcall trf_2625(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2625(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2625(t0,t1);}
+
+C_noret_decl(trf_2627)
+static void C_fcall trf_2627(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2627(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_2627(t0,t1,t2);}
+
+C_noret_decl(trf_2446)
+static void C_fcall trf_2446(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2446(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2446(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_2028)
+static void C_fcall trf_2028(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_2028(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_2028(t0,t1);}
+
+C_noret_decl(trf_1967)
+static void C_fcall trf_1967(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1967(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1967(t0,t1);}
+
+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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1936(t0,t1);}
+
+C_noret_decl(trf_1723)
+static void C_fcall trf_1723(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1723(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1723(t0,t1,t2);}
+
+C_noret_decl(trf_1768)
+static void C_fcall trf_1768(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1768(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1768(t0,t1,t2);}
+
+C_noret_decl(trf_1654)
+static void C_fcall trf_1654(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1654(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1654(t0,t1);}
+
+C_noret_decl(trf_1649)
+static void C_fcall trf_1649(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1649(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1649(t0,t1,t2);}
+
+C_noret_decl(trf_1644)
+static void C_fcall trf_1644(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1644(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_1644(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 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_1365(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1431)
+static void C_fcall trf_1431(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1431(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_1431(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_1596)
+static void C_fcall trf_1596(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1596(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1596(t0,t1);}
+
+C_noret_decl(trf_1522)
+static void C_fcall trf_1522(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1522(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1522(t0,t1);}
+
+C_noret_decl(trf_1396)
+static void C_fcall trf_1396(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1396(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_1396(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_1403)
+static void C_fcall trf_1403(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1403(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1403(t0,t1);}
+
+C_noret_decl(trf_1380)
+static void C_fcall trf_1380(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1380(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_1380(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_1374)
+static void C_fcall trf_1374(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1374(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_1374(t0,t1,t2);}
+
+C_noret_decl(trf_1368)
+static void C_fcall trf_1368(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1368(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1368(t0,t1);}
+
+C_noret_decl(trf_1231)
+static void C_fcall trf_1231(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_1231(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_1231(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);}
+
+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_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(1237)){
+C_save(t1);
+C_rereclaim2(1237*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,128);
+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_h_intern(&lf[16],11,"object-copy");
+lf[17]=C_h_intern(&lf[17],15,"\003sysmake-vector");
+lf[18]=C_h_intern(&lf[18],8,"allocate");
+lf[19]=C_h_intern(&lf[19],4,"free");
+lf[20]=C_h_intern(&lf[20],8,"pointer\077");
+lf[21]=C_h_intern(&lf[21],13,"pointer-like\077");
+lf[22]=C_h_intern(&lf[22],16,"address->pointer");
+lf[23]=C_h_intern(&lf[23],20,"\003sysaddress->pointer");
+lf[24]=C_h_intern(&lf[24],17,"\003syscheck-integer");
+lf[25]=C_h_intern(&lf[25],16,"pointer->address");
+lf[26]=C_h_intern(&lf[26],20,"\003syspointer->address");
+lf[27]=C_h_intern(&lf[27],17,"\003syscheck-special");
+lf[28]=C_h_intern(&lf[28],12,"null-pointer");
+lf[29]=C_h_intern(&lf[29],16,"\003sysnull-pointer");
+lf[30]=C_h_intern(&lf[30],13,"null-pointer\077");
+lf[31]=C_h_intern(&lf[31],15,"object->pointer");
+lf[32]=C_h_intern(&lf[32],15,"pointer->object");
+lf[33]=C_h_intern(&lf[33],9,"pointer=\077");
+lf[34]=C_h_intern(&lf[34],14,"pointer-offset");
+lf[35]=C_h_intern(&lf[35],13,"align-to-word");
+lf[36]=C_decode_literal(C_heaptop,"\376B\000\000,bad argument type - not a pointer or integer");
+lf[37]=C_h_intern(&lf[37],11,"tag-pointer");
+lf[38]=C_h_intern(&lf[38],23,"\003sysmake-tagged-pointer");
+lf[39]=C_h_intern(&lf[39],15,"tagged-pointer\077");
+lf[40]=C_h_intern(&lf[40],11,"pointer-tag");
+lf[41]=C_h_intern(&lf[41],13,"make-locative");
+lf[42]=C_h_intern(&lf[42],17,"\003sysmake-locative");
+lf[43]=C_h_intern(&lf[43],18,"make-weak-locative");
+lf[44]=C_h_intern(&lf[44],13,"locative-set!");
+lf[45]=C_h_intern(&lf[45],12,"locative-ref");
+lf[46]=C_h_intern(&lf[46],16,"locative->object");
+lf[47]=C_h_intern(&lf[47],9,"locative\077");
+lf[48]=C_h_intern(&lf[48],15,"pointer-u8-set!");
+lf[49]=C_h_intern(&lf[49],15,"pointer-s8-set!");
+lf[50]=C_h_intern(&lf[50],16,"pointer-u16-set!");
+lf[51]=C_h_intern(&lf[51],16,"pointer-s16-set!");
+lf[52]=C_h_intern(&lf[52],16,"pointer-u32-set!");
+lf[53]=C_h_intern(&lf[53],16,"pointer-s32-set!");
+lf[54]=C_h_intern(&lf[54],16,"pointer-f32-set!");
+lf[55]=C_h_intern(&lf[55],16,"pointer-f64-set!");
+lf[56]=C_h_intern(&lf[56],14,"pointer-u8-ref");
+lf[57]=C_h_intern(&lf[57],14,"pointer-s8-ref");
+lf[58]=C_h_intern(&lf[58],15,"pointer-u16-ref");
+lf[59]=C_h_intern(&lf[59],15,"pointer-s16-ref");
+lf[60]=C_h_intern(&lf[60],15,"pointer-u32-ref");
+lf[61]=C_h_intern(&lf[61],15,"pointer-s32-ref");
+lf[62]=C_h_intern(&lf[62],15,"pointer-f32-ref");
+lf[63]=C_h_intern(&lf[63],15,"pointer-f64-ref");
+lf[64]=C_h_intern(&lf[64],8,"extended");
+lf[66]=C_h_intern(&lf[66],16,"extend-procedure");
+lf[67]=C_h_intern(&lf[67],19,"\003sysdecorate-lambda");
+lf[68]=C_h_intern(&lf[68],17,"\003syscheck-closure");
+lf[69]=C_h_intern(&lf[69],19,"extended-procedure\077");
+lf[70]=C_h_intern(&lf[70],21,"\003syslambda-decoration");
+lf[71]=C_h_intern(&lf[71],14,"procedure-data");
+lf[72]=C_h_intern(&lf[72],19,"set-procedure-data!");
+lf[73]=C_decode_literal(C_heaptop,"\376B\000\000-bad argument type - not an extended procedure");
+lf[74]=C_h_intern(&lf[74],10,"block-set!");
+lf[75]=C_h_intern(&lf[75],14,"\003sysblock-set!");
+lf[76]=C_h_intern(&lf[76],9,"block-ref");
+lf[77]=C_h_intern(&lf[77],15,"number-of-slots");
+lf[78]=C_decode_literal(C_heaptop,"\376B\000\000,bad argument type - not a vector-like object");
+lf[79]=C_h_intern(&lf[79],15,"number-of-bytes");
+lf[80]=C_decode_literal(C_heaptop,"\376B\000\0002cannot compute number of bytes of immediate object");
+lf[81]=C_h_intern(&lf[81],20,"make-record-instance");
+lf[82]=C_h_intern(&lf[82],18,"\003sysmake-structure");
+lf[83]=C_h_intern(&lf[83],16,"record-instance\077");
+lf[84]=C_h_intern(&lf[84],20,"record-instance-type");
+lf[85]=C_h_intern(&lf[85],22,"record-instance-length");
+lf[86]=C_h_intern(&lf[86],25,"record-instance-slot-set!");
+lf[87]=C_h_intern(&lf[87],15,"\003syscheck-range");
+lf[88]=C_h_intern(&lf[88],20,"record-instance-slot");
+lf[89]=C_h_intern(&lf[89],14,"record->vector");
+lf[90]=C_h_intern(&lf[90],15,"object-evicted\077");
+lf[91]=C_h_intern(&lf[91],12,"object-evict");
+lf[92]=C_h_intern(&lf[92],15,"hash-table-set!");
+lf[93]=C_h_intern(&lf[93],19,"\003sysundefined-value");
+lf[94]=C_h_intern(&lf[94],22,"hash-table-ref/default");
+lf[95]=C_h_intern(&lf[95],15,"make-hash-table");
+lf[96]=C_h_intern(&lf[96],3,"eq\077");
+lf[97]=C_h_intern(&lf[97],24,"object-evict-to-location");
+lf[98]=C_h_intern(&lf[98],24,"\003sysset-pointer-address!");
+lf[99]=C_h_intern(&lf[99],6,"signal");
+lf[100]=C_h_intern(&lf[100],24,"make-composite-condition");
+lf[101]=C_h_intern(&lf[101],23,"make-property-condition");
+lf[102]=C_h_intern(&lf[102],5,"evict");
+lf[103]=C_h_intern(&lf[103],5,"limit");
+lf[104]=C_h_intern(&lf[104],3,"exn");
+lf[105]=C_h_intern(&lf[105],8,"location");
+lf[106]=C_h_intern(&lf[106],7,"message");
+lf[107]=C_decode_literal(C_heaptop,"\376B\000\000$cannot evict object - limit exceeded");
+lf[108]=C_h_intern(&lf[108],9,"arguments");
+lf[109]=C_h_intern(&lf[109],14,"object-release");
+lf[110]=C_h_intern(&lf[110],11,"object-size");
+lf[111]=C_h_intern(&lf[111],14,"object-unevict");
+lf[112]=C_h_intern(&lf[112],15,"\003sysmake-string");
+lf[113]=C_h_intern(&lf[113],14,"object-become!");
+lf[114]=C_h_intern(&lf[114],11,"\003sysbecome!");
+lf[115]=C_decode_literal(C_heaptop,"\376B\000\000:bad argument type - not an a-list of non-immediate objects");
+lf[116]=C_h_intern(&lf[116],16,"mutate-procedure");
+lf[117]=C_h_intern(&lf[117],10,"global-ref");
+lf[118]=C_h_intern(&lf[118],11,"global-set!");
+lf[119]=C_h_intern(&lf[119],13,"global-bound\077");
+lf[120]=C_h_intern(&lf[120],32,"\003syssymbol-has-toplevel-binding\077");
+lf[121]=C_h_intern(&lf[121],20,"global-make-unbound!");
+lf[122]=C_h_intern(&lf[122],28,"\003sysarbitrary-unbound-symbol");
+lf[123]=C_h_intern(&lf[123],18,"getter-with-setter");
+lf[124]=C_h_intern(&lf[124],13,"\003sysblock-ref");
+lf[125]=C_h_intern(&lf[125],15,"pointer-s6-set!");
+lf[126]=C_h_intern(&lf[126],17,"register-feature!");
+lf[127]=C_h_intern(&lf[127],7,"lolevel");
+C_register_lf2(lf,128,create_ptable());
+t2=C_mutate(&lf[0] /* (set! c334 ...) */,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[126]+1)))(3,*((C_word*)lf[126]+1),t2,lf[127]);}
+
+/* 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 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_1363,a[2]=t5,a[3]=((C_word)li12),tmp=(C_word)a,a+=4,tmp));
+t7=C_mutate((C_word*)lf[16]+1 /* (set! object-copy ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1717,a[2]=((C_word)li15),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[18]+1 /* (set! allocate ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1798,a[2]=((C_word)li16),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[19]+1 /* (set! free ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1805,a[2]=((C_word)li17),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[20]+1 /* (set! pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1815,a[2]=((C_word)li18),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[21]+1 /* (set! pointer-like? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1826,a[2]=((C_word)li19),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[22]+1 /* (set! address->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1837,a[2]=((C_word)li20),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[25]+1 /* (set! pointer->address ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1846,a[2]=((C_word)li21),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[28]+1 /* (set! null-pointer ...) */,*((C_word*)lf[29]+1));
+t15=C_mutate((C_word*)lf[30]+1 /* (set! null-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1856,a[2]=((C_word)li22),tmp=(C_word)a,a+=3,tmp));
+t16=C_mutate((C_word*)lf[31]+1 /* (set! object->pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1869,a[2]=((C_word)li23),tmp=(C_word)a,a+=3,tmp));
+t17=C_mutate((C_word*)lf[32]+1 /* (set! pointer->object ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1880,a[2]=((C_word)li24),tmp=(C_word)a,a+=3,tmp));
+t18=C_mutate((C_word*)lf[33]+1 /* (set! pointer=? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1886,a[2]=((C_word)li25),tmp=(C_word)a,a+=3,tmp));
+t19=C_mutate((C_word*)lf[34]+1 /* (set! pointer-offset ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1895,a[2]=((C_word)li26),tmp=(C_word)a,a+=3,tmp));
+t20=C_mutate((C_word*)lf[35]+1 /* (set! align-to-word ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1915,a[2]=((C_word)li27),tmp=(C_word)a,a+=3,tmp));
+t21=C_mutate((C_word*)lf[37]+1 /* (set! tag-pointer ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1952,a[2]=((C_word)li28),tmp=(C_word)a,a+=3,tmp));
+t22=C_mutate((C_word*)lf[39]+1 /* (set! tagged-pointer? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1972,a[2]=((C_word)li29),tmp=(C_word)a,a+=3,tmp));
+t23=C_mutate((C_word*)lf[40]+1 /* (set! pointer-tag ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2016,a[2]=((C_word)li30),tmp=(C_word)a,a+=3,tmp));
+t24=C_mutate((C_word*)lf[41]+1 /* (set! make-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2039,a[2]=((C_word)li31),tmp=(C_word)a,a+=3,tmp));
+t25=C_mutate((C_word*)lf[43]+1 /* (set! make-weak-locative ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2068,a[2]=((C_word)li32),tmp=(C_word)a,a+=3,tmp));
+t26=C_mutate((C_word*)lf[44]+1 /* (set! locative-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2097,a[2]=((C_word)li33),tmp=(C_word)a,a+=3,tmp));
+t27=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2102,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t28=(*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: 345 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t27,t28,*((C_word*)lf[44]+1));}
+
+/* k2100 in k1081 in k1078 */
+static void C_ccall f_2102(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_2102,2,t0,t1);}
+t2=C_mutate((C_word*)lf[45]+1 /* (set! locative-ref ...) */,t1);
+t3=C_mutate((C_word*)lf[46]+1 /* (set! locative->object ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2104,a[2]=((C_word)li34),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[47]+1 /* (set! locative? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2107,a[2]=((C_word)li35),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[48]+1 /* (set! pointer-u8-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2113,a[2]=((C_word)li36),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[49]+1 /* (set! pointer-s8-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2127,a[2]=((C_word)li37),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[50]+1 /* (set! pointer-u16-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2141,a[2]=((C_word)li38),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[51]+1 /* (set! pointer-s16-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2155,a[2]=((C_word)li39),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[52]+1 /* (set! pointer-u32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2169,a[2]=((C_word)li40),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[53]+1 /* (set! pointer-s32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2183,a[2]=((C_word)li41),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[54]+1 /* (set! pointer-f32-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2197,a[2]=((C_word)li42),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[55]+1 /* (set! pointer-f64-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2211,a[2]=((C_word)li43),tmp=(C_word)a,a+=3,tmp));
+t13=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2227,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t14=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3329,a[2]=((C_word)li94),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 362 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t13,t14,*((C_word*)lf[48]+1));}
+
+/* a3328 in k2100 in k1081 in k1078 */
+static void C_ccall f_3329(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_3329,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub581(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub581(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* k2225 in k2100 in k1081 in k1078 */
+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 ab[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2227,2,t0,t1);}
+t2=C_mutate((C_word*)lf[56]+1 /* (set! pointer-u8-ref ...) */,t1);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2231,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3319,a[2]=((C_word)li93),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 367 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[49]+1));}
+
+/* a3318 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3319(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_3319,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub587(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub587(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* k2229 in k2225 in k2100 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[57]+1 /* (set! pointer-s8-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_3309,a[2]=((C_word)li92),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 372 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[50]+1));}
+
+/* a3308 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3309(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_3309,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub593(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub593(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* k2233 in k2229 in k2225 in k2100 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[58]+1 /* (set! pointer-u16-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_3299,a[2]=((C_word)li91),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 377 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[125]+1));}
+
+/* a3298 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3299(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_3299,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub599(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub599(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* k2237 in k2233 in k2229 in k2225 in k2100 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[59]+1 /* (set! pointer-s16-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_3289,a[2]=((C_word)li90),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 382 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[52]+1));}
+
+/* a3288 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3289(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_3289,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub605(t3,t4));}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub605(t3,C_SCHEME_FALSE));}}
+
+/* k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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[60]+1 /* (set! pointer-u32-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_3279,a[2]=((C_word)li89),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 387 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[53]+1));}
+
+/* a3278 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3279(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_3279,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub612(t3,t4));}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub612(t3,C_SCHEME_FALSE));}}
+
+/* k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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[61]+1 /* (set! pointer-s32-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_3269,a[2]=((C_word)li88),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 392 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[54]+1));}
+
+/* a3268 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3269(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_3269,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub619(t3,t4));}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub619(t3,C_SCHEME_FALSE));}}
+
+/* k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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[62]+1 /* (set! pointer-f32-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_3259,a[2]=((C_word)li87),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 397 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t3,t4,*((C_word*)lf[55]+1));}
+
+/* a3258 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3259(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_3259,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub626(t3,t4));}
+else{
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub626(t3,C_SCHEME_FALSE));}}
+
+/* k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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 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_2255,2,t0,t1);}
+t2=C_mutate((C_word*)lf[63]+1 /* (set! pointer-f64-ref ...) */,t1);
+t3=(C_word)C_a_i_vector(&a,1,lf[64]);
+t4=C_mutate(&lf[65] /* (set! xproc-tag ...) */,t3);
+t5=C_mutate((C_word*)lf[66]+1 /* (set! extend-procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2261,a[2]=((C_word)li46),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[69]+1 /* (set! extended-procedure? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2296,a[2]=((C_word)li48),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[71]+1 /* (set! procedure-data ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2332,a[2]=((C_word)li50),tmp=(C_word)a,a+=3,tmp));
+t8=*((C_word*)lf[66]+1);
+t9=C_mutate((C_word*)lf[72]+1 /* (set! set-procedure-data! ...) */,(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2371,a[2]=t8,a[3]=((C_word)li51),tmp=(C_word)a,a+=4,tmp));
+t10=C_mutate((C_word*)lf[74]+1 /* (set! block-set! ...) */,*((C_word*)lf[75]+1));
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2389,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 441 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t11,*((C_word*)lf[124]+1),*((C_word*)lf[75]+1));}
+
+/* k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_2389,2,t0,t1);}
+t2=C_mutate((C_word*)lf[76]+1 /* (set! block-ref ...) */,t1);
+t3=C_mutate((C_word*)lf[77]+1 /* (set! number-of-slots ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2391,a[2]=((C_word)li52),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[79]+1 /* (set! number-of-bytes ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2400,a[2]=((C_word)li53),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[81]+1 /* (set! make-record-instance ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2422,a[2]=((C_word)li54),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[83]+1 /* (set! record-instance? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2431,a[2]=((C_word)li55),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[84]+1 /* (set! record-instance-type ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2480,a[2]=((C_word)li56),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[85]+1 /* (set! record-instance-length ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2489,a[2]=((C_word)li57),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[86]+1 /* (set! record-instance-slot-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2502,a[2]=((C_word)li58),tmp=(C_word)a,a+=3,tmp));
+t10=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2528,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t11=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3235,a[2]=((C_word)li86),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 488 getter-with-setter */
+((C_proc4)C_retrieve_proc(*((C_word*)lf[123]+1)))(4,*((C_word*)lf[123]+1),t10,t11,*((C_word*)lf[86]+1));}
+
+/* a3234 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3235(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_3235,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3239,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 490 ##sys#check-generic-structure */
+f_1158(t4,t2,(C_word)C_a_i_list(&a,1,lf[88]));}
+
+/* k3237 in a3234 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_3239,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3242,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_block_size(((C_word*)t0)[2]);
+t4=(C_word)C_fixnum_difference(t3,C_fix(1));
+/* lolevel.scm: 491 ##sys#check-range */
+((C_proc6)C_retrieve_proc(*((C_word*)lf[87]+1)))(6,*((C_word*)lf[87]+1),t2,((C_word*)t0)[4],C_fix(0),t4,lf[88]);}
+
+/* k3240 in k3237 in a3234 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3242(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_plus(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_slot(((C_word*)t0)[2],t2));}
+
+/* k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2528(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_2528,2,t0,t1);}
+t2=C_mutate((C_word*)lf[88]+1 /* (set! record-instance-slot ...) */,t1);
+t3=C_mutate((C_word*)lf[89]+1 /* (set! record->vector ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2530,a[2]=((C_word)li60),tmp=(C_word)a,a+=3,tmp));
+t4=C_mutate((C_word*)lf[90]+1 /* (set! object-evicted? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2568,a[2]=((C_word)li61),tmp=(C_word)a,a+=3,tmp));
+t5=C_mutate((C_word*)lf[91]+1 /* (set! object-evict ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2571,a[2]=((C_word)li65),tmp=(C_word)a,a+=3,tmp));
+t6=C_mutate((C_word*)lf[97]+1 /* (set! object-evict-to-location ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2689,a[2]=((C_word)li68),tmp=(C_word)a,a+=3,tmp));
+t7=C_mutate((C_word*)lf[109]+1 /* (set! object-release ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2853,a[2]=((C_word)li72),tmp=(C_word)a,a+=3,tmp));
+t8=C_mutate((C_word*)lf[110]+1 /* (set! object-size ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2945,a[2]=((C_word)li75),tmp=(C_word)a,a+=3,tmp));
+t9=C_mutate((C_word*)lf[111]+1 /* (set! object-unevict ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3029,a[2]=((C_word)li78),tmp=(C_word)a,a+=3,tmp));
+t10=C_mutate((C_word*)lf[113]+1 /* (set! object-become! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3158,a[2]=((C_word)li80),tmp=(C_word)a,a+=3,tmp));
+t11=C_mutate((C_word*)lf[116]+1 /* (set! mutate-procedure ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3167,a[2]=((C_word)li81),tmp=(C_word)a,a+=3,tmp));
+t12=C_mutate((C_word*)lf[117]+1 /* (set! global-ref ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3198,a[2]=((C_word)li82),tmp=(C_word)a,a+=3,tmp));
+t13=C_mutate((C_word*)lf[118]+1 /* (set! global-set! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3204,a[2]=((C_word)li83),tmp=(C_word)a,a+=3,tmp));
+t14=C_mutate((C_word*)lf[119]+1 /* (set! global-bound? ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3213,a[2]=((C_word)li84),tmp=(C_word)a,a+=3,tmp));
+t15=C_mutate((C_word*)lf[121]+1 /* (set! global-make-unbound! ...) */,(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3222,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 k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3222(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_3222,3,t0,t1,t2);}
+t3=(C_word)C_i_check_symbol_2(t2,lf[121]);
+t4=(C_word)C_slot(lf[122],C_fix(0));
+t5=(C_word)C_i_setslot(t2,C_fix(0),t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
+
+/* global-bound? in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3213(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_3213,3,t0,t1,t2);}
+t3=(C_word)C_i_check_symbol_2(t2,lf[119]);
+/* lolevel.scm: 659 ##sys#symbol-has-toplevel-binding? */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[120]+1)))(3,*((C_word*)lf[120]+1),t1,t2);}
+
+/* global-set! in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3204(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_3204,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_check_symbol_2(t2,lf[118]);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)C_i_setslot(t2,C_fix(0),t3));}
+
+/* global-ref in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3198(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_3198,3,t0,t1,t2);}
+t3=(C_word)C_i_check_symbol_2(t2,lf[117]);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_retrieve(t2));}
+
+/* mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3167(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_3167,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3171,a[2]=t3,a[3]=t1,a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 638 ##sys#check-closure */
+t5=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[116]);}
+
+/* k3169 in mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3171(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_3171,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3174,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: 639 ##sys#check-closure */
+t3=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[116]);}
+
+/* k3172 in k3169 in mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3174(C_word c,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_3174,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[4]);
+t3=(C_word)C_words(t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3181,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: 642 ##sys#make-vector */
+t5=*((C_word*)lf[17]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k3179 in k3172 in k3169 in mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_3181,2,t0,t1);}
+t2=(C_word)C_copy_block(((C_word*)t0)[4],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3184,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_3196,a[2]=t3,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 643 proc */
+t5=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t5))(3,t5,t4,t2);}
+
+/* k3194 in k3179 in k3172 in k3169 in mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word ab[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3196,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[3],t1);
+t3=(C_word)C_a_i_list(&a,1,t2);
+/* lolevel.scm: 643 ##sys#become! */
+t4=*((C_word*)lf[114]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,((C_word*)t0)[2],t3);}
+
+/* k3182 in k3179 in k3172 in k3169 in mutate-procedure in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3184(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 k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3158(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_3158,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3162,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+t5=(C_word)C_i_check_list_2(t4,lf[113]);
+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 k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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_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_pairp(t2))){
+t4=(C_word)C_i_car(t2);
+t5=(C_word)C_i_check_pair_2(t4,lf[113]);
+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_word)C_i_car(t4);
+/* lolevel.scm: 116 ##sys#check-block */
+f_1085(t6,t7,(C_word)C_a_i_list(&a,1,lf[113]));}
+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[113],lf[115],((C_word*)t0)[2]);}}}
+
+/* k1133 in loop in object-become! in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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_word)C_i_cdr(((C_word*)t0)[2]);
+/* lolevel.scm: 117 ##sys#check-block */
+f_1085(t2,t3,(C_word)C_a_i_list(&a,1,lf[113]));}
+
+/* k1136 in k1133 in loop in object-become! in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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_word)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);}
+
+/* k3160 in object-become! in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3162(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 635 ##sys#become! */
+t2=*((C_word*)lf[114]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3029(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_3029r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_3029r(t0,t1,t2,t3);}}
+
+static void C_ccall f_3029r(C_word 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_3033,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_3033(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_3033(2,t6,(C_word)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);}}}
+
+/* k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3033(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_3033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3036,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 606 make-hash-table */
+t3=*((C_word*)lf[95]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[96]+1));}
+
+/* k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3036(C_word c,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_3036,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_3041,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_3041(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_3041(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_3041,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_permanentp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3057,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: 610 hash-table-ref/default */
+t4=*((C_word*)lf[94]+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);}}
+
+/* k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3057(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_3057,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_word)C_byteblockp(((C_word*)t0)[5]))){
+if(C_truep(((C_word*)t0)[4])){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3070,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_word)C_block_size(((C_word*)t0)[5]);
+/* lolevel.scm: 613 ##sys#make-string */
+t4=*((C_word*)lf[112]+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_word)C_i_symbolp(((C_word*)t0)[5]))){
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_3086,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_word)C_slot(((C_word*)t0)[5],C_fix(1));
+/* lolevel.scm: 618 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t2,t3);}
+else{
+t2=(C_word)C_block_size(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3100,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: 623 ##sys#make-vector */
+t4=*((C_word*)lf[17]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}}}}
+
+/* k3098 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3100,2,t0,t1);}
+t2=(C_word)C_copy_block(((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_3103,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: 624 hash-table-set! */
+t4=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],((C_word*)t0)[6],t2);}
+
+/* k3101 in k3098 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_3103,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3106,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+t3=(C_truep((C_word)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_3112,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_3112(t7,t2,t3);}
+
+/* doloop957 in k3101 in k3098 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_3112(C_word 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_3112,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_3133,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_word)C_slot(((C_word*)t0)[4],t2);
+/* lolevel.scm: 627 copy */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_3041(t5,t3,t4);}}
+
+/* k3131 in doloop957 in k3101 in k3098 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word *a;
+t2=(C_word)C_i_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_3112(t4,((C_word*)t0)[2],t3);}
+
+/* k3104 in k3101 in k3098 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3106(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]);}
+
+/* k3084 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3086(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_3086,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3089,a[2]=((C_word*)t0)[4],a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 619 hash-table-set! */
+t3=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k3087 in k3084 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3089(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);}
+
+/* k3068 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word ab[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3070,2,t0,t1);}
+t2=(C_word)C_copy_block(((C_word*)t0)[4],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_3073,a[2]=t2,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 614 hash-table-set! */
+t4=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,t3,((C_word*)t0)[2],((C_word*)t0)[4],t2);}
+
+/* k3071 in k3068 in k3055 in copy in k3034 in k3031 in object-unevict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3073(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 k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2945(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_2945,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2949,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 589 make-hash-table */
+t4=*((C_word*)lf[95]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,*((C_word*)lf[96]+1));}
+
+/* k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2949(C_word c,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_2949,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_2954,a[2]=t1,a[3]=t3,a[4]=((C_word)li74),tmp=(C_word)a,a+=5,tmp));
+t5=((C_word*)t3)[1];
+f_2954(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2954(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_2954,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2967,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: 592 hash-table-ref/default */
+t4=*((C_word*)lf[94]+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));}}
+
+/* k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2967(C_word c,C_word t0,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_2967,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_word)C_block_size(((C_word*)t0)[4]);
+t3=(*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]=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_3024,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_byteblockp(((C_word*)t0)[4]))){
+/* lolevel.scm: 596 align-to-word */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[35]+1)))(3,*((C_word*)lf[35]+1),t4,t2);}
+else{
+t5=(C_word)C_bytes(t2);
+t6=t3;
+f_2973(t6,(C_word)C_fixnum_plus(t5,(C_word)C_bytes(C_fix(1))));}}}
+
+/* k3022 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_3024(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_2973(t2,(C_word)C_fixnum_plus(t1,(C_word)C_bytes(C_fix(1))));}
+
+/* k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2973(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_2973,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_2976,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: 598 hash-table-set! */
+t5=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t5+1)))(5,t5,t4,((C_word*)t0)[2],((C_word*)t0)[5],C_SCHEME_TRUE);}
+
+/* k2974 in k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_2976,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2979,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)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_2986,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_word)C_specialp(((C_word*)t0)[4]);
+if(C_truep(t4)){
+t5=t3;
+f_2986(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
+else{
+t5=(C_word)C_i_symbolp(((C_word*)t0)[4]);
+t6=t3;
+f_2986(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
+
+/* k2984 in k2974 in k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2986(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_2986,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_2988,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_2988(t5,((C_word*)t0)[2],t1);}
+
+/* doloop907 in k2984 in k2974 in k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2988(C_word 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_2988,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_3010,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_word)C_slot(((C_word*)t0)[3],t2);
+/* lolevel.scm: 602 evict */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_2954(t5,t3,t4);}}
+
+/* k3008 in doloop907 in k2984 in k2974 in k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 *a;
+t2=(C_word)C_fixnum_plus(t1,((C_word*)((C_word*)t0)[5])[1]);
+t3=C_mutate(((C_word *)((C_word*)t0)[5])+1,t2);
+t4=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_2988(t5,((C_word*)t0)[2],t4);}
+
+/* k2977 in k2974 in k2971 in k2965 in evict in k2947 in object-size in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2979(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 k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2853(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*)tr3rv,(void*)f_2853r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_2853r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2853r(C_word t0,C_word 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_word)C_notvemptyp(t3);
+t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2935,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_2862,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_2862(t11,t1,t2);}
+
+/* release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2862(C_word t0,C_word 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_2862,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_permanentp(t2))){
+if(C_truep((C_word)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_word)C_block_size(t2);
+t4=(C_word)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_2891,a[2]=t2,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+if(C_truep((C_word)C_byteblockp(t2))){
+t7=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f3735,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 586 ##sys#address->pointer */
+t8=*((C_word*)lf[23]+1);
+((C_proc3)(void*)(*((C_word*)t8+1)))(3,t8,t7,(C_word)C_block_address(&a,1,t2));}
+else{
+t7=(C_truep((C_word)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_2907,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_2907(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);}}
+
+/* doloop881 in release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2907(C_word 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_2907,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_2917,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+t4=(C_word)C_slot(((C_word*)t0)[3],t2);
+/* lolevel.scm: 585 release */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_2862(t5,t3,t4);}}
+
+/* k2915 in doloop881 in release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 *a;
+t2=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_2907(t3,((C_word*)t0)[2],t2);}
+
+/* f3735 in release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f3735(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 586 free */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k2889 in release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 ab[8],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2891,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2898,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 586 ##sys#address->pointer */
+t3=*((C_word*)lf[23]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,(C_word)C_block_address(&a,1,((C_word*)t0)[2]));}
+
+/* k2896 in k2889 in release in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2898(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 586 free */
+t2=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t2))(3,t2,((C_word*)t0)[2],t1);}
+
+/* f_2935 in object-release in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2935(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_2935,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub865(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub865(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2689(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*)tr4rv,(void*)f_2689r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest_vector(a,C_rest_count(0));
+f_2689r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_2689r(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_2693,a[2]=t4,a[3]=t3,a[4]=t2,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+/* lolevel.scm: 533 ##sys#check-special */
+t6=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t5,t3,lf[97]);}
+
+/* k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2693(C_word c,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_2693,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2696,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)C_notvemptyp(((C_word*)t0)[2]))){
+t3=(C_word)C_i_vector_ref(((C_word*)t0)[2],C_fix(0));
+t4=(C_word)C_i_check_exact_2(t3,lf[97]);
+t5=t2;
+f_2696(t5,t3);}
+else{
+t3=t2;
+f_2696(t3,C_SCHEME_FALSE);}}
+
+/* k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2696(C_word t0,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_2696,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_2699,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_2842,a[2]=t4,tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 538 ##sys#pointer->address */
+t6=*((C_word*)lf[26]+1);
+((C_proc3)(void*)(*((C_word*)t6+1)))(3,t6,t5,((C_word*)t0)[2]);}
+
+/* k2840 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2842(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 538 ##sys#address->pointer */
+t2=*((C_word*)lf[23]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2699(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_2699,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2702,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: 539 make-hash-table */
+t3=*((C_word*)lf[95]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,*((C_word*)lf[96]+1));}
+
+/* k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2702(C_word c,C_word t0,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_2702,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2705,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_2710,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_2710(t6,t2,((C_word*)t0)[2]);}
+
+/* evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2710(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_2710,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(*a=C_CLOSURE_TYPE|7,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],a[6]=t2,a[7]=t1,tmp=(C_word)a,a+=8,tmp);
+/* lolevel.scm: 543 hash-table-ref/default */
+t4=*((C_word*)lf[94]+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);}}
+
+/* k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_2720,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_word)C_block_size(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2729,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_2835,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+if(C_truep((C_word)C_byteblockp(((C_word*)t0)[6]))){
+/* lolevel.scm: 547 align-to-word */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[35]+1)))(3,*((C_word*)lf[35]+1),t4,t2);}
+else{
+t5=(C_word)C_bytes(t2);
+t6=t3;
+f_2729(t6,(C_word)C_fixnum_plus(t5,(C_word)C_bytes(C_fix(1))));}}}
+
+/* k2833 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2835(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+t2=((C_word*)t0)[2];
+f_2729(t2,(C_word)C_fixnum_plus(t1,(C_word)C_bytes(C_fix(1))));}
+
+/* k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2729(C_word t0,C_word t1){
+C_word tmp;
+C_word 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_2729,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_2732,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_word)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_word)C_fixnum_lessp(((C_word*)((C_word*)t0)[2])[1],C_fix(0)))){
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2819,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2823,a[2]=((C_word*)t0)[2],a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+t7=(C_word)C_a_i_list(&a,2,((C_word*)t0)[8],((C_word*)((C_word*)t0)[2])[1]);
+/* lolevel.scm: 554 make-property-condition */
+t8=*((C_word*)lf[101]+1);
+((C_proc9)(void*)(*((C_word*)t8+1)))(9,t8,t6,lf[104],lf[105],lf[97],lf[106],lf[107],lf[108],t7);}
+else{
+t5=C_SCHEME_UNDEFINED;
+t6=t2;
+f_2732(2,t6,t5);}}
+else{
+t3=t2;
+f_2732(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k2821 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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 t3;
+C_word ab[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2823,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2827,a[2]=t1,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 558 make-property-condition */
+t3=*((C_word*)lf[101]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,lf[102],lf[103],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k2825 in k2821 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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 *a;
+/* lolevel.scm: 553 make-composite-condition */
+t2=*((C_word*)lf[100]+1);
+((C_proc4)(void*)(*((C_word*)t2+1)))(4,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k2817 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2819(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 552 signal */
+t2=*((C_word*)lf[99]+1);
+((C_proc3)(void*)(*((C_word*)t2+1)))(3,t2,((C_word*)t0)[2],t1);}
+
+/* k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2732(C_word c,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_2732,2,t0,t1);}
+t2=(C_word)C_evict_block(((C_word*)t0)[8],((C_word*)t0)[7]);
+t3=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_2735,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_word)C_i_symbolp(((C_word*)t0)[8]))){
+t4=*((C_word*)lf[93]+1);
+t5=t3;
+f_2735(t5,(C_word)C_i_set_i_slot(t2,C_fix(0),t4));}
+else{
+t4=t3;
+f_2735(t4,C_SCHEME_UNDEFINED);}}
+
+/* k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2735(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_2735,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2738,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_2792,a[2]=((C_word*)t0)[2],a[3]=t2,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 561 ##sys#pointer->address */
+t4=*((C_word*)lf[26]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,((C_word*)t0)[2]);}
+
+/* k2790 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 ab[4],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2792,2,t0,t1);}
+t2=(C_word)C_a_i_plus(&a,2,t1,((C_word*)t0)[4]);
+/* lolevel.scm: 561 ##sys#set-pointer-address! */
+t3=*((C_word*)lf[98]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2738(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_2738,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2741,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: 562 hash-table-set! */
+t3=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[6]);}
+
+/* k2739 in k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2741(C_word c,C_word t0,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_2741,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2744,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)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_2751,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_word)C_specialp(((C_word*)t0)[4]);
+if(C_truep(t4)){
+t5=t3;
+f_2751(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
+else{
+t5=(C_word)C_i_symbolp(((C_word*)t0)[4]);
+t6=t3;
+f_2751(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
+
+/* k2749 in k2739 in k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2751(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_2751,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_2753,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_2753(t5,((C_word*)t0)[2],t1);}
+
+/* doloop840 in k2749 in k2739 in k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2753(C_word 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_2753,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_2774,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_word)C_slot(((C_word*)t0)[3],t2);
+/* lolevel.scm: 566 evict */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_2710(t5,t3,t4);}}
+
+/* k2772 in doloop840 in k2749 in k2739 in k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2774(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_i_slot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2753(t4,((C_word*)t0)[2],t3);}
+
+/* k2742 in k2739 in k2736 in k2733 in k2730 in k2727 in k2718 in evict in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2744(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]);}
+
+/* k2703 in k2700 in k2697 in k2694 in k2691 in object-evict-to-location in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2705(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 568 values */
+C_values(4,0,((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2571(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*)tr3rv,(void*)f_2571r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(a,C_rest_count(0));
+f_2571r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2571r(C_word t0,C_word 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_word)C_notvemptyp(t3);
+t5=(C_truep(t4)?(C_word)C_i_vector_ref(t3,C_fix(0)):(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2682,a[2]=((C_word)li62),tmp=(C_word)a,a+=3,tmp));
+t6=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2578,a[2]=t2,a[3]=t1,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 514 make-hash-table */
+t7=*((C_word*)lf[95]+1);
+((C_proc3)(void*)(*((C_word*)t7+1)))(3,t7,t6,*((C_word*)lf[96]+1));}
+
+/* k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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[6],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2578,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2581,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: 515 ##sys#check-closure */
+t3=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[4],lf[91]);}
+
+/* k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_2581,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_2586,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_2586(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2586(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_2586,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2596,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: 518 hash-table-ref/default */
+t4=*((C_word*)lf[94]+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);}}
+
+/* k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word ab[8],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2596,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_word)C_block_size(((C_word*)t0)[5]);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2605,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_word)C_byteblockp(((C_word*)t0)[5]))){
+/* lolevel.scm: 521 align-to-word */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[35]+1)))(3,*((C_word*)lf[35]+1),t3,t2);}
+else{
+t4=t3;
+f_2605(2,t4,(C_word)C_bytes(t2));}}}
+
+/* k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2605,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2609,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)C_fixnum_plus(t1,(C_word)C_bytes(C_fix(1)));
+/* lolevel.scm: 522 allocator */
+t4=((C_word*)t0)[2];
+((C_proc3)C_retrieve_proc(t4))(3,t4,t2,t3);}
+
+/* k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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 t5;
+C_word ab[8],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2609,2,t0,t1);}
+t2=(C_word)C_evict_block(((C_word*)t0)[6],t1);
+t3=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_2612,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_word)C_i_symbolp(((C_word*)t0)[6]))){
+t4=*((C_word*)lf[93]+1);
+t5=t3;
+f_2612(t5,(C_word)C_i_set_i_slot(t2,C_fix(0),t4));}
+else{
+t4=t3;
+f_2612(t4,C_SCHEME_UNDEFINED);}}
+
+/* k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2612(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_2612,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_2615,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: 524 hash-table-set! */
+t3=*((C_word*)lf[92]+1);
+((C_proc5)(void*)(*((C_word*)t3+1)))(5,t3,t2,((C_word*)t0)[2],((C_word*)t0)[5],((C_word*)t0)[6]);}
+
+/* k2613 in k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2615(C_word c,C_word t0,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_2615,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2618,a[2]=((C_word*)t0)[5],a[3]=((C_word*)t0)[6],tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)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_2625,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_word)C_specialp(((C_word*)t0)[4]);
+if(C_truep(t4)){
+t5=t3;
+f_2625(t5,(C_truep(t4)?C_fix(1):C_fix(0)));}
+else{
+t5=(C_word)C_i_symbolp(((C_word*)t0)[4]);
+t6=t3;
+f_2625(t6,(C_truep(t5)?C_fix(1):C_fix(0)));}}}
+
+/* k2623 in k2613 in k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2625(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_2625,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_2627,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_2627(t5,((C_word*)t0)[2],t1);}
+
+/* doloop780 in k2623 in k2613 in k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2627(C_word 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_2627,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_2648,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_word)C_slot(((C_word*)t0)[3],t2);
+/* lolevel.scm: 529 evict */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_2586(t5,t3,t4);}}
+
+/* k2646 in doloop780 in k2623 in k2613 in k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2648(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_i_slot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_2627(t4,((C_word*)t0)[2],t3);}
+
+/* k2616 in k2613 in k2610 in k2607 in k2603 in k2594 in evict in k2579 in k2576 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2618(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_2682 in object-evict in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2682(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_2682,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+t4=(C_word)C_i_foreign_fixnum_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub755(t3,t4));}
+
+/* object-evicted? in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2568(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_2568,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_permanentp(t2));}
+
+/* record->vector in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2530(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_2530,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2534,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 496 ##sys#check-generic-structure */
+f_1158(t3,t2,(C_word)C_a_i_list(&a,1,lf[89]));}
+
+/* k2532 in record->vector in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2534(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_2534,2,t0,t1);}
+t2=(C_word)C_block_size(((C_word*)t0)[3]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2540,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 498 ##sys#make-vector */
+t4=*((C_word*)lf[17]+1);
+((C_proc3)(void*)(*((C_word*)t4+1)))(3,t4,t3,t2);}
+
+/* k2538 in k2532 in record->vector in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2540(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_2540,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2545,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_2545(t2,C_fix(0)));}
+
+/* doloop739 in k2538 in k2532 in record->vector in k2526 in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static C_word C_fcall f_2545(C_word t0,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;}}
+
+/* record-instance-slot-set! in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2502(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_2502,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2506,a[2]=t4,a[3]=t2,a[4]=t1,a[5]=t3,tmp=(C_word)a,a+=6,tmp);
+/* lolevel.scm: 483 ##sys#check-generic-structure */
+f_1158(t5,t2,(C_word)C_a_i_list(&a,1,lf[86]));}
+
+/* k2504 in record-instance-slot-set! in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 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_2506,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_2509,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_block_size(((C_word*)t0)[3]);
+t4=(C_word)C_fixnum_difference(t3,C_fix(1));
+/* lolevel.scm: 484 ##sys#check-range */
+((C_proc6)C_retrieve_proc(*((C_word*)lf[87]+1)))(6,*((C_word*)lf[87]+1),t2,((C_word*)t0)[5],C_fix(0),t4,lf[86]);}
+
+/* k2507 in k2504 in record-instance-slot-set! in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 *a;
+t2=(C_word)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_word)C_i_setslot(((C_word*)t0)[3],t2,((C_word*)t0)[2]));}
+
+/* record-instance-length in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2489(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_2489,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2493,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 479 ##sys#check-generic-structure */
+f_1158(t3,t2,(C_word)C_a_i_list(&a,1,lf[85]));}
+
+/* k2491 in record-instance-length in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 *a;
+t2=(C_word)C_block_size(((C_word*)t0)[3]);
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_fixnum_difference(t2,C_fix(1)));}
+
+/* record-instance-type in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2480(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_2480,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2484,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 475 ##sys#check-generic-structure */
+f_1158(t3,t2,(C_word)C_a_i_list(&a,1,lf[84]));}
+
+/* k2482 in record-instance-type in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2484(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)));}
+
+/* record-instance? in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2431(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_2431r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2431r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2431r(C_word 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_2435,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_2435(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_2435(2,t6,(C_word)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);}}}
+
+/* k2433 in record-instance? in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2435(C_word c,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_2435,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2446,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_word)C_blockp(t3))){
+t4=(C_word)C_structurep(t3);
+t5=t2;
+f_2446(t5,t4);}
+else{
+t4=t2;
+f_2446(t4,C_SCHEME_FALSE);}}
+
+/* k2444 in k2433 in record-instance? in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_fcall f_2446(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_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_word)C_slot(((C_word*)t0)[2],C_fix(0));
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)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 k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2422(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_2422r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2422r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2422r(C_word t0,C_word t1,C_word t2,C_word t3){
+C_word tmp;
+C_word t4;
+C_word t5;
+t4=(C_word)C_i_check_symbol_2(t2,lf[81]);
+C_apply(5,0,t1,*((C_word*)lf[82]+1),t2,t3);}
+
+/* number-of-bytes in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2400(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_2400,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_byteblockp(t2))){
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_block_size(t2));}
+else{
+t3=(C_word)C_block_size(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_w2b(t3));}}
+else{
+/* lolevel.scm: 449 ##sys#signal-hook */
+t3=*((C_word*)lf[5]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,t1,lf[6],lf[79],lf[80],t2);}}
+
+/* number-of-slots in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2391(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_2391,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2395,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+t5=(C_word)C_a_i_list(&a,1,lf[77]);
+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_word)C_blockp(t4))){
+t7=(C_word)C_specialp(t4);
+if(C_truep(t7)){
+t8=t6;
+f_1204(t8,(C_word)C_i_not(t7));}
+else{
+t8=(C_word)C_byteblockp(t4);
+t9=t6;
+f_1204(t9,(C_word)C_i_not(t8));}}
+else{
+t7=t6;
+f_1204(t7,C_SCHEME_FALSE);}}
+
+/* k1202 in number-of-slots in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 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_word)C_block_size(((C_word*)t0)[5]));}
+else{
+if(C_truep((C_word)C_i_pairp(((C_word*)t0)[4]))){
+t2=(C_word)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[78],((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[78],((C_word*)t0)[2]);}}}
+
+/* k2393 in number-of-slots in k2387 in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2395(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_block_size(((C_word*)t0)[2]));}
+
+/* set-procedure-data! in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2371(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_2371,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2375,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 430 extend-procedure */
+t5=((C_word*)t0)[2];
+((C_proc4)C_retrieve_proc(t5))(4,t5,t4,t2,t3);}
+
+/* k2373 in set-procedure-data! in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 t4;
+C_word *a;
+t2=(C_word)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: 433 ##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[72],lf[73],((C_word*)t0)[3]);}}
+
+/* procedure-data in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2332(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_2332,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_closurep(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2363,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=t2;
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2346,a[2]=((C_word)li49),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 415 ##sys#lambda-decoration */
+t6=*((C_word*)lf[70]+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);}}
+
+/* a2345 in procedure-data in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2346(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_2346,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[65],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k2361 in procedure-data in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2363(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_slot(t1,C_fix(1)):C_SCHEME_FALSE));}
+
+/* extended-procedure? in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2296(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_2296,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_closurep(t2))){
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2330,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+t4=t2;
+t5=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2313,a[2]=((C_word)li47),tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 415 ##sys#lambda-decoration */
+t6=*((C_word*)lf[70]+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);}}
+
+/* a2312 in extended-procedure? in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2313(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_2313,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[65],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* k2328 in extended-procedure? in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2330(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 k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2261(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_2261,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_2265,a[2]=t2,a[3]=t1,a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 408 ##sys#check-closure */
+t5=*((C_word*)lf[68]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[66]);}
+
+/* k2263 in extend-procedure in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+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 ab[7],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_2265,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_2270,a[2]=((C_word)li44),tmp=(C_word)a,a+=3,tmp);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2286,a[2]=((C_word*)t0)[4],a[3]=((C_word)li45),tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 409 ##sys#decorate-lambda */
+t4=*((C_word*)lf[67]+1);
+((C_proc5)(void*)(*((C_word*)t4+1)))(5,t4,((C_word*)t0)[3],((C_word*)t0)[2],t2,t3);}
+
+/* a2285 in k2263 in extend-procedure in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2286(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_2286,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_cons(&a,2,lf[65],((C_word*)t0)[2]);
+t5=(C_word)C_i_setslot(t2,t3,t4);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t2);}
+
+/* a2269 in k2263 in extend-procedure in k2253 in k2249 in k2245 in k2241 in k2237 in k2233 in k2229 in k2225 in k2100 in k1081 in k1078 */
+static void C_ccall f_2270(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_2270,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=(C_word)C_slot(t2,C_fix(0));
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_eqp(lf[65],t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_FALSE);}}
+
+/* pointer-f64-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2211(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_2211,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_flonum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub574(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_flonum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub574(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-f32-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2197(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_2197,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_flonum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub566(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_flonum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub566(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-s32-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2183(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_2183,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub558(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub558(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-u32-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2169(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_2169,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub550(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub550(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-s16-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2155(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_2155,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub542(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub542(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-u16-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2141(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_2141,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub534(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub534(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-s8-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2127(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_2127,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub526(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub526(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* pointer-u8-set! in k2100 in k1081 in k1078 */
+static void C_ccall f_2113(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_2113,4,t0,t1,t2,t3);}
+if(C_truep(t2)){
+t4=(C_word)C_i_foreign_pointer_argumentp(t2);
+t5=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub518(C_SCHEME_UNDEFINED,t4,t5));}
+else{
+t4=(C_word)C_i_foreign_fixnum_argumentp(t3);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub518(C_SCHEME_UNDEFINED,C_SCHEME_FALSE,t4));}}
+
+/* locative? in k2100 in k1081 in k1078 */
+static void C_ccall f_2107(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_2107,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(C_word)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 k2100 in k1081 in k1078 */
+static void C_ccall f_2104(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_2104,3,t0,t1,t2);}
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)C_i_locative_to_object(t2));}
+
+/* locative-set! in k1081 in k1078 */
+static void C_ccall f_2097(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_2097,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)C_i_locative_set(t2,t3));}
+
+/* make-weak-locative in k1081 in k1078 */
+static void C_ccall f_2068(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_2068r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2068r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2068r(C_word t0,C_word 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_2076,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+/* lolevel.scm: 342 ##sys#make-locative */
+t5=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,t2,C_fix(0),C_SCHEME_TRUE,lf[43]);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+/* lolevel.scm: 342 ##sys#make-locative */
+t7=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,C_SCHEME_TRUE,lf[43]);}
+else{
+/* ##sys#error */
+t6=*((C_word*)lf[12]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k2074 in make-weak-locative in k1081 in k1078 */
+static void C_ccall f_2076(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 342 ##sys#make-locative */
+t2=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_TRUE,lf[43]);}
+
+/* make-locative in k1081 in k1078 */
+static void C_ccall f_2039(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_2039r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_2039r(t0,t1,t2,t3);}}
+
+static void C_ccall f_2039r(C_word t0,C_word 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_2047,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t3))){
+/* lolevel.scm: 339 ##sys#make-locative */
+t5=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t5+1)))(6,t5,t1,t2,C_fix(0),C_SCHEME_FALSE,lf[41]);}
+else{
+t5=(C_word)C_i_cdr(t3);
+if(C_truep((C_word)C_i_nullp(t5))){
+t6=(C_word)C_i_car(t3);
+/* lolevel.scm: 339 ##sys#make-locative */
+t7=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t7+1)))(6,t7,t1,t2,t6,C_SCHEME_FALSE,lf[41]);}
+else{
+/* ##sys#error */
+t6=*((C_word*)lf[12]+1);
+((C_proc4)(void*)(*((C_word*)t6+1)))(4,t6,t4,lf[0],t3);}}}
+
+/* k2045 in make-locative in k1081 in k1078 */
+static void C_ccall f_2047(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 339 ##sys#make-locative */
+t2=*((C_word*)lf[42]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[3],((C_word*)t0)[2],t1,C_SCHEME_FALSE,lf[41]);}
+
+/* pointer-tag in k1081 in k1078 */
+static void C_ccall f_2016(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_2016,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_2028,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_blockp(t4))){
+t5=(C_word)C_specialp(t4);
+t6=t3;
+f_2028(t6,t5);}
+else{
+t5=t3;
+f_2028(t5,C_SCHEME_FALSE);}}
+
+/* k2026 in pointer-tag in k1081 in k1078 */
+static void C_fcall f_2028(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_word)C_taggedpointerp(((C_word*)t0)[2]))?(C_word)C_slot(((C_word*)t0)[2],C_fix(1)):C_SCHEME_FALSE));}
+else{
+/* lolevel.scm: 316 ##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[40],((C_word*)t0)[2]);}}
+
+/* tagged-pointer? in k1081 in k1078 */
+static void C_ccall f_1972(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_1972r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest(a,C_rest_count(0));
+f_1972r(t0,t1,t2,t3);}}
+
+static void C_ccall f_1972r(C_word 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_1976,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_1976(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_1976(2,t6,(C_word)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);}}}
+
+/* k1974 in tagged-pointer? in k1081 in k1078 */
+static void C_ccall f_1976(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_blockp(((C_word*)t0)[3]))){
+if(C_truep((C_word)C_taggedpointerp(((C_word*)t0)[3]))){
+t2=(C_word)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_word)C_slot(((C_word*)t0)[3],C_fix(1));
+t4=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)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_1952(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_1952,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1956,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 301 ##sys#make-tagged-pointer */
+t5=*((C_word*)lf[38]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t4,t3);}
+
+/* k1954 in tag-pointer in k1081 in k1078 */
+static void C_ccall f_1956(C_word c,C_word t0,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_1956,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1959,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_1967,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_word)C_blockp(t4))){
+t5=(C_word)C_specialp(t4);
+t6=t3;
+f_1967(t6,t5);}
+else{
+t5=t3;
+f_1967(t5,C_SCHEME_FALSE);}}
+
+/* k1965 in k1954 in tag-pointer in k1081 in k1078 */
+static void C_fcall f_1967(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_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: 304 ##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[37],((C_word*)t0)[5]);}}
+
+/* k1957 in k1954 in tag-pointer in k1081 in k1078 */
+static void C_ccall f_1959(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_1915(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_1915,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_integerp(t2))){
+t3=t1;
+t4=t2;
+t5=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+t6=(C_word)C_i_foreign_integer_argumentp(t4);
+t7=t3;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)stub429(t5,t6));}
+else{
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1936,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t4=t2;
+if(C_truep((C_word)C_blockp(t4))){
+t5=(C_word)C_specialp(t4);
+t6=t3;
+f_1936(t6,t5);}
+else{
+t5=t3;
+f_1936(t5,C_SCHEME_FALSE);}}}
+
+/* k1934 in align-to-word in k1081 in k1078 */
+static void C_fcall f_1936(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_1936,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1947,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 291 ##sys#pointer->address */
+t3=*((C_word*)lf[26]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+else{
+/* lolevel.scm: 293 ##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[35],lf[36],((C_word*)t0)[2]);}}
+
+/* k1945 in k1934 in align-to-word in k1081 in k1078 */
+static void C_ccall f_1947(C_word c,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_1947,2,t0,t1);}
+t2=(C_word)C_a_i_bytevector(&a,1,C_fix(4));
+t3=(C_word)C_i_foreign_integer_argumentp(t1);
+t4=(C_word)stub429(t2,t3);
+/* lolevel.scm: 291 ##sys#address->pointer */
+t5=*((C_word*)lf[23]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,((C_word*)t0)[2],t4);}
+
+/* pointer-offset in k1081 in k1078 */
+static void C_ccall f_1895(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_1895,4,t0,t1,t2,t3);}
+t4=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+t5=(C_truep(t2)?(C_word)C_i_foreign_pointer_argumentp(t2):C_SCHEME_FALSE);
+t6=(C_word)C_i_foreign_integer_argumentp(t3);
+t7=t1;
+((C_proc2)(void*)(*((C_word*)t7+1)))(2,t7,(C_word)stub420(t4,t5,t6));}
+
+/* pointer=? in k1081 in k1078 */
+static void C_ccall f_1886(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_1886,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1890,a[2]=t3,a[3]=t2,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+/* lolevel.scm: 277 ##sys#check-special */
+t5=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t5+1)))(4,t5,t4,t2,lf[33]);}
+
+/* k1888 in pointer=? in k1081 in k1078 */
+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[5],*a=ab;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1890,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1893,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: 278 ##sys#check-special */
+t3=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t3+1)))(4,t3,t2,((C_word*)t0)[2],lf[33]);}
+
+/* k1891 in k1888 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 *a;
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,(C_word)C_pointer_eqp(((C_word*)t0)[3],((C_word*)t0)[2]));}
+
+/* pointer->object in k1081 in k1078 */
+static void C_ccall f_1880(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_1880,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1884,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 273 ##sys#check-pointer */
+t4=*((C_word*)lf[8]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[32]);}
+
+/* k1882 in pointer->object in k1081 in k1078 */
+static void C_ccall f_1884(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_pointer_to_object(((C_word*)t0)[2]));}
+
+/* object->pointer in k1081 in k1078 */
+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 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_1869,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=t1;
+t4=t2;
+t5=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+t6=t3;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)stub406(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_1856(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_1856,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1860,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 265 ##sys#check-special */
+t4=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[30]);}
+
+/* k1858 in null-pointer? in k1081 in k1078 */
+static void C_ccall f_1860(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_1860,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_1867,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+/* lolevel.scm: 266 ##sys#pointer->address */
+t3=*((C_word*)lf[26]+1);
+((C_proc3)(void*)(*((C_word*)t3+1)))(3,t3,t2,((C_word*)t0)[2]);}
+
+/* k1865 in k1858 in null-pointer? in k1081 in k1078 */
+static void C_ccall f_1867(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_eqp(C_fix(0),t1));}
+
+/* pointer->address in k1081 in k1078 */
+static void C_ccall f_1846(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_1846,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1850,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 259 ##sys#check-special */
+t4=*((C_word*)lf[27]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[25]);}
+
+/* k1848 in pointer->address in k1081 in k1078 */
+static void C_ccall f_1850(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 260 ##sys#pointer->address */
+t2=*((C_word*)lf[26]+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_1837(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_1837,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1841,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+/* lolevel.scm: 255 ##sys#check-integer */
+t4=*((C_word*)lf[24]+1);
+((C_proc4)(void*)(*((C_word*)t4+1)))(4,t4,t3,t2,lf[22]);}
+
+/* k1839 in address->pointer in k1081 in k1078 */
+static void C_ccall f_1841(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+/* lolevel.scm: 256 ##sys#address->pointer */
+t2=*((C_word*)lf[23]+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_1826(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_1826,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(C_word)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_1815(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_1815,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+t3=(C_word)C_anypointerp(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);}}
+
+/* free in k1081 in k1078 */
+static void C_ccall f_1805(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_1805,3,t0,t1,t2);}
+if(C_truep(t2)){
+t3=(C_word)C_i_foreign_pointer_argumentp(t2);
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_word)stub371(C_SCHEME_UNDEFINED,t3));}
+else{
+t3=t1;
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,(C_word)stub371(C_SCHEME_UNDEFINED,C_SCHEME_FALSE));}}
+
+/* allocate in k1081 in k1078 */
+static void C_ccall f_1798(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_1798,3,t0,t1,t2);}
+t3=(C_word)C_a_i_bytevector(&a,1,C_fix(3));
+t4=(C_word)C_i_foreign_fixnum_argumentp(t2);
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,(C_word)stub366(t3,t4));}
+
+/* object-copy in k1081 in k1078 */
+static void C_ccall f_1717(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_1717,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_1723,a[2]=t4,a[3]=((C_word)li14),tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_1723(t6,t1,t2);}
+
+/* copy in object-copy in k1081 in k1078 */
+static void C_fcall f_1723(C_word t0,C_word 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_1723,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_blockp(t2))){
+if(C_truep((C_word)C_i_symbolp(t2))){
+t3=(C_word)C_slot(t2,C_fix(1));
+/* lolevel.scm: 233 ##sys#intern-symbol */
+C_string_to_symbol(3,0,t1,t3);}
+else{
+t3=(C_word)C_block_size(t2);
+t4=(C_truep((C_word)C_byteblockp(t2))?(C_word)C_words(t3):t3);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_1753,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t1,a[5]=t2,tmp=(C_word)a,a+=6,tmp);
+/* lolevel.scm: 237 ##sys#make-vector */
+t6=*((C_word*)lf[17]+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);}}
+
+/* k1751 in copy in object-copy in k1081 in k1078 */
+static void C_ccall f_1753(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_1753,2,t0,t1);}
+t2=(C_word)C_copy_block(((C_word*)t0)[5],t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_1756,a[2]=t2,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_byteblockp(((C_word*)t0)[5]);
+t5=(C_truep(t4)?t4:(C_word)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_word)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_1768,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_1768(t10,t3,t6);}}
+
+/* doloop356 in k1751 in copy in object-copy in k1081 in k1078 */
+static void C_fcall f_1768(C_word 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_1768,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)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_1789,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_word)C_slot(((C_word*)t0)[4],t2);
+/* lolevel.scm: 241 copy */
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_1723(t5,t3,t4);}}
+
+/* k1787 in doloop356 in k1751 in copy in object-copy in k1081 in k1078 */
+static void C_ccall f_1789(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_setslot(((C_word*)t0)[5],((C_word*)t0)[4],t1);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],C_fix(1));
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_1768(t4,((C_word*)t0)[2],t3);}
+
+/* k1754 in k1751 in copy in object-copy in k1081 in k1078 */
+static void C_ccall f_1756(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_1363(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_1363r,4,t0,t1,t2,t3);}
+else{
+a=C_alloc((c-4)*3);
+t4=C_restore_rest(a,C_rest_count(0));
+f_1363r(t0,t1,t2,t3,t4);}}
+
+static void C_ccall f_1363r(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_1365,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_1644,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_1649,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_1654,a[2]=t7,a[3]=((C_word)li11),tmp=(C_word)a,a+=4,tmp);
+if(C_truep((C_word)C_i_nullp(t4))){
+/* def-n185327 */
+t9=t8;
+f_1654(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-foffset186325 */
+t11=t7;
+f_1649(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-toffset187322 */
+t13=t6;
+f_1644(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))){
+/* body183192 */
+t15=t5;
+f_1365(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-n185 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1654(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_1654,NULL,2,t0,t1);}
+/* def-foffset186325 */
+t2=((C_word*)t0)[2];
+f_1649(t2,t1,C_SCHEME_FALSE);}
+
+/* def-foffset186 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1649(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_1649,NULL,3,t0,t1,t2);}
+/* def-toffset187322 */
+t3=((C_word*)t0)[2];
+f_1644(t3,t1,t2,C_fix(0));}
+
+/* def-toffset187 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1644(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_1644,NULL,4,t0,t1,t2,t3);}
+/* body183192 */
+t4=((C_word*)t0)[2];
+f_1365(t4,t1,t2,t3,C_fix(0));}
+
+/* body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1365(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_1365,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_1368,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_1374,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_1380,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_1396,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_1423,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_word)C_a_i_list(&a,1,lf[11]));}
+
+/* k1421 in body183 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[15],*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);
+/* lolevel.scm: 198 ##sys#check-block */
+f_1085(t2,((C_word*)t0)[2],(C_word)C_a_i_list(&a,1,lf[11]));}
+
+/* k1424 in k1421 in body183 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 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_1426,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_1431,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_1431(t5,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1431(C_word t0,C_word 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 *a;
+loop:
+a=C_alloc(11);
+C_check_for_interrupt;
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_1431,NULL,4,t0,t1,t2,t3);}
+if(C_truep((C_word)C_structurep(t2))){
+t4=(C_word)C_slot(t2,C_fix(0));
+if(C_truep((C_word)C_i_memq(t4,((C_word*)t0)[9]))){
+t5=(C_word)C_slot(t2,C_fix(1));
+/* lolevel.scm: 202 move */
+t18=t1;
+t19=t5;
+t20=t3;
+t1=t18;
+t2=t19;
+t3=t20;
+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_word)C_structurep(t3))){
+t4=(C_word)C_slot(t3,C_fix(0));
+if(C_truep((C_word)C_i_memq(t4,((C_word*)t0)[9]))){
+t5=(C_word)C_slot(t3,C_fix(1));
+/* lolevel.scm: 206 move */
+t18=t1;
+t19=t2;
+t20=t5;
+t1=t18;
+t2=t19;
+t3=t20;
+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;
+if(C_truep((C_word)C_blockp(t5))){
+t6=(C_word)C_anypointerp(t5);
+if(C_truep(t6)){
+t7=t4;
+f_1503(t7,t6);}
+else{
+t7=(C_word)C_locativep(t5);
+t8=t4;
+f_1503(t8,t7);}}
+else{
+t6=(C_word)C_locativep(t5);
+t7=t4;
+f_1503(t7,t6);}}}}
+
+/* k1501 in move in k1424 in k1421 in body183 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 t8;
+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_1522,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];
+if(C_truep((C_word)C_blockp(t3))){
+t4=(C_word)C_anypointerp(t3);
+if(C_truep(t4)){
+t5=t2;
+f_1522(t5,t4);}
+else{
+t5=(C_word)C_locativep(t3);
+t6=t2;
+f_1522(t6,t5);}}
+else{
+t4=(C_word)C_locativep(t3);
+t5=t2;
+f_1522(t5,t4);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1571,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: 215 ##sys#bytevector? */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[7]);}}
+
+/* k1569 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1571(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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;
+C_check_for_interrupt;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_1571,2,t0,t1);}
+t2=(C_truep(t1)?t1:(C_word)C_i_stringp(((C_word*)t0)[9]));
+if(C_truep(t2)){
+t3=(C_word)C_block_size(((C_word*)t0)[9]);
+t4=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_1596,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];
+if(C_truep((C_word)C_blockp(t5))){
+t6=(C_word)C_anypointerp(t5);
+if(C_truep(t6)){
+t7=t4;
+f_1596(t7,t6);}
+else{
+t7=(C_word)C_locativep(t5);
+t8=t4;
+f_1596(t8,t7);}}
+else{
+t6=(C_word)C_locativep(t5);
+t7=t4;
+f_1596(t7,t6);}}
+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);}}
+
+/* k1594 in k1569 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1596(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_1596,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1603,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: 218 checkn1 */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_1380(t4,t2,t3,((C_word*)t0)[3],((C_word*)t0)[6]);}
+else{
+/* lolevel.scm: 218 checkn1 */
+t4=((C_word*)((C_word*)t0)[4])[1];
+f_1380(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_1613,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: 219 ##sys#bytevector? */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[9]);}}
+
+/* k1611 in k1594 in k1569 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1613(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_1613,2,t0,t1);}
+t2=(C_truep(t1)?t1:(C_word)C_i_stringp(((C_word*)t0)[9]));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1623,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_word)C_block_size(((C_word*)t0)[9]);
+/* lolevel.scm: 220 checkn2 */
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_1396(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);}}
+
+/* k1621 in k1611 in k1594 in k1569 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1623(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_word)C_i_foreign_block_argumentp(t3):C_SCHEME_FALSE);
+t8=(C_truep(t4)?(C_word)C_i_foreign_block_argumentp(t4):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t1);
+t10=(C_word)C_i_foreign_fixnum_argumentp(t5);
+t11=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t12=t2;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)stub153(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
+
+/* k1601 in k1594 in k1569 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1603(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_word)C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
+t8=(C_truep(t4)?(C_word)C_i_foreign_block_argumentp(t4):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t1);
+t10=(C_word)C_i_foreign_fixnum_argumentp(t5);
+t11=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t12=t2;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)stub121(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
+
+/* k1520 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1522(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_1522,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[9];
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1529,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_1529(2,t4,t2);}
+else{
+/* lolevel.scm: 210 nosizerr */
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_1368(t4,t3);}}
+else{
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_1538,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: 211 ##sys#bytevector? */
+((C_proc3)C_retrieve_proc(*((C_word*)lf[15]+1)))(3,*((C_word*)lf[15]+1),t2,((C_word*)t0)[7]);}}
+
+/* k1536 in k1520 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+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 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_1538,2,t0,t1);}
+t2=(C_truep(t1)?t1:(C_word)C_i_stringp(((C_word*)t0)[9]));
+if(C_truep(t2)){
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1548,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_1552,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_word)C_block_size(((C_word*)t0)[9]);
+/* lolevel.scm: 212 checkn1 */
+t7=((C_word*)((C_word*)t0)[3])[1];
+f_1380(t7,t3,t4,t6,((C_word*)t0)[6]);}
+else{
+/* lolevel.scm: 212 nosizerr */
+t6=((C_word*)((C_word*)t0)[2])[1];
+f_1368(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);}}
+
+/* k1550 in k1536 in k1520 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1552(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_block_size(((C_word*)t0)[5]);
+/* lolevel.scm: 212 checkn1 */
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_1380(t3,((C_word*)t0)[3],t1,t2,((C_word*)t0)[2]);}
+
+/* k1546 in k1536 in k1520 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1548(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_word)C_i_foreign_block_argumentp(t3):C_SCHEME_FALSE);
+t8=(C_truep(t4)?(C_word)C_i_foreign_pointer_argumentp(t4):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t1);
+t10=(C_word)C_i_foreign_fixnum_argumentp(t5);
+t11=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t12=t2;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)stub137(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
+
+/* k1527 in k1520 in k1501 in move in k1424 in k1421 in body183 in move-memory! in k1081 in k1078 */
+static void C_ccall f_1529(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_word)C_i_foreign_pointer_argumentp(t3):C_SCHEME_FALSE);
+t8=(C_truep(t4)?(C_word)C_i_foreign_pointer_argumentp(t4):C_SCHEME_FALSE);
+t9=(C_word)C_i_foreign_fixnum_argumentp(t1);
+t10=(C_word)C_i_foreign_fixnum_argumentp(t5);
+t11=(C_word)C_i_foreign_fixnum_argumentp(t6);
+t12=t2;
+((C_proc2)(void*)(*((C_word*)t12+1)))(2,t12,(C_word)stub105(C_SCHEME_UNDEFINED,t7,t8,t9,t10,t11));}
+
+/* checkn2 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1396(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_1396,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_1403,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_word)C_fixnum_difference(t3,t5);
+if(C_truep((C_word)C_fixnum_less_or_equal_p(t2,t8))){
+t9=(C_word)C_fixnum_difference(t4,t6);
+t10=t7;
+f_1403(t10,(C_word)C_fixnum_less_or_equal_p(t2,t9));}
+else{
+t9=t7;
+f_1403(t9,C_SCHEME_FALSE);}}
+
+/* k1401 in checkn2 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1403(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_1403,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_1374(t2,((C_word*)t0)[5],(C_word)C_a_i_list(&a,3,((C_word*)t0)[6],((C_word*)t0)[3],((C_word*)t0)[2]));}}
+
+/* checkn1 in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1380(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_1380,NULL,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_fixnum_difference(t3,t4);
+if(C_truep((C_word)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_1374(t6,t1,(C_word)C_a_i_list(&a,2,t2,t3));}}
+
+/* sizerr in body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1374(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_1374,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 body183 in move-memory! in k1081 in k1078 */
+static void C_fcall f_1368(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_1368,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+5)){
+C_save_and_reclaim((void*)tr3rv,(void*)f_1219r,3,t0,t1,t2);}
+else{
+a=C_alloc((c-3)*3);
+t3=C_restore_rest_vector(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;
+C_word *a=C_alloc(5);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_1231,a[2]=t2,a[3]=t3,a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+t5=t2;
+if(C_truep((C_word)C_blockp(t5))){
+t6=(C_word)C_anypointerp(t5);
+t7=t4;
+f_1231(t7,t6);}
+else{
+t6=t4;
+f_1231(t6,C_SCHEME_FALSE);}}
+
+/* k1229 in ##sys#check-pointer in k1081 in k1078 */
+static void C_fcall f_1231(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_word)C_notvemptyp(((C_word*)t0)[3]))){
+t2=(C_word)C_i_vector_ref(((C_word*)t0)[3],C_fix(0));
+/* lolevel.scm: 140 ##sys#error-hook */
+t3=*((C_word*)lf[3]+1);
+((C_proc6)(void*)(*((C_word*)t3+1)))(6,t3,((C_word*)t0)[4],C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),t2,lf[9],((C_word*)t0)[2]);}
+else{
+/* lolevel.scm: 140 ##sys#error-hook */
+t2=*((C_word*)lf[3]+1);
+((C_proc6)(void*)(*((C_word*)t2+1)))(6,t2,((C_word*)t0)[4],C_fix((C_word)C_BAD_ARGUMENT_TYPE_NO_POINTER_ERROR),C_SCHEME_FALSE,lf[9],((C_word*)t0)[2]);}}}
+
+/* ##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_word)C_blockp(t5))){
+t6=(C_word)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_word)C_i_pairp(((C_word*)t0)[3]))){
+t2=(C_word)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_word)C_blockp(t2))){
+t4=C_SCHEME_UNDEFINED;
+t5=t1;
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+if(C_truep((C_word)C_i_pairp(t3))){
+t4=(C_word)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[222] = {
+{"toplevel:lolevel_scm",(void*)C_lolevel_toplevel},
+{"f_1080:lolevel_scm",(void*)f_1080},
+{"f_1083:lolevel_scm",(void*)f_1083},
+{"f_2102:lolevel_scm",(void*)f_2102},
+{"f_3329:lolevel_scm",(void*)f_3329},
+{"f_2227:lolevel_scm",(void*)f_2227},
+{"f_3319:lolevel_scm",(void*)f_3319},
+{"f_2231:lolevel_scm",(void*)f_2231},
+{"f_3309:lolevel_scm",(void*)f_3309},
+{"f_2235:lolevel_scm",(void*)f_2235},
+{"f_3299:lolevel_scm",(void*)f_3299},
+{"f_2239:lolevel_scm",(void*)f_2239},
+{"f_3289:lolevel_scm",(void*)f_3289},
+{"f_2243:lolevel_scm",(void*)f_2243},
+{"f_3279:lolevel_scm",(void*)f_3279},
+{"f_2247:lolevel_scm",(void*)f_2247},
+{"f_3269:lolevel_scm",(void*)f_3269},
+{"f_2251:lolevel_scm",(void*)f_2251},
+{"f_3259:lolevel_scm",(void*)f_3259},
+{"f_2255:lolevel_scm",(void*)f_2255},
+{"f_2389:lolevel_scm",(void*)f_2389},
+{"f_3235:lolevel_scm",(void*)f_3235},
+{"f_3239:lolevel_scm",(void*)f_3239},
+{"f_3242:lolevel_scm",(void*)f_3242},
+{"f_2528:lolevel_scm",(void*)f_2528},
+{"f_3222:lolevel_scm",(void*)f_3222},
+{"f_3213:lolevel_scm",(void*)f_3213},
+{"f_3204:lolevel_scm",(void*)f_3204},
+{"f_3198:lolevel_scm",(void*)f_3198},
+{"f_3167:lolevel_scm",(void*)f_3167},
+{"f_3171:lolevel_scm",(void*)f_3171},
+{"f_3174:lolevel_scm",(void*)f_3174},
+{"f_3181:lolevel_scm",(void*)f_3181},
+{"f_3196:lolevel_scm",(void*)f_3196},
+{"f_3184:lolevel_scm",(void*)f_3184},
+{"f_3158:lolevel_scm",(void*)f_3158},
+{"f_1113:lolevel_scm",(void*)f_1113},
+{"f_1135:lolevel_scm",(void*)f_1135},
+{"f_1138:lolevel_scm",(void*)f_1138},
+{"f_3162:lolevel_scm",(void*)f_3162},
+{"f_3029:lolevel_scm",(void*)f_3029},
+{"f_3033:lolevel_scm",(void*)f_3033},
+{"f_3036:lolevel_scm",(void*)f_3036},
+{"f_3041:lolevel_scm",(void*)f_3041},
+{"f_3057:lolevel_scm",(void*)f_3057},
+{"f_3100:lolevel_scm",(void*)f_3100},
+{"f_3103:lolevel_scm",(void*)f_3103},
+{"f_3112:lolevel_scm",(void*)f_3112},
+{"f_3133:lolevel_scm",(void*)f_3133},
+{"f_3106:lolevel_scm",(void*)f_3106},
+{"f_3086:lolevel_scm",(void*)f_3086},
+{"f_3089:lolevel_scm",(void*)f_3089},
+{"f_3070:lolevel_scm",(void*)f_3070},
+{"f_3073:lolevel_scm",(void*)f_3073},
+{"f_2945:lolevel_scm",(void*)f_2945},
+{"f_2949:lolevel_scm",(void*)f_2949},
+{"f_2954:lolevel_scm",(void*)f_2954},
+{"f_2967:lolevel_scm",(void*)f_2967},
+{"f_3024:lolevel_scm",(void*)f_3024},
+{"f_2973:lolevel_scm",(void*)f_2973},
+{"f_2976:lolevel_scm",(void*)f_2976},
+{"f_2986:lolevel_scm",(void*)f_2986},
+{"f_2988:lolevel_scm",(void*)f_2988},
+{"f_3010:lolevel_scm",(void*)f_3010},
+{"f_2979:lolevel_scm",(void*)f_2979},
+{"f_2853:lolevel_scm",(void*)f_2853},
+{"f_2862:lolevel_scm",(void*)f_2862},
+{"f_2907:lolevel_scm",(void*)f_2907},
+{"f_2917:lolevel_scm",(void*)f_2917},
+{"f3735:lolevel_scm",(void*)f3735},
+{"f_2891:lolevel_scm",(void*)f_2891},
+{"f_2898:lolevel_scm",(void*)f_2898},
+{"f_2935:lolevel_scm",(void*)f_2935},
+{"f_2689:lolevel_scm",(void*)f_2689},
+{"f_2693:lolevel_scm",(void*)f_2693},
+{"f_2696:lolevel_scm",(void*)f_2696},
+{"f_2842:lolevel_scm",(void*)f_2842},
+{"f_2699:lolevel_scm",(void*)f_2699},
+{"f_2702:lolevel_scm",(void*)f_2702},
+{"f_2710:lolevel_scm",(void*)f_2710},
+{"f_2720:lolevel_scm",(void*)f_2720},
+{"f_2835:lolevel_scm",(void*)f_2835},
+{"f_2729:lolevel_scm",(void*)f_2729},
+{"f_2823:lolevel_scm",(void*)f_2823},
+{"f_2827:lolevel_scm",(void*)f_2827},
+{"f_2819:lolevel_scm",(void*)f_2819},
+{"f_2732:lolevel_scm",(void*)f_2732},
+{"f_2735:lolevel_scm",(void*)f_2735},
+{"f_2792:lolevel_scm",(void*)f_2792},
+{"f_2738:lolevel_scm",(void*)f_2738},
+{"f_2741:lolevel_scm",(void*)f_2741},
+{"f_2751:lolevel_scm",(void*)f_2751},
+{"f_2753:lolevel_scm",(void*)f_2753},
+{"f_2774:lolevel_scm",(void*)f_2774},
+{"f_2744:lolevel_scm",(void*)f_2744},
+{"f_2705:lolevel_scm",(void*)f_2705},
+{"f_2571:lolevel_scm",(void*)f_2571},
+{"f_2578:lolevel_scm",(void*)f_2578},
+{"f_2581:lolevel_scm",(void*)f_2581},
+{"f_2586:lolevel_scm",(void*)f_2586},
+{"f_2596:lolevel_scm",(void*)f_2596},
+{"f_2605:lolevel_scm",(void*)f_2605},
+{"f_2609:lolevel_scm",(void*)f_2609},
+{"f_2612:lolevel_scm",(void*)f_2612},
+{"f_2615:lolevel_scm",(void*)f_2615},
+{"f_2625:lolevel_scm",(void*)f_2625},
+{"f_2627:lolevel_scm",(void*)f_2627},
+{"f_2648:lolevel_scm",(void*)f_2648},
+{"f_2618:lolevel_scm",(void*)f_2618},
+{"f_2682:lolevel_scm",(void*)f_2682},
+{"f_2568:lolevel_scm",(void*)f_2568},
+{"f_2530:lolevel_scm",(void*)f_2530},
+{"f_2534:lolevel_scm",(void*)f_2534},
+{"f_2540:lolevel_scm",(void*)f_2540},
+{"f_2545:lolevel_scm",(void*)f_2545},
+{"f_2502:lolevel_scm",(void*)f_2502},
+{"f_2506:lolevel_scm",(void*)f_2506},
+{"f_2509:lolevel_scm",(void*)f_2509},
+{"f_2489:lolevel_scm",(void*)f_2489},
+{"f_2493:lolevel_scm",(void*)f_2493},
+{"f_2480:lolevel_scm",(void*)f_2480},
+{"f_2484:lolevel_scm",(void*)f_2484},
+{"f_2431:lolevel_scm",(void*)f_2431},
+{"f_2435:lolevel_scm",(void*)f_2435},
+{"f_2446:lolevel_scm",(void*)f_2446},
+{"f_2422:lolevel_scm",(void*)f_2422},
+{"f_2400:lolevel_scm",(void*)f_2400},
+{"f_2391:lolevel_scm",(void*)f_2391},
+{"f_1204:lolevel_scm",(void*)f_1204},
+{"f_2395:lolevel_scm",(void*)f_2395},
+{"f_2371:lolevel_scm",(void*)f_2371},
+{"f_2375:lolevel_scm",(void*)f_2375},
+{"f_2332:lolevel_scm",(void*)f_2332},
+{"f_2346:lolevel_scm",(void*)f_2346},
+{"f_2363:lolevel_scm",(void*)f_2363},
+{"f_2296:lolevel_scm",(void*)f_2296},
+{"f_2313:lolevel_scm",(void*)f_2313},
+{"f_2330:lolevel_scm",(void*)f_2330},
+{"f_2261:lolevel_scm",(void*)f_2261},
+{"f_2265:lolevel_scm",(void*)f_2265},
+{"f_2286:lolevel_scm",(void*)f_2286},
+{"f_2270:lolevel_scm",(void*)f_2270},
+{"f_2211:lolevel_scm",(void*)f_2211},
+{"f_2197:lolevel_scm",(void*)f_2197},
+{"f_2183:lolevel_scm",(void*)f_2183},
+{"f_2169:lolevel_scm",(void*)f_2169},
+{"f_2155:lolevel_scm",(void*)f_2155},
+{"f_2141:lolevel_scm",(void*)f_2141},
+{"f_2127:lolevel_scm",(void*)f_2127},
+{"f_2113:lolevel_scm",(void*)f_2113},
+{"f_2107:lolevel_scm",(void*)f_2107},
+{"f_2104:lolevel_scm",(void*)f_2104},
+{"f_2097:lolevel_scm",(void*)f_2097},
+{"f_2068:lolevel_scm",(void*)f_2068},
+{"f_2076:lolevel_scm",(void*)f_2076},
+{"f_2039:lolevel_scm",(void*)f_2039},
+{"f_2047:lolevel_scm",(void*)f_2047},
+{"f_2016:lolevel_scm",(void*)f_2016},
+{"f_2028:lolevel_scm",(void*)f_2028},
+{"f_1972:lolevel_scm",(void*)f_1972},
+{"f_1976:lolevel_scm",(void*)f_1976},
+{"f_1952:lolevel_scm",(void*)f_1952},
+{"f_1956:lolevel_scm",(void*)f_1956},
+{"f_1967:lolevel_scm",(void*)f_1967},
+{"f_1959:lolevel_scm",(void*)f_1959},
+{"f_1915:lolevel_scm",(void*)f_1915},
+{"f_1936:lolevel_scm",(void*)f_1936},
+{"f_1947:lolevel_scm",(void*)f_1947},
+{"f_1895:lolevel_scm",(void*)f_1895},
+{"f_1886:lolevel_scm",(void*)f_1886},
+{"f_1890:lolevel_scm",(void*)f_1890},
+{"f_1893:lolevel_scm",(void*)f_1893},
+{"f_1880:lolevel_scm",(void*)f_1880},
+{"f_1884:lolevel_scm",(void*)f_1884},
+{"f_1869:lolevel_scm",(void*)f_1869},
+{"f_1856:lolevel_scm",(void*)f_1856},
+{"f_1860:lolevel_scm",(void*)f_1860},
+{"f_1867:lolevel_scm",(void*)f_1867},
+{"f_1846:lolevel_scm",(void*)f_1846},
+{"f_1850:lolevel_scm",(void*)f_1850},
+{"f_1837:lolevel_scm",(void*)f_1837},
+{"f_1841:lolevel_scm",(void*)f_1841},
+{"f_1826:lolevel_scm",(void*)f_1826},
+{"f_1815:lolevel_scm",(void*)f_1815},
+{"f_1805:lolevel_scm",(void*)f_1805},
+{"f_1798:lolevel_scm",(void*)f_1798},
+{"f_1717:lolevel_scm",(void*)f_1717},
+{"f_1723:lolevel_scm",(void*)f_1723},
+{"f_1753:lolevel_scm",(void*)f_1753},
+{"f_1768:lolevel_scm",(void*)f_1768},
+{"f_1789:lolevel_scm",(void*)f_1789},
+{"f_1756:lolevel_scm",(void*)f_1756},
+{"f_1363:lolevel_scm",(void*)f_1363},
+{"f_1654:lolevel_scm",(void*)f_1654},
+{"f_1649:lolevel_scm",(void*)f_1649},
+{"f_1644:lolevel_scm",(void*)f_1644},
+{"f_1365:lolevel_scm",(void*)f_1365},
+{"f_1423:lolevel_scm",(void*)f_1423},
+{"f_1426:lolevel_scm",(void*)f_1426},
+{"f_1431:lolevel_scm",(void*)f_1431},
+{"f_1503:lolevel_scm",(void*)f_1503},
+{"f_1571:lolevel_scm",(void*)f_1571},
+{"f_1596:lolevel_scm",(void*)f_1596},
+{"f_1613:lolevel_scm",(void*)f_1613},
+{"f_1623:lolevel_scm",(void*)f_1623},
+{"f_1603:lolevel_scm",(void*)f_1603},
+{"f_1522:lolevel_scm",(void*)f_1522},
+{"f_1538:lolevel_scm",(void*)f_1538},
+{"f_1552:lolevel_scm",(void*)f_1552},
+{"f_1548:lolevel_scm",(void*)f_1548},
+{"f_1529:lolevel_scm",(void*)f_1529},
+{"f_1396:lolevel_scm",(void*)f_1396},
+{"f_1403:lolevel_scm",(void*)f_1403},
+{"f_1380:lolevel_scm",(void*)f_1380},
+{"f_1374:lolevel_scm",(void*)f_1374},
+{"f_1368:lolevel_scm",(void*)f_1368},
+{"f_1219:lolevel_scm",(void*)f_1219},
+{"f_1231:lolevel_scm",(void*)f_1231},
+{"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
new file mode 100644
index 00000000..d9f16157
--- /dev/null
+++ b/bootstrap/optimizer.c
@@ -0,0 +1,17591 @@
+/* Generated from optimizer.scm by the CHICKEN compiler
+ http://www.call-with-current-continuation.org
+ 2009-12-04 21:30
+ Version 4.2.12
+ linux-unix-gnu-x86 [ manyargs dload ptables ]
+ compiled 2009-12-04 on x (Linux)
+ command line: optimizer.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 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[266];
+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_3703)
+static void C_ccall f_3703(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_3980)
+static void C_ccall f_3980(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_word t2,C_word t3,C_word t4,C_word t5,C_word t6) C_noret;
+C_noret_decl(f_14564)
+static void C_ccall f_14564(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14569)
+static void C_fcall f_14569(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14619)
+static void C_ccall f_14619(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14623)
+static void C_ccall f_14623(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14579)
+static void C_ccall f_14579(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14583)
+static void C_fcall f_14583(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_14605)
+static void C_ccall f_14605(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6170)
+static void C_ccall f_6170(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_word t5,C_word t6,C_word t7,C_word t8) C_noret;
+C_noret_decl(f_13511)
+static void C_ccall f_13511(C_word c,C_word t0,C_word t1) 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_word t3,C_word t4) C_noret;
+C_noret_decl(f_13623)
+static void C_fcall f_13623(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_13960)
+static void C_ccall f_13960(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_13729)
+static void C_ccall f_13729(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13758)
+static void C_fcall f_13758(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_13928)
+static void C_ccall f_13928(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13920)
+static void C_ccall f_13920(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13789)
+static void C_fcall f_13789(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13842)
+static void C_ccall f_13842(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_13840)
+static void C_ccall f_13840(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14014)
+static void C_ccall f_14014(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_14027)
+static void C_ccall f_14027(C_word c,C_word t0,C_word t1) 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_14053)
+static void C_ccall f_14053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14057)
+static void C_ccall f_14057(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14049)
+static void C_ccall f_14049(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14235)
+static void C_ccall f_14235(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_14248)
+static void C_ccall f_14248(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14254)
+static void C_ccall f_14254(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14306)
+static void C_ccall f_14306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14298)
+static void C_ccall f_14298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14282)
+static void C_ccall f_14282(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14286)
+static void C_ccall f_14286(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_14290)
+static void C_ccall f_14290(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6173)
+static void C_ccall f_6173(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13106)
+static void C_ccall f_13106(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_13128)
+static void C_ccall f_13128(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13208)
+static void C_ccall f_13208(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13166)
+static void C_ccall f_13166(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) 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_13204)
+static void C_ccall f_13204(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13192)
+static void C_ccall f_13192(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_13302)
+static void C_ccall f_13302(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_13322)
+static void C_ccall f_13322(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_noret;
+C_noret_decl(f_6665)
+static void C_ccall f_6665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10487)
+static void C_ccall f_10487(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12985)
+static void C_ccall f_12985(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12988)
+static void C_ccall f_12988(C_word c,C_word t0,C_word t1) 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_12994)
+static void C_ccall f_12994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12997)
+static void C_ccall f_12997(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13000)
+static void C_ccall f_13000(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13077)
+static void C_ccall f_13077(C_word c,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_13006)
+static void C_ccall f_13006(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13009)
+static void C_ccall f_13009(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13071)
+static void C_ccall f_13071(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13012)
+static void C_ccall f_13012(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13015)
+static void C_ccall f_13015(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13068)
+static void C_ccall f_13068(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11264)
+static void C_fcall f_11264(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11282)
+static void C_ccall f_11282(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11288)
+static void C_ccall f_11288(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11268)
+static void C_ccall f_11268(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13018)
+static void C_ccall f_13018(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13060)
+static void C_ccall f_13060(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13058)
+static void C_ccall f_13058(C_word c,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_13024)
+static void C_ccall f_13024(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13027)
+static void C_ccall f_13027(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13051)
+static void C_ccall f_13051(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13030)
+static void C_ccall f_13030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13033)
+static void C_ccall f_13033(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_13039)
+static void C_ccall f_13039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13042)
+static void C_ccall f_13042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_13045)
+static void C_ccall f_13045(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12744)
+static void C_fcall f_12744(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12750)
+static void C_fcall f_12750(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12961)
+static void C_fcall f_12961(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12971)
+static void C_ccall f_12971(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12935)
+static void C_fcall f_12935(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12945)
+static void C_ccall f_12945(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12905)
+static void C_ccall f_12905(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_12917)
+static void C_ccall f_12917(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12875)
+static void C_fcall f_12875(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12885)
+static void C_ccall f_12885(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12784)
+static void C_ccall f_12784(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12789)
+static void C_fcall f_12789(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12827)
+static void C_ccall f_12827(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12812)
+static void C_ccall f_12812(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12823)
+static void C_ccall f_12823(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12819)
+static void C_ccall f_12819(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12546)
+static void C_fcall f_12546(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12552)
+static void C_fcall f_12552(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12721)
+static void C_fcall f_12721(C_word t0,C_word t1,C_word t2) 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_12661)
+static void C_fcall f_12661(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12690)
+static void C_ccall f_12690(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12651)
+static void C_ccall f_12651(C_word c,C_word t0,C_word t1) 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_12589)
+static void C_ccall f_12589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12603)
+static void C_fcall f_12603(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12613)
+static void C_ccall f_12613(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12018)
+static void C_fcall f_12018(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12032)
+static void C_ccall f_12032(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_12039)
+static void C_ccall f_12039(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12042)
+static void C_ccall f_12042(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12051)
+static void C_ccall f_12051(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_12203)
+static void C_fcall f_12203(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12232)
+static void C_ccall f_12232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12058)
+static void C_ccall f_12058(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_word t3) 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_12167)
+static void C_fcall f_12167(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12061)
+static void C_ccall f_12061(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12282)
+static void C_fcall f_12282(C_word t0,C_word t1,C_word t2) 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_12533)
+static void C_ccall f_12533(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12464)
+static void C_ccall f_12464(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_12483)
+static void C_ccall f_12483(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12479)
+static void C_ccall f_12479(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12411)
+static void C_ccall f_12411(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12416)
+static void C_fcall f_12416(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12426)
+static void C_ccall f_12426(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12348)
+static void C_fcall f_12348(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12346)
+static void C_ccall f_12346(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12316)
+static void C_ccall f_12316(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12321)
+static void C_fcall f_12321(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_12331)
+static void C_ccall f_12331(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12267)
+static C_word C_fcall f_12267(C_word t0,C_word t1);
+C_noret_decl(f_12064)
+static void C_ccall f_12064(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12139)
+static void C_ccall f_12139(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_12123)
+static void C_ccall f_12123(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_12030)
+static void C_ccall f_12030(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11609)
+static void C_fcall f_11609(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11970)
+static void C_fcall f_11970(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11735)
+static void C_ccall f_11735(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_word t2) C_noret;
+C_noret_decl(f_11957)
+static void C_ccall f_11957(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_noret;
+C_noret_decl(f_11873)
+static void C_fcall f_11873(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11941)
+static void C_ccall f_11941(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11900)
+static void C_fcall f_11900(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11938)
+static void C_ccall f_11938(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_11711)
+static void C_fcall f_11711(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11721)
+static void C_ccall f_11721(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_11699)
+static void C_ccall f_11699(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11653)
+static void C_ccall f_11653(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11658)
+static void C_fcall f_11658(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11668)
+static void C_ccall f_11668(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_11930)
+static void C_ccall f_11930(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11916)
+static void C_ccall f_11916(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_noret;
+C_noret_decl(f_11737)
+static void C_fcall f_11737(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11861)
+static void C_ccall f_11861(C_word c,C_word t0,C_word t1,C_word t2) 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_11825)
+static void C_fcall f_11825(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11844)
+static void C_ccall f_11844(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11833)
+static void C_fcall f_11833(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11757)
+static void C_ccall f_11757(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11781)
+static void C_fcall f_11781(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11808)
+static C_word C_fcall f_11808(C_word t0,C_word t1);
+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_11775)
+static void C_ccall f_11775(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11767)
+static void C_ccall f_11767(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11298)
+static void C_fcall f_11298(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11304)
+static void C_fcall f_11304(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11338)
+static void C_fcall f_11338(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11560)
+static void C_fcall f_11560(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11575)
+static void C_ccall f_11575(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11568)
+static void C_fcall f_11568(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11457)
+static void C_ccall f_11457(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11473)
+static void C_fcall f_11473(C_word t0,C_word t1,C_word t2) 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_11530)
+static void C_ccall f_11530(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11493)
+static void C_ccall f_11493(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11502)
+static void C_fcall f_11502(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11512)
+static void C_ccall f_11512(C_word c,C_word t0,C_word t1) 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_11429)
+static void C_fcall f_11429(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11444)
+static void C_ccall f_11444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11437)
+static void C_fcall f_11437(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11400)
+static void C_ccall f_11400(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_11412)
+static void C_ccall f_11412(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11349)
+static void C_fcall f_11349(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11370)
+static void C_ccall f_11370(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11367)
+static void C_ccall f_11367(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11302)
+static void C_ccall f_11302(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11017)
+static void C_fcall f_11017(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11023)
+static void C_fcall f_11023(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11057)
+static void C_fcall f_11057(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11159)
+static void C_fcall f_11159(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_11174)
+static void C_ccall f_11174(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11167)
+static void C_fcall f_11167(C_word t0,C_word t1,C_word t2) 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_11116)
+static void C_fcall f_11116(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11125)
+static void C_ccall f_11125(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_11137)
+static void C_ccall f_11137(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11068)
+static void C_fcall f_11068(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_11089)
+static void C_ccall f_11089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11086)
+static void C_ccall f_11086(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11021)
+static void C_ccall f_11021(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10884)
+static void C_fcall f_10884(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10890)
+static void C_ccall f_10890(C_word c,C_word t0,C_word t1,C_word t2) 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_10939)
+static void C_fcall f_10939(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10946)
+static void C_ccall f_10946(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11007)
+static void C_ccall f_11007(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_11003)
+static void C_ccall f_11003(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10961)
+static void C_fcall f_10961(C_word t0,C_word t1,C_word t2) 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_10988)
+static void C_fcall f_10988(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10959)
+static void C_ccall f_10959(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10924)
+static void C_ccall f_10924(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10902)
+static void C_ccall f_10902(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10909)
+static void C_ccall f_10909(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10596)
+static void C_fcall f_10596(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10809)
+static void C_fcall f_10809(C_word t0,C_word t1,C_word t2) 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_10817)
+static void C_fcall f_10817(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10842)
+static void C_ccall f_10842(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10832)
+static void C_ccall f_10832(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10836)
+static void C_ccall f_10836(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10807)
+static void C_ccall f_10807(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10599)
+static void C_fcall f_10599(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10775)
+static void C_fcall f_10775(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10790)
+static void C_ccall f_10790(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10783)
+static void C_fcall f_10783(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10758)
+static void C_ccall f_10758(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_10770)
+static void C_ccall f_10770(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10704)
+static void C_fcall f_10704(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10728)
+static void C_ccall f_10728(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_10686)
+static void C_ccall f_10686(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10639)
+static void C_fcall f_10639(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10642)
+static void C_fcall f_10642(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10647)
+static void C_fcall f_10647(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10662)
+static void C_ccall f_10662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10655)
+static void C_fcall f_10655(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10490)
+static void C_fcall f_10490(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10496)
+static void C_ccall f_10496(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10527)
+static void C_fcall f_10527(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_10535)
+static void C_ccall f_10535(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10494)
+static void C_ccall f_10494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9102)
+static void C_ccall f_9102(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_10482)
+static void C_ccall f_10482(C_word c,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_9758)
+static void C_fcall f_9758(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_10472)
+static void C_ccall f_10472(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_9762)
+static void C_ccall f_9762(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9777)
+static void C_ccall f_9777(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9786)
+static void C_fcall f_9786(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9792)
+static void C_ccall f_9792(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_9801)
+static void C_ccall f_9801(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10084)
+static void C_fcall f_10084(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10399)
+static void C_fcall f_10399(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_10373)
+static void C_fcall f_10373(C_word t0,C_word t1,C_word t2) 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_10358)
+static void C_ccall f_10358(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10361)
+static void C_ccall f_10361(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10306)
+static void C_ccall f_10306(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10309)
+static void C_ccall f_10309(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10153)
+static void C_ccall f_10153(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10200)
+static void C_fcall f_10200(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10210)
+static void C_ccall f_10210(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_10247)
+static void C_ccall f_10247(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_10219)
+static void C_ccall f_10219(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10162)
+static void C_ccall f_10162(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10165)
+static void C_ccall f_10165(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_9804)
+static void C_ccall f_9804(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_10066)
+static void C_ccall f_10066(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9975)
+static void C_ccall f_9975(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9977)
+static void C_fcall f_9977(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10053)
+static void C_ccall f_10053(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9985)
+static void C_fcall f_9985(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_10000)
+static void C_ccall f_10000(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_9824)
+static void C_ccall f_9824(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9895)
+static void C_ccall f_9895(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9827)
+static void C_ccall f_9827(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9830)
+static void C_ccall f_9830(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9835)
+static void C_fcall f_9835(C_word t0,C_word t1,C_word t2) 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_9850)
+static void C_ccall f_9850(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9304)
+static void C_fcall f_9304(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_9749)
+static void C_ccall f_9749(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9756)
+static void C_ccall f_9756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9307)
+static void C_fcall f_9307(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_9736)
+static void C_ccall f_9736(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9712)
+static void C_ccall f_9712(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9723)
+static void C_ccall f_9723(C_word c,C_word t0,C_word t1) 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_noret;
+C_noret_decl(f_9570)
+static void C_fcall f_9570(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_noret;
+C_noret_decl(f_9517)
+static void C_ccall f_9517(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9523)
+static void C_fcall f_9523(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_word t2) 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_9482)
+static void C_fcall f_9482(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9487)
+static void C_ccall f_9487(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9460)
+static void C_ccall f_9460(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9456)
+static void C_ccall f_9456(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9426)
+static void C_ccall f_9426(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9389)
+static void C_ccall f_9389(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9405)
+static void C_ccall f_9405(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_9105)
+static void C_fcall f_9105(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_9276)
+static void C_fcall f_9276(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_9291)
+static void C_ccall f_9291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9284)
+static void C_fcall f_9284(C_word t0,C_word t1,C_word t2) 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_9230)
+static void C_ccall f_9230(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9176)
+static void C_ccall f_9176(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_9188)
+static void C_ccall f_9188(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_6687)
+static void C_ccall f_6687(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_8969)
+static void C_ccall f_8969(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_9010)
+static void C_ccall f_9010(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9024)
+static void C_fcall f_9024(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_9073)
+static void C_ccall f_9073(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6712)
+static void C_fcall f_6712(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_9044)
+static void C_ccall f_9044(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_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_9004)
+static void C_ccall f_9004(C_word c,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_8994)
+static void C_ccall f_8994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8889)
+static void C_ccall f_8889(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_8694)
+static void C_ccall f_8694(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8700)
+static void C_ccall f_8700(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8816)
+static void C_ccall f_8816(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_8709)
+static void C_ccall f_8709(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_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_8731)
+static void C_ccall f_8731(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_8650)
+static void C_ccall f_8650(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8662)
+static void C_ccall f_8662(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8640)
+static void C_ccall f_8640(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_8427)
+static void C_ccall f_8427(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_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_noret;
+C_noret_decl(f_8507)
+static void C_ccall f_8507(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_8505)
+static void C_ccall f_8505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8458)
+static void C_ccall f_8458(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8387)
+static void C_ccall f_8387(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8403)
+static void C_ccall f_8403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8308)
+static void C_ccall f_8308(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8337)
+static void C_fcall f_8337(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8218)
+static void C_ccall f_8218(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_8252)
+static void C_fcall f_8252(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_8139)
+static void C_ccall f_8139(C_word c,C_word t0,C_word t1) 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_8019)
+static void C_ccall f_8019(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7942)
+static void C_ccall f_7942(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7966)
+static void C_fcall f_7966(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7970)
+static void C_ccall f_7970(C_word c,C_word t0,C_word t1) 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_7910)
+static void C_ccall f_7910(C_word c,C_word t0,C_word t1) 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_7783)
+static void C_ccall f_7783(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7795)
+static void C_fcall f_7795(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7815)
+static void C_ccall f_7815(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7811)
+static void C_ccall f_7811(C_word c,C_word t0,C_word t1) 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_7713)
+static void C_ccall f_7713(C_word c,C_word t0,C_word t1) 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_7725)
+static void C_ccall f_7725(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7441)
+static void C_ccall f_7441(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_noret;
+C_noret_decl(f_7472)
+static void C_fcall f_7472(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7585)
+static void C_fcall f_7585(C_word t0,C_word t1,C_word t2) 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_7475)
+static void C_ccall f_7475(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_word t2) 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_7478)
+static void C_ccall f_7478(C_word c,C_word t0,C_word t1) 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_noret;
+C_noret_decl(f_7520)
+static void C_ccall f_7520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7483)
+static void C_ccall f_7483(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_7415)
+static void C_ccall f_7415(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_7379)
+static void C_ccall f_7379(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_7253)
+static void C_ccall f_7253(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7148)
+static void C_ccall f_7148(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7203)
+static void C_ccall f_7203(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7080)
+static void C_ccall f_7080(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7100)
+static void C_ccall f_7100(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7108)
+static void C_ccall f_7108(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7031)
+static void C_ccall f_7031(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_7047)
+static void C_ccall f_7047(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6900)
+static void C_ccall f_6900(C_word c,C_word t0,C_word t1) 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_6934)
+static void C_fcall f_6934(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6749)
+static void C_ccall f_6749(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_6752)
+static void C_fcall f_6752(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6667)
+static void C_ccall f_6667(C_word c,C_word t0,C_word t1,C_word t2,...) C_noret;
+C_noret_decl(f_6667)
+static void C_ccall f_6667r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_6671)
+static void C_ccall f_6671(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6681)
+static void C_ccall f_6681(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6178)
+static void C_ccall f_6178(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_6614)
+static void C_fcall f_6614(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6647)
+static void C_ccall f_6647(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6627)
+static void C_fcall f_6627(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6182)
+static void C_ccall f_6182(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6567)
+static void C_fcall f_6567(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6587)
+static void C_ccall f_6587(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6575)
+static void C_fcall f_6575(C_word t0,C_word t1,C_word t2,C_word t3) 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_6580)
+static void C_ccall f_6580(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6229)
+static void C_ccall f_6229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6487)
+static void C_fcall f_6487(C_word t0,C_word t1,C_word t2) 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_6495)
+static void C_fcall f_6495(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6527)
+static void C_ccall f_6527(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6540)
+static void C_ccall f_6540(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6505)
+static void C_ccall f_6505(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6521)
+static void C_ccall f_6521(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6509)
+static void C_ccall f_6509(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6513)
+static void C_ccall f_6513(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6232)
+static void C_ccall f_6232(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6406)
+static void C_fcall f_6406(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6474)
+static void C_ccall f_6474(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6414)
+static void C_fcall f_6414(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6457)
+static void C_ccall f_6457(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6463)
+static void C_ccall f_6463(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_6421)
+static void C_ccall f_6421(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_word t2) C_noret;
+C_noret_decl(f_6444)
+static void C_ccall f_6444(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6429)
+static void C_ccall f_6429(C_word c,C_word t0,C_word t1) 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_6235)
+static void C_ccall f_6235(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6238)
+static void C_ccall f_6238(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6258)
+static void C_ccall f_6258(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6271)
+static void C_fcall f_6271(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_6332)
+static void C_ccall f_6332(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6378)
+static void C_ccall f_6378(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_6300)
+static void C_ccall f_6300(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6241)
+static void C_ccall f_6241(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_6184)
+static void C_fcall f_6184(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6190)
+static void C_fcall f_6190(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_6214)
+static void C_ccall f_6214(C_word c,C_word t0,C_word t1,C_word t2) 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_noret;
+C_noret_decl(f_6163)
+static void C_ccall f_6163r(C_word t0,C_word t1,C_word t2,C_word t4) C_noret;
+C_noret_decl(f_5844)
+static void C_ccall f_5844(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5858)
+static void C_ccall f_5858(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5878)
+static void C_ccall f_5878(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_5890)
+static void C_fcall f_5890(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_5898)
+static void C_fcall f_5898(C_word t0,C_word t1,C_word t2) 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_5916)
+static void C_ccall f_5916(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_5925)
+static void C_fcall f_5925(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5945)
+static void C_fcall f_5945(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5951)
+static void C_ccall f_5951(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5957)
+static void C_fcall f_5957(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5966)
+static void C_fcall f_5966(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5973)
+static void C_ccall f_5973(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5976)
+static void C_ccall f_5976(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5994)
+static void C_ccall f_5994(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5979)
+static void C_ccall f_5979(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5861)
+static void C_ccall f_5861(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5864)
+static void C_ccall f_5864(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_noret;
+C_noret_decl(f_5847)
+static C_word C_fcall f_5847(C_word t0);
+C_noret_decl(f_3983)
+static void C_ccall f_3983(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5726)
+static void C_ccall f_5726(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5732)
+static void C_ccall f_5732(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5736)
+static void C_ccall f_5736(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5739)
+static void C_ccall f_5739(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5775)
+static void C_ccall f_5775(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5780)
+static void C_fcall f_5780(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5792)
+static void C_ccall f_5792(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5819)
+static void C_ccall f_5819(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_5745)
+static void C_ccall f_5745(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5748)
+static void C_ccall f_5748(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5751)
+static void C_ccall f_5751(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5696)
+static void C_fcall f_5696(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_5716)
+static void C_ccall f_5716(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5700)
+static void C_ccall f_5700(C_word c,C_word t0,C_word t1) 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_4438)
+static void C_fcall f_4438(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5586)
+static void C_ccall f_5586(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5589)
+static void C_ccall f_5589(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5688)
+static void C_ccall f_5688(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_5646)
+static void C_fcall f_5646(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5677)
+static void C_ccall f_5677(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5673)
+static void C_ccall f_5673(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5665)
+static void C_ccall f_5665(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5606)
+static void C_fcall f_5606(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_5612)
+static void C_ccall f_5612(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5560)
+static void C_ccall f_5560(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5558)
+static void C_ccall f_5558(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5518)
+static void C_ccall f_5518(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5508)
+static void C_ccall f_5508(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_4829)
+static void C_ccall f_4829(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5060)
+static void C_fcall f_5060(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_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_5450)
+static void C_ccall f_5450(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5487)
+static void C_ccall f_5487(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_5086)
+static void C_fcall f_5086(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5158)
+static void C_ccall f_5158(C_word c,C_word t0,C_word t1) 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_5336)
+static void C_fcall f_5336(C_word t0,C_word t1) 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_5351)
+static void C_ccall f_5351(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5362)
+static void C_ccall f_5362(C_word c,C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_5401)
+static void C_ccall f_5401(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5393)
+static void C_ccall f_5393(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5381)
+static void C_ccall f_5381(C_word c,C_word t0,C_word t1,C_word t2) 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_5356)
+static void C_ccall f_5356(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5172)
+static void C_fcall f_5172(C_word t0,C_word t1,C_word t2,C_word t3,C_word t4,C_word t5) C_noret;
+C_noret_decl(f_5217)
+static void C_ccall f_5217(C_word c,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_5229)
+static void C_ccall f_5229(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5273)
+static void C_ccall f_5273(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5249)
+static void C_ccall f_5249(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_5211)
+static void C_ccall f_5211(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5199)
+static void C_ccall f_5199(C_word c,C_word t0,C_word t1,C_word t2) 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_5152)
+static void C_ccall f_5152(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5089)
+static void C_ccall f_5089(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5123)
+static void C_ccall f_5123(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_5092)
+static void C_ccall f_5092(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(f_5108)
+static void C_ccall f_5108(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_4911)
+static void C_ccall f_4911(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4932)
+static void C_ccall f_4932(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_5000)
+static void C_ccall f_5000(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_4935)
+static void C_fcall f_4935(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_word t2) C_noret;
+C_noret_decl(f_4969)
+static void C_ccall f_4969(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_4890)
+static void C_fcall f_4890(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4843)
+static void C_ccall f_4843(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4846)
+static void C_ccall f_4846(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4874)
+static void C_ccall f_4874(C_word c,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_4859)
+static void C_ccall f_4859(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4625)
+static void C_ccall f_4625(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4724)
+static void C_ccall f_4724(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4729)
+static void C_ccall f_4729(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) C_noret;
+C_noret_decl(f_4736)
+static void C_ccall f_4736(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4776)
+static void C_ccall f_4776(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4756)
+static void C_ccall f_4756(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4630)
+static void C_ccall f_4630(C_word c,C_word t0,C_word t1,C_word t2,C_word t3,C_word t4) 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_word t3) C_noret;
+C_noret_decl(f_4655)
+static void C_ccall f_4655(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4702)
+static void C_ccall f_4702(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_4695)
+static void C_ccall f_4695(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4675)
+static void C_ccall f_4675(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_4642)
+static void C_ccall f_4642(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4559)
+static void C_ccall f_4559(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4600)
+static void C_ccall f_4600(C_word c,C_word t0,C_word t1) 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_4562)
+static void C_fcall f_4562(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4590)
+static void C_ccall f_4590(C_word c,C_word t0,C_word t1,C_word t2) 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_4478)
+static void C_fcall f_4478(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4482)
+static void C_ccall f_4482(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4494)
+static void C_ccall f_4494(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4500)
+static void C_ccall f_4500(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4520)
+static void C_ccall f_4520(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4157)
+static void C_fcall f_4157(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_4171)
+static void C_ccall f_4171(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4397)
+static void C_ccall f_4397(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4403)
+static void C_ccall f_4403(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4251)
+static void C_ccall f_4251(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4343)
+static void C_fcall f_4343(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4337)
+static void C_ccall f_4337(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_word t2) 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_4323)
+static void C_ccall f_4323(C_word c,C_word t0,C_word t1,...) C_noret;
+C_noret_decl(f_4323)
+static void C_ccall f_4323r(C_word t0,C_word t1,C_word t3) C_noret;
+C_noret_decl(f_4329)
+static void C_ccall f_4329(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4291)
+static void C_ccall f_4291(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4295)
+static void C_ccall f_4295(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4298)
+static void C_ccall f_4298(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4321)
+static void C_ccall f_4321(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_word t2) 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_4278)
+static void C_fcall f_4278(C_word t0,C_word t1) 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_4257)
+static void C_ccall f_4257(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_4026)
+static void C_fcall f_4026(C_word t0,C_word t1,C_word t2) 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_4041)
+static void C_ccall f_4041(C_word c,C_word t0,C_word t1,C_word t2) 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_4100)
+static void C_fcall f_4100(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_4127)
+static C_word C_fcall f_4127(C_word t0,C_word t1);
+C_noret_decl(f_4098)
+static void C_ccall f_4098(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4057)
+static void C_ccall f_4057(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4063)
+static void C_ccall f_4063(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_4090)
+static void C_ccall f_4090(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_4022)
+static C_word C_fcall f_4022(C_word t0);
+C_noret_decl(f_3992)
+static void C_ccall f_3992(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3986)
+static void C_fcall f_3986(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3708)
+static void C_ccall f_3708(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3729)
+static void C_ccall f_3729(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_noret;
+C_noret_decl(f_3810)
+static void C_fcall f_3810(C_word t0,C_word t1,C_word t2,C_word t3) C_noret;
+C_noret_decl(f_3877)
+static void C_fcall f_3877(C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3896)
+static void C_ccall f_3896(C_word c,C_word t0,C_word t1) 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_3880)
+static void C_ccall f_3880(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3850)
+static void C_fcall f_3850(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_word t2,C_word t3) C_noret;
+C_noret_decl(f_3782)
+static void C_fcall f_3782(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3797)
+static void C_ccall f_3797(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3790)
+static void C_fcall f_3790(C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3732)
+static void C_ccall f_3732(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_3740)
+static void C_ccall f_3740(C_word c,C_word t0,C_word t1,C_word t2) C_noret;
+C_noret_decl(f_3746)
+static void C_ccall f_3746(C_word c,C_word t0,C_word t1) C_noret;
+C_noret_decl(f_3711)
+static C_word C_fcall f_3711(C_word *a,C_word t0,C_word t1);
+
+C_noret_decl(trf_14569)
+static void C_fcall trf_14569(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14569(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14569(t0,t1,t2);}
+
+C_noret_decl(trf_14583)
+static void C_fcall trf_14583(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_14583(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_14583(t0,t1,t2);}
+
+C_noret_decl(trf_13623)
+static void C_fcall trf_13623(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13623(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_13623(t0,t1,t2,t3);}
+
+C_noret_decl(trf_13758)
+static void C_fcall trf_13758(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13758(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_13758(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_13789)
+static void C_fcall trf_13789(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_13789(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_13789(t0,t1);}
+
+C_noret_decl(trf_11264)
+static void C_fcall trf_11264(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11264(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_11264(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12744)
+static void C_fcall trf_12744(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12744(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12744(t0,t1,t2);}
+
+C_noret_decl(trf_12750)
+static void C_fcall trf_12750(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12750(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12750(t0,t1,t2);}
+
+C_noret_decl(trf_12961)
+static void C_fcall trf_12961(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12961(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12961(t0,t1,t2);}
+
+C_noret_decl(trf_12935)
+static void C_fcall trf_12935(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12935(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12935(t0,t1,t2);}
+
+C_noret_decl(trf_12875)
+static void C_fcall trf_12875(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12875(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12875(t0,t1,t2);}
+
+C_noret_decl(trf_12789)
+static void C_fcall trf_12789(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12789(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_12789(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12546)
+static void C_fcall trf_12546(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12546(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12546(t0,t1,t2);}
+
+C_noret_decl(trf_12552)
+static void C_fcall trf_12552(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12552(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12552(t0,t1,t2);}
+
+C_noret_decl(trf_12721)
+static void C_fcall trf_12721(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12721(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12721(t0,t1,t2);}
+
+C_noret_decl(trf_12661)
+static void C_fcall trf_12661(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12661(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12661(t0,t1,t2);}
+
+C_noret_decl(trf_12603)
+static void C_fcall trf_12603(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12603(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12603(t0,t1,t2);}
+
+C_noret_decl(trf_12018)
+static void C_fcall trf_12018(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12018(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_12018(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12203)
+static void C_fcall trf_12203(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12203(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12203(t0,t1,t2);}
+
+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 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_12154(t0,t1,t2,t3);}
+
+C_noret_decl(trf_12167)
+static void C_fcall trf_12167(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12167(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_12167(t0,t1);}
+
+C_noret_decl(trf_12282)
+static void C_fcall trf_12282(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12282(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12282(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_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_12416)
+static void C_fcall trf_12416(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12416(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12416(t0,t1,t2);}
+
+C_noret_decl(trf_12348)
+static void C_fcall trf_12348(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12348(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12348(t0,t1,t2);}
+
+C_noret_decl(trf_12321)
+static void C_fcall trf_12321(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_12321(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_12321(t0,t1,t2);}
+
+C_noret_decl(trf_11609)
+static void C_fcall trf_11609(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11609(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11609(t0,t1,t2);}
+
+C_noret_decl(trf_11970)
+static void C_fcall trf_11970(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11970(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11970(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11947(t0,t1,t2);}
+
+C_noret_decl(trf_11873)
+static void C_fcall trf_11873(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11873(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11873(t0,t1,t2);}
+
+C_noret_decl(trf_11900)
+static void C_fcall trf_11900(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11900(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11900(t0,t1,t2);}
+
+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_11711)
+static void C_fcall trf_11711(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11711(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11711(t0,t1,t2);}
+
+C_noret_decl(trf_11658)
+static void C_fcall trf_11658(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11658(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11658(t0,t1,t2);}
+
+C_noret_decl(trf_11737)
+static void C_fcall trf_11737(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11737(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11737(t0,t1,t2);}
+
+C_noret_decl(trf_11825)
+static void C_fcall trf_11825(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11825(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11825(t0,t1,t2);}
+
+C_noret_decl(trf_11833)
+static void C_fcall trf_11833(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11833(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11833(t0,t1,t2);}
+
+C_noret_decl(trf_11781)
+static void C_fcall trf_11781(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11781(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11781(t0,t1,t2);}
+
+C_noret_decl(trf_11298)
+static void C_fcall trf_11298(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11298(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11298(t0,t1,t2);}
+
+C_noret_decl(trf_11304)
+static void C_fcall trf_11304(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11304(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_11304(t0,t1,t2,t3);}
+
+C_noret_decl(trf_11338)
+static void C_fcall trf_11338(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11338(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11338(t0,t1);}
+
+C_noret_decl(trf_11560)
+static void C_fcall trf_11560(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11560(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11560(t0,t1,t2);}
+
+C_noret_decl(trf_11568)
+static void C_fcall trf_11568(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11568(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11568(t0,t1,t2);}
+
+C_noret_decl(trf_11473)
+static void C_fcall trf_11473(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11473(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11473(t0,t1,t2);}
+
+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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11502(t0,t1,t2);}
+
+C_noret_decl(trf_11429)
+static void C_fcall trf_11429(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11429(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11429(t0,t1,t2);}
+
+C_noret_decl(trf_11437)
+static void C_fcall trf_11437(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11437(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11437(t0,t1,t2);}
+
+C_noret_decl(trf_11349)
+static void C_fcall trf_11349(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11349(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_11349(t0,t1,t2,t3);}
+
+C_noret_decl(trf_11017)
+static void C_fcall trf_11017(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11017(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11017(t0,t1,t2);}
+
+C_noret_decl(trf_11023)
+static void C_fcall trf_11023(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11023(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_11023(t0,t1,t2,t3);}
+
+C_noret_decl(trf_11057)
+static void C_fcall trf_11057(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11057(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11057(t0,t1);}
+
+C_noret_decl(trf_11159)
+static void C_fcall trf_11159(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11159(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11159(t0,t1,t2);}
+
+C_noret_decl(trf_11167)
+static void C_fcall trf_11167(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11167(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_11167(t0,t1,t2);}
+
+C_noret_decl(trf_11116)
+static void C_fcall trf_11116(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11116(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_11116(t0,t1);}
+
+C_noret_decl(trf_11068)
+static void C_fcall trf_11068(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_11068(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_11068(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10884)
+static void C_fcall trf_10884(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10884(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_10884(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 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_10939(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10961)
+static void C_fcall trf_10961(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10961(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10961(t0,t1,t2);}
+
+C_noret_decl(trf_10988)
+static void C_fcall trf_10988(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10988(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10988(t0,t1,t2);}
+
+C_noret_decl(trf_10596)
+static void C_fcall trf_10596(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10596(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10596(t0,t1,t2);}
+
+C_noret_decl(trf_10809)
+static void C_fcall trf_10809(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10809(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10809(t0,t1,t2);}
+
+C_noret_decl(trf_10817)
+static void C_fcall trf_10817(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10817(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10817(t0,t1,t2);}
+
+C_noret_decl(trf_10599)
+static void C_fcall trf_10599(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10599(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_10599(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10775)
+static void C_fcall trf_10775(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10775(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10775(t0,t1,t2);}
+
+C_noret_decl(trf_10783)
+static void C_fcall trf_10783(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10783(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10783(t0,t1,t2);}
+
+C_noret_decl(trf_10704)
+static void C_fcall trf_10704(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10704(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_10704(t0,t1,t2,t3);}
+
+C_noret_decl(trf_10639)
+static void C_fcall trf_10639(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10639(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10639(t0,t1);}
+
+C_noret_decl(trf_10642)
+static void C_fcall trf_10642(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10642(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10642(t0,t1);}
+
+C_noret_decl(trf_10647)
+static void C_fcall trf_10647(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10647(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10647(t0,t1,t2);}
+
+C_noret_decl(trf_10655)
+static void C_fcall trf_10655(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10655(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10655(t0,t1,t2);}
+
+C_noret_decl(trf_10490)
+static void C_fcall trf_10490(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10490(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10490(t0,t1);}
+
+C_noret_decl(trf_10527)
+static void C_fcall trf_10527(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10527(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_10527(t0,t1);}
+
+C_noret_decl(trf_9758)
+static void C_fcall trf_9758(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9758(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_9758(t0,t1,t2,t3,t4,t5,t6,t7);}
+
+C_noret_decl(trf_9786)
+static void C_fcall trf_9786(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9786(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9786(t0,t1);}
+
+C_noret_decl(trf_10084)
+static void C_fcall trf_10084(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10084(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10084(t0,t1,t2);}
+
+C_noret_decl(trf_10399)
+static void C_fcall trf_10399(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10399(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10399(t0,t1,t2);}
+
+C_noret_decl(trf_10373)
+static void C_fcall trf_10373(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10373(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10373(t0,t1,t2);}
+
+C_noret_decl(trf_10200)
+static void C_fcall trf_10200(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_10200(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_10200(t0,t1,t2);}
+
+C_noret_decl(trf_9977)
+static void C_fcall trf_9977(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9977(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9977(t0,t1,t2);}
+
+C_noret_decl(trf_9985)
+static void C_fcall trf_9985(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9985(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9985(t0,t1,t2);}
+
+C_noret_decl(trf_9835)
+static void C_fcall trf_9835(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9835(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9835(t0,t1,t2);}
+
+C_noret_decl(trf_9304)
+static void C_fcall trf_9304(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9304(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_9304(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_9307)
+static void C_fcall trf_9307(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9307(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_9307(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_9570)
+static void C_fcall trf_9570(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9570(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9570(t0,t1);}
+
+C_noret_decl(trf_9523)
+static void C_fcall trf_9523(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9523(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9523(t0,t1);}
+
+C_noret_decl(trf_9482)
+static void C_fcall trf_9482(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9482(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_9482(t0,t1);}
+
+C_noret_decl(trf_9105)
+static void C_fcall trf_9105(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9105(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_9105(t0,t1,t2,t3,t4);}
+
+C_noret_decl(trf_9276)
+static void C_fcall trf_9276(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9276(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9276(t0,t1,t2);}
+
+C_noret_decl(trf_9284)
+static void C_fcall trf_9284(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9284(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_9284(t0,t1,t2);}
+
+C_noret_decl(trf_9024)
+static void C_fcall trf_9024(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_9024(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_9024(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6712)
+static void C_fcall trf_6712(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6712(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6712(t0,t1);}
+
+C_noret_decl(trf_8337)
+static void C_fcall trf_8337(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8337(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8337(t0,t1);}
+
+C_noret_decl(trf_8252)
+static void C_fcall trf_8252(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_8252(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_8252(t0,t1);}
+
+C_noret_decl(trf_7966)
+static void C_fcall trf_7966(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7966(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7966(t0,t1);}
+
+C_noret_decl(trf_7795)
+static void C_fcall trf_7795(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7795(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7795(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 t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7469(t0,t1);}
+
+C_noret_decl(trf_7472)
+static void C_fcall trf_7472(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7472(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_7472(t0,t1);}
+
+C_noret_decl(trf_7585)
+static void C_fcall trf_7585(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_7585(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7585(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 t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_7550(t0,t1,t2);}
+
+C_noret_decl(trf_6934)
+static void C_fcall trf_6934(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6934(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6934(t0,t1);}
+
+C_noret_decl(trf_6752)
+static void C_fcall trf_6752(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6752(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6752(t0,t1);}
+
+C_noret_decl(trf_6614)
+static void C_fcall trf_6614(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6614(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_6614(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6627)
+static void C_fcall trf_6627(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6627(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6627(t0,t1);}
+
+C_noret_decl(trf_6567)
+static void C_fcall trf_6567(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6567(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_6567(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6575)
+static void C_fcall trf_6575(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6575(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_6575(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6487)
+static void C_fcall trf_6487(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6487(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6487(t0,t1,t2);}
+
+C_noret_decl(trf_6495)
+static void C_fcall trf_6495(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6495(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6495(t0,t1,t2);}
+
+C_noret_decl(trf_6406)
+static void C_fcall trf_6406(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6406(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6406(t0,t1,t2);}
+
+C_noret_decl(trf_6414)
+static void C_fcall trf_6414(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6414(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_6414(t0,t1,t2);}
+
+C_noret_decl(trf_6271)
+static void C_fcall trf_6271(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6271(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_6271(t0,t1);}
+
+C_noret_decl(trf_6184)
+static void C_fcall trf_6184(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6184(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_6184(t0,t1,t2,t3);}
+
+C_noret_decl(trf_6190)
+static void C_fcall trf_6190(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_6190(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_6190(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5890)
+static void C_fcall trf_5890(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5890(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5890(t0,t1,t2);}
+
+C_noret_decl(trf_5898)
+static void C_fcall trf_5898(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5898(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5898(t0,t1,t2);}
+
+C_noret_decl(trf_5925)
+static void C_fcall trf_5925(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5925(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5925(t0,t1);}
+
+C_noret_decl(trf_5945)
+static void C_fcall trf_5945(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5945(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5945(t0,t1);}
+
+C_noret_decl(trf_5957)
+static void C_fcall trf_5957(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5957(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5957(t0,t1);}
+
+C_noret_decl(trf_5966)
+static void C_fcall trf_5966(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5966(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5966(t0,t1);}
+
+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 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_5851(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5780)
+static void C_fcall trf_5780(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5780(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_5780(t0,t1,t2);}
+
+C_noret_decl(trf_5696)
+static void C_fcall trf_5696(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5696(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_5696(t0,t1,t2,t3,t4,t5,t6);}
+
+C_noret_decl(trf_4438)
+static void C_fcall trf_4438(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4438(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_4438(t0,t1,t2,t3);}
+
+C_noret_decl(trf_5646)
+static void C_fcall trf_5646(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5646(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5646(t0,t1);}
+
+C_noret_decl(trf_5606)
+static void C_fcall trf_5606(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5606(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5606(t0,t1);}
+
+C_noret_decl(trf_5060)
+static void C_fcall trf_5060(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5060(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5060(t0,t1);}
+
+C_noret_decl(trf_5086)
+static void C_fcall trf_5086(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5086(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5086(t0,t1);}
+
+C_noret_decl(trf_5336)
+static void C_fcall trf_5336(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5336(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_5336(t0,t1);}
+
+C_noret_decl(trf_5172)
+static void C_fcall trf_5172(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_5172(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_5172(t0,t1,t2,t3,t4,t5);}
+
+C_noret_decl(trf_4935)
+static void C_fcall trf_4935(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4935(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4935(t0,t1);}
+
+C_noret_decl(trf_4890)
+static void C_fcall trf_4890(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4890(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4890(t0,t1);}
+
+C_noret_decl(trf_4562)
+static void C_fcall trf_4562(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4562(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4562(t0,t1);}
+
+C_noret_decl(trf_4478)
+static void C_fcall trf_4478(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4478(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4478(t0,t1,t2);}
+
+C_noret_decl(trf_4157)
+static void C_fcall trf_4157(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4157(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_4157(t0,t1,t2,t3);}
+
+C_noret_decl(trf_4343)
+static void C_fcall trf_4343(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4343(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4343(t0,t1,t2);}
+
+C_noret_decl(trf_4278)
+static void C_fcall trf_4278(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4278(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_4278(t0,t1);}
+
+C_noret_decl(trf_4026)
+static void C_fcall trf_4026(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4026(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4026(t0,t1,t2);}
+
+C_noret_decl(trf_4100)
+static void C_fcall trf_4100(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_4100(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_4100(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 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_3986(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3810)
+static void C_fcall trf_3810(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3810(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_3810(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3877)
+static void C_fcall trf_3877(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3877(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3877(t0,t1);}
+
+C_noret_decl(trf_3850)
+static void C_fcall trf_3850(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3850(void *dummy){
+C_word t1=C_pick(0);
+C_word t0=C_pick(1);
+C_adjust_stack(-2);
+f_3850(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 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_3776(t0,t1,t2,t3);}
+
+C_noret_decl(trf_3782)
+static void C_fcall trf_3782(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3782(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3782(t0,t1,t2);}
+
+C_noret_decl(trf_3790)
+static void C_fcall trf_3790(void *dummy) C_regparm C_noret;
+C_regparm static void C_fcall trf_3790(void *dummy){
+C_word t2=C_pick(0);
+C_word t1=C_pick(1);
+C_word t0=C_pick(2);
+C_adjust_stack(-3);
+f_3790(t0,t1,t2);}
+
+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(1967)){
+C_save(t1);
+C_rereclaim2(1967*sizeof(C_word), 1);
+t1=C_restore;}
+a=C_alloc(3);
+C_initialize_lf(lf,266);
+lf[0]=C_h_intern(&lf[0],34,"\010compilerscan-toplevel-assignments");
+lf[1]=C_h_intern(&lf[1],8,"\003sysput!");
+lf[2]=C_h_intern(&lf[2],21,"\010compileralways-bound");
+lf[3]=C_h_intern(&lf[3],9,"\003syserror");
+lf[4]=C_decode_literal(C_heaptop,"\376B\000\000\033too many optional arguments");
+lf[5]=C_h_intern(&lf[5],12,"\003sysfor-each");
+lf[6]=C_h_intern(&lf[6],18,"\010compilerdebugging");
+lf[7]=C_h_intern(&lf[7],1,"o");
+lf[8]=C_decode_literal(C_heaptop,"\376B\000\000\014safe globals");
+lf[9]=C_h_intern(&lf[9],13,"\004corevariable");
+lf[10]=C_h_intern(&lf[10],2,"if");
+lf[11]=C_h_intern(&lf[11],3,"let");
+lf[12]=C_h_intern(&lf[12],6,"append");
+lf[13]=C_h_intern(&lf[13],6,"lambda");
+lf[14]=C_h_intern(&lf[14],13,"\004corecallunit");
+lf[15]=C_h_intern(&lf[15],9,"\004corecall");
+lf[16]=C_h_intern(&lf[16],4,"set!");
+lf[17]=C_h_intern(&lf[17],9,"\004corecond");
+lf[18]=C_h_intern(&lf[18],11,"\004coreswitch");
+lf[19]=C_h_intern(&lf[19],30,"call-with-current-continuation");
+lf[20]=C_h_intern(&lf[20],1,"p");
+lf[21]=C_decode_literal(C_heaptop,"\376B\000\000 scanning toplevel assignments...");
+lf[22]=C_h_intern(&lf[22],24,"\010compilersimplifications");
+lf[23]=C_h_intern(&lf[23],23,"\010compilersimplified-ops");
+lf[24]=C_h_intern(&lf[24],41,"\010compilerperform-high-level-optimizations");
+lf[25]=C_h_intern(&lf[25],12,"\010compilerget");
+lf[26]=C_h_intern(&lf[26],5,"quote");
+lf[27]=C_h_intern(&lf[27],10,"alist-cons");
+lf[28]=C_h_intern(&lf[28],4,"caar");
+lf[29]=C_h_intern(&lf[29],19,"\010compilermatch-node");
+lf[30]=C_h_intern(&lf[30],3,"any");
+lf[31]=C_h_intern(&lf[31],18,"\003syshash-table-ref");
+lf[32]=C_h_intern(&lf[32],30,"\010compilerbroken-constant-nodes");
+lf[33]=C_h_intern(&lf[33],11,"lset-adjoin");
+lf[34]=C_h_intern(&lf[34],3,"eq\077");
+lf[35]=C_h_intern(&lf[35],4,"node");
+lf[36]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[37]=C_h_intern(&lf[37],14,"\010compilerqnode");
+lf[38]=C_decode_literal(C_heaptop,"\376B\000\000\033folding constant expression");
+lf[39]=C_h_intern(&lf[39],4,"eval");
+lf[40]=C_h_intern(&lf[40],22,"with-exception-handler");
+lf[41]=C_h_intern(&lf[41],5,"every");
+lf[42]=C_h_intern(&lf[42],9,"foldable\077");
+lf[43]=C_h_intern(&lf[43],7,"\003sysget");
+lf[44]=C_h_intern(&lf[44],18,"\010compilerintrinsic");
+lf[45]=C_h_intern(&lf[45],5,"value");
+lf[46]=C_decode_literal(C_heaptop,"\376B\000\000\035substituted constant variable");
+lf[47]=C_h_intern(&lf[47],16,"\010compilervarnode");
+lf[48]=C_h_intern(&lf[48],11,"collapsable");
+lf[49]=C_h_intern(&lf[49],10,"replacable");
+lf[50]=C_h_intern(&lf[50],7,"\003sysmap");
+lf[51]=C_h_intern(&lf[51],9,"replacing");
+lf[52]=C_h_intern(&lf[52],12,"contractable");
+lf[53]=C_h_intern(&lf[53],9,"removable");
+lf[54]=C_h_intern(&lf[54],11,"\004corelambda");
+lf[55]=C_h_intern(&lf[55],6,"unused");
+lf[56]=C_h_intern(&lf[56],9,"partition");
+lf[57]=C_h_intern(&lf[57],26,"\010compilerbuild-lambda-list");
+lf[58]=C_decode_literal(C_heaptop,"\376B\000\000\047merged explicitly consed rest parameter");
+lf[59]=C_h_intern(&lf[59],13,"explicit-rest");
+lf[60]=C_decode_literal(C_heaptop,"\376B\000\000 removed unused formal parameters");
+lf[61]=C_h_intern(&lf[61],30,"\010compilerdecompose-lambda-list");
+lf[62]=C_decode_literal(C_heaptop,"\376B\000\000\047merged explicitly consed rest parameter");
+lf[63]=C_h_intern(&lf[63],21,"has-unused-parameters");
+lf[64]=C_h_intern(&lf[64],31,"\010compilerinline-lambda-bindings");
+lf[65]=C_h_intern(&lf[65],13,"\010compilerput!");
+lf[66]=C_h_intern(&lf[66],13,"inline-target");
+lf[67]=C_decode_literal(C_heaptop,"\376B\000\000\024contracted procedure");
+lf[68]=C_h_intern(&lf[68],24,"\010compilercheck-signature");
+lf[69]=C_h_intern(&lf[69],30,"\010compilerconstant-declarations");
+lf[70]=C_h_intern(&lf[70],14,"\004coreundefined");
+lf[71]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[72]=C_h_intern(&lf[72],1,"x");
+lf[73]=C_decode_literal(C_heaptop,"\376B\000\0005removed call to constant procedure with unused result");
+lf[74]=C_h_intern(&lf[74],37,"\010compilerexpression-has-side-effects\077");
+lf[75]=C_h_intern(&lf[75],8,"assigned");
+lf[76]=C_h_intern(&lf[76],10,"references");
+lf[77]=C_h_intern(&lf[77],7,"unknown");
+lf[78]=C_decode_literal(C_heaptop,"\376B\000\000\022inlining procedure");
+lf[79]=C_decode_literal(C_heaptop,"\376B\000\000\017global inlining");
+lf[80]=C_decode_literal(C_heaptop,"\376B\000\000\010inlining");
+lf[81]=C_h_intern(&lf[81],1,"i");
+lf[82]=C_h_intern(&lf[82],22,"\010compilerinline-global");
+lf[83]=C_h_intern(&lf[83],14,"append-reverse");
+lf[84]=C_h_intern(&lf[84],6,"gensym");
+lf[85]=C_h_intern(&lf[85],1,"t");
+lf[86]=C_decode_literal(C_heaptop,"\376B\000\000+removed unused parameter to known procedure");
+lf[87]=C_h_intern(&lf[87],8,"split-at");
+lf[88]=C_decode_literal(C_heaptop,"\376B\000\000\012C_a_i_list");
+lf[89]=C_h_intern(&lf[89],20,"\004coreinline_allocate");
+lf[90]=C_decode_literal(C_heaptop,"\376B\000\000\042consed rest parameter at call site");
+lf[91]=C_h_intern(&lf[91],21,"\010compilerllist-length");
+lf[92]=C_h_intern(&lf[92],23,"\010compilerinline-locally");
+lf[93]=C_h_intern(&lf[93],3,"yes");
+lf[94]=C_h_intern(&lf[94],2,"no");
+lf[95]=C_h_intern(&lf[95],24,"\010compilerinline-max-size");
+lf[96]=C_h_intern(&lf[96],15,"\010compilerinline");
+lf[97]=C_h_intern(&lf[97],9,"inlinable");
+lf[98]=C_h_intern(&lf[98],11,"local-value");
+lf[99]=C_decode_literal(C_heaptop,"\376B\000\0006removed side-effect free assignment to unused variable");
+lf[100]=C_h_intern(&lf[100],16,"inline-transient");
+lf[101]=C_h_intern(&lf[101],26,"\010compilervariable-visible\077");
+lf[102]=C_h_intern(&lf[102],6,"global");
+lf[103]=C_decode_literal(C_heaptop,"\376B\000\000\031removed conditional forms");
+lf[104]=C_decode_literal(C_heaptop,"\376B\000\000\025removed binding forms");
+lf[105]=C_decode_literal(C_heaptop,"\376B\000\000\022replaced variables");
+lf[106]=C_h_intern(&lf[106],5,"print");
+lf[107]=C_h_intern(&lf[107],7,"newline");
+lf[108]=C_h_intern(&lf[108],6,"print*");
+lf[109]=C_decode_literal(C_heaptop,"\376B\000\000\027 call simplifications:");
+lf[110]=C_decode_literal(C_heaptop,"\376B\000\000\017simplifications");
+lf[111]=C_decode_literal(C_heaptop,"\376B\000\000\022traversal phase...");
+lf[112]=C_h_intern(&lf[112],34,"\010compilerperform-pre-optimization!");
+lf[113]=C_decode_literal(C_heaptop,"\376B\000\000\023Removed `not\047 forms");
+lf[114]=C_h_intern(&lf[114],24,"node-subexpressions-set!");
+lf[115]=C_h_intern(&lf[115],7,"reverse");
+lf[116]=C_h_intern(&lf[116],20,"node-parameters-set!");
+lf[117]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[118]=C_h_intern(&lf[118],17,"\010compilerget-list");
+lf[119]=C_h_intern(&lf[119],3,"not");
+lf[120]=C_h_intern(&lf[120],10,"call-sites");
+lf[121]=C_decode_literal(C_heaptop,"\376B\000\000\031pre-optimization phase...");
+lf[122]=C_h_intern(&lf[122],24,"register-simplifications");
+lf[123]=C_h_intern(&lf[123],19,"\003syshash-table-set!");
+lf[124]=C_h_intern(&lf[124],38,"\010compilerreorganize-recursive-bindings");
+lf[125]=C_decode_literal(C_heaptop,"\376B\000\000!converted assignments to bindings");
+lf[126]=C_h_intern(&lf[126],10,"fold-right");
+lf[127]=C_h_intern(&lf[127],4,"fold");
+lf[128]=C_h_intern(&lf[128],16,"topological-sort");
+lf[129]=C_h_intern(&lf[129],6,"lset<=");
+lf[130]=C_h_intern(&lf[130],10,"filter-map");
+lf[131]=C_h_intern(&lf[131],6,"filter");
+lf[132]=C_h_intern(&lf[132],10,"append-map");
+lf[133]=C_h_intern(&lf[133],28,"\010compilerscan-used-variables");
+lf[134]=C_h_intern(&lf[134],4,"cons");
+lf[135]=C_h_intern(&lf[135],27,"\010compilersubstitution-table");
+lf[136]=C_h_intern(&lf[136],16,"\010compilerrewrite");
+lf[137]=C_h_intern(&lf[137],28,"\010compilersimplify-named-call");
+lf[138]=C_h_intern(&lf[138],37,"\010compilerinline-substitutions-enabled");
+lf[139]=C_h_intern(&lf[139],11,"\004coreinline");
+lf[140]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[141]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[142]=C_h_intern(&lf[142],6,"unsafe");
+lf[143]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[144]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[145]=C_h_intern(&lf[145],6,"vector");
+lf[146]=C_h_intern(&lf[146],14,"rest-parameter");
+lf[147]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[148]=C_h_intern(&lf[148],11,"number-type");
+lf[149]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[150]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[151]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[152]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[153]=C_h_intern(&lf[153],6,"fixnum");
+lf[154]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[155]=C_h_intern(&lf[155],21,"\010compilerfold-boolean");
+lf[156]=C_h_intern(&lf[156],6,"flonum");
+lf[157]=C_h_intern(&lf[157],7,"generic");
+lf[158]=C_h_intern(&lf[158],5,"cons*");
+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],9,"\004coreproc");
+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_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[166]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[167]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[168]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[169]=C_h_intern(&lf[169],19,"\010compilerfold-inner");
+lf[170]=C_h_intern(&lf[170],6,"remove");
+lf[171]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+lf[172]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\006\001\376\377\016");
+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_h_intern(&lf[175],5,"fifth");
+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_h_intern(&lf[178],13,"\010compilerbomb");
+lf[179]=C_decode_literal(C_heaptop,"\376B\000\000\023bad type (optimize)");
+lf[180]=C_h_intern(&lf[180],34,"\010compilertransform-direct-lambdas!");
+lf[181]=C_h_intern(&lf[181],5,"boxed");
+lf[182]=C_h_intern(&lf[182],18,"\004coredirect_lambda");
+lf[183]=C_h_intern(&lf[183],15,"\004coreinline_ref");
+lf[184]=C_h_intern(&lf[184],37,"\010compilerestimate-foreign-result-size");
+lf[185]=C_h_intern(&lf[185],19,"\004coreinline_loc_ref");
+lf[186]=C_h_intern(&lf[186],16,"\004coredirect_call");
+lf[187]=C_h_intern(&lf[187],5,"lset=");
+lf[188]=C_h_intern(&lf[188],6,"delete");
+lf[189]=C_h_intern(&lf[189],19,"\010compilercopy-node!");
+lf[190]=C_h_intern(&lf[190],4,"quit");
+lf[191]=C_decode_literal(C_heaptop,"\376B\000\000;known procedure called with wrong number of arguments: `~A\047");
+lf[192]=C_h_intern(&lf[192],15,"lset-difference");
+lf[193]=C_h_intern(&lf[193],15,"node-class-set!");
+lf[194]=C_h_intern(&lf[194],12,"\004corerecurse");
+lf[195]=C_decode_literal(C_heaptop,"\376B\000\000Gknown procedure called recursively with wrong number of arguments: `~A\047");
+lf[196]=C_h_intern(&lf[196],4,"take");
+lf[197]=C_decode_literal(C_heaptop,"\376B\000\000Gknown procedure called recursively with wrong number of arguments: `~A\047");
+lf[198]=C_decode_literal(C_heaptop,"\376B\000\000\014missing kvar");
+lf[199]=C_h_intern(&lf[199],11,"\004corereturn");
+lf[200]=C_decode_literal(C_heaptop,"\376B\000\000\017bad call (leaf)");
+lf[201]=C_h_intern(&lf[201],6,"cdaddr");
+lf[202]=C_h_intern(&lf[202],6,"caaddr");
+lf[203]=C_decode_literal(C_heaptop,"\376B\000\000\026invalid parameter list");
+lf[204]=C_decode_literal(C_heaptop,"\376B\000\0006direct leaf routine with hoistable closures/allocation");
+lf[205]=C_h_intern(&lf[205],6,"unzip1");
+lf[206]=C_h_intern(&lf[206],16,"\003sysmake-promise");
+lf[207]=C_decode_literal(C_heaptop,"\376B\000\000\036direct leaf routine/allocation");
+lf[208]=C_decode_literal(C_heaptop,"\376B\000\000(direct leaf routine optimization pass...");
+lf[209]=C_h_intern(&lf[209],32,"\010compilerperform-lambda-lifting!");
+lf[210]=C_h_intern(&lf[210],23,"\003syshash-table-for-each");
+lf[211]=C_h_intern(&lf[211],1,"+");
+lf[212]=C_h_intern(&lf[212],17,"delete-duplicates");
+lf[213]=C_h_intern(&lf[213],14,"\004coreprimitive");
+lf[214]=C_h_intern(&lf[214],7,"delete!");
+lf[215]=C_h_intern(&lf[215],11,"concatenate");
+lf[216]=C_h_intern(&lf[216],5,"count");
+lf[217]=C_h_intern(&lf[217],22,"\010compilerhide-variable");
+lf[218]=C_decode_literal(C_heaptop,"\376B\000\000\037moving liftables to toplevel...");
+lf[219]=C_decode_literal(C_heaptop,"\376B\000\000\032removing local bindings...");
+lf[220]=C_decode_literal(C_heaptop,"\376B\000\000\026changing call sites...");
+lf[221]=C_h_intern(&lf[221],12,"pretty-print");
+lf[222]=C_h_intern(&lf[222],1,"l");
+lf[223]=C_decode_literal(C_heaptop,"\376B\000\000\026additional parameters:");
+lf[224]=C_decode_literal(C_heaptop,"\376B\000\000\035gathering extra parameters...");
+lf[225]=C_decode_literal(C_heaptop,"\376B\000\000\031liftable local procedures");
+lf[226]=C_decode_literal(C_heaptop,"\376B\000\000Aeliminating liftables by access-lists and non-liftable callees...");
+lf[227]=C_decode_literal(C_heaptop,"\376B\000\000\014accessibles:");
+lf[228]=C_decode_literal(C_heaptop,"\376B\000\000\031computing access-lists...");
+lf[229]=C_decode_literal(C_heaptop,"\376B\000\000\013call-graph:");
+lf[230]=C_decode_literal(C_heaptop,"\376B\000\000\034eliminating non-liftables...");
+lf[231]=C_decode_literal(C_heaptop,"\376B\000\000\026building call graph...");
+lf[232]=C_decode_literal(C_heaptop,"\376B\000\000\026gathering liftables...");
+lf[233]=C_h_intern(&lf[233],11,"make-vector");
+lf[234]=C_h_intern(&lf[234],3,"var");
+lf[235]=C_h_intern(&lf[235],1,"y");
+lf[236]=C_h_intern(&lf[236],2,"d2");
+lf[237]=C_h_intern(&lf[237],1,"z");
+lf[238]=C_h_intern(&lf[238],2,"d3");
+lf[239]=C_h_intern(&lf[239],2,"d1");
+lf[240]=C_h_intern(&lf[240],2,"op");
+lf[241]=C_h_intern(&lf[241],5,"clist");
+lf[242]=C_h_intern(&lf[242],34,"\010compilermembership-test-operators");
+lf[243]=C_h_intern(&lf[243],32,"\010compilermembership-unfold-limit");
+lf[244]=C_h_intern(&lf[244],4,"var1");
+lf[245]=C_h_intern(&lf[245],4,"var0");
+lf[246]=C_h_intern(&lf[246],6,"const1");
+lf[247]=C_h_intern(&lf[247],4,"var2");
+lf[248]=C_h_intern(&lf[248],6,"const2");
+lf[249]=C_h_intern(&lf[249],4,"rest");
+lf[250]=C_h_intern(&lf[250],5,"body2");
+lf[251]=C_h_intern(&lf[251],5,"body1");
+lf[252]=C_h_intern(&lf[252],27,"\010compilereq-inline-operator");
+lf[253]=C_decode_literal(C_heaptop,"\376\003\000\000\002\376\377\001\000\000\000\002\376\377\016");
+lf[254]=C_h_intern(&lf[254],19,"\010compilerimmediate\077");
+lf[255]=C_h_intern(&lf[255],5,"const");
+lf[256]=C_h_intern(&lf[256],1,"n");
+lf[257]=C_h_intern(&lf[257],7,"clauses");
+lf[258]=C_h_intern(&lf[258],4,"body");
+lf[259]=C_h_intern(&lf[259],1,"d");
+lf[260]=C_h_intern(&lf[260],4,"more");
+lf[261]=C_h_intern(&lf[261],4,"args");
+lf[262]=C_h_intern(&lf[262],1,"a");
+lf[263]=C_h_intern(&lf[263],1,"b");
+lf[264]=C_h_intern(&lf[264],1,"c");
+lf[265]=C_h_intern(&lf[265],4,"cdar");
+C_register_lf2(lf,266,create_ptable());
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3703,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_library_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k3701 */
+static void C_ccall f_3703(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_3703,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3706,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_eval_toplevel(2,C_SCHEME_UNDEFINED,t2);}
+
+/* k3704 in k3701 */
+static void C_ccall f_3706(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_3706,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_3708,tmp=(C_word)a,a+=2,tmp));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_3980,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("optimizer.scm: 105 make-vector");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[233]+1)))(4,*((C_word*)lf[233]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k3978 in k3704 in k3701 */
+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 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_3980,2,t0,t1);}
+t2=C_mutate((C_word*)lf[22]+1 /* (set! simplifications ...) */,t1);
+t3=C_set_block_item(lf[23] /* simplified-ops */,0,C_SCHEME_END_OF_LIST);
+t4=C_mutate((C_word*)lf[24]+1 /* (set! perform-high-level-optimizations ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_3983,tmp=(C_word)a,a+=2,tmp));
+t5=C_mutate((C_word*)lf[112]+1 /* (set! perform-pre-optimization! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_5844,tmp=(C_word)a,a+=2,tmp));
+t6=C_mutate((C_word*)lf[122]+1 /* (set! register-simplifications ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6163,tmp=(C_word)a,a+=2,tmp));
+t7=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6170,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t8=(C_word)C_a_i_cons(&a,2,lf[262],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[9],t9);
+t11=(C_word)C_a_i_cons(&a,2,lf[263],lf[264]);
+t12=(C_word)C_a_i_cons(&a,2,t10,t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[259],t12);
+t14=(C_word)C_a_i_cons(&a,2,lf[15],t13);
+t15=(C_word)C_a_i_cons(&a,2,lf[259],C_SCHEME_END_OF_LIST);
+t16=(C_word)C_a_i_cons(&a,2,lf[264],t15);
+t17=(C_word)C_a_i_cons(&a,2,lf[263],t16);
+t18=(C_word)C_a_i_cons(&a,2,lf[262],t17);
+t19=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14556,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);
+C_trace("optimizer.scm: 474 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[123]))(5,*((C_word*)lf[123]+1),t7,*((C_word*)lf[22]+1),lf[15],t23);}
+
+/* a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14556(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_14556,7,t0,t1,t2,t3,t4,t5,t6);}
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14564,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);
+C_trace("optimizer.scm: 483 ##sys#hash-table-ref");
+((C_proc4)C_retrieve_symbol_proc(lf[31]))(4,*((C_word*)lf[31]+1),t7,C_retrieve(lf[135]),t3);}
+
+/* k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14564(C_word c,C_word t0,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_14564,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_14569,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_14569(t6,((C_word*)t0)[2],t2);}
+
+/* loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_fcall f_14569(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_14569,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_14579,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_14619,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);
+C_trace("optimizer.scm: 485 caar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[28]+1)))(3,*((C_word*)lf[28]+1),t4,t2);}}
+
+/* k14617 in loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14619(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_14619,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_14623,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);
+C_trace("optimizer.scm: 485 cdar");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[265]+1)))(3,*((C_word*)lf[265]+1),t2,((C_word*)t0)[2]);}
+
+/* k14621 in k14617 in loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14623(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 485 simplify-named-call");
+((C_proc9)C_retrieve_symbol_proc(lf[137]))(9,*((C_word*)lf[137]+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]);}
+
+/* k14577 in loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14579(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_14579,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_14583,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+C_trace("g963964");
+t3=t2;
+f_14583(t3,((C_word*)t0)[4],t1);}
+else{
+t2=(C_word)C_i_cdr(((C_word*)t0)[3]);
+C_trace("optimizer.scm: 492 loop");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_14569(t3,((C_word*)t0)[4],t2);}}
+
+/* g963 in k14577 in loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_fcall f_14583(C_word t0,C_word 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_14583,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_assq(((C_word*)t0)[2],C_retrieve(lf[23]));
+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_14605,a[2]=t2,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 490 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+1),t4,((C_word*)t0)[2],C_fix(1),C_retrieve(lf[23]));}}
+
+/* k14603 in g963 in k14577 in loop in k14562 in a14555 in k3978 in k3704 in k3701 */
+static void C_ccall f_14605(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[23]+1 /* (set! simplified-ops ...) */,t1);
+t3=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,((C_word*)t0)[2]);}
+
+/* k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_6170(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_6170,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6173,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_a_i_cons(&a,2,lf[244],C_SCHEME_END_OF_LIST);
+t4=(C_word)C_a_i_cons(&a,2,lf[240],C_SCHEME_END_OF_LIST);
+t5=(C_word)C_a_i_cons(&a,2,lf[245],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[9],t6);
+t8=(C_word)C_a_i_cons(&a,2,lf[246],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[26],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[139],t13);
+t15=(C_word)C_a_i_cons(&a,2,lf[244],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[9],t16);
+t18=(C_word)C_a_i_cons(&a,2,lf[247],C_SCHEME_END_OF_LIST);
+t19=(C_word)C_a_i_cons(&a,2,lf[240],C_SCHEME_END_OF_LIST);
+t20=(C_word)C_a_i_cons(&a,2,lf[245],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[9],t21);
+t23=(C_word)C_a_i_cons(&a,2,lf[248],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[26],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[139],t28);
+t30=(C_word)C_a_i_cons(&a,2,lf[247],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[9],t31);
+t33=(C_word)C_a_i_cons(&a,2,lf[249],C_SCHEME_END_OF_LIST);
+t34=(C_word)C_a_i_cons(&a,2,lf[250],t33);
+t35=(C_word)C_a_i_cons(&a,2,t32,t34);
+t36=(C_word)C_a_i_cons(&a,2,lf[236],t35);
+t37=(C_word)C_a_i_cons(&a,2,lf[10],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[11],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[251],t42);
+t44=(C_word)C_a_i_cons(&a,2,t17,t43);
+t45=(C_word)C_a_i_cons(&a,2,lf[239],t44);
+t46=(C_word)C_a_i_cons(&a,2,lf[10],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[11],t49);
+t51=(C_word)C_a_i_cons(&a,2,lf[249],C_SCHEME_END_OF_LIST);
+t52=(C_word)C_a_i_cons(&a,2,lf[236],t51);
+t53=(C_word)C_a_i_cons(&a,2,lf[239],t52);
+t54=(C_word)C_a_i_cons(&a,2,lf[250],t53);
+t55=(C_word)C_a_i_cons(&a,2,lf[251],t54);
+t56=(C_word)C_a_i_cons(&a,2,lf[248],t55);
+t57=(C_word)C_a_i_cons(&a,2,lf[246],t56);
+t58=(C_word)C_a_i_cons(&a,2,lf[240],t57);
+t59=(C_word)C_a_i_cons(&a,2,lf[247],t58);
+t60=(C_word)C_a_i_cons(&a,2,lf[244],t59);
+t61=(C_word)C_a_i_cons(&a,2,lf[245],t60);
+t62=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14235,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[234],C_SCHEME_END_OF_LIST);
+t67=(C_word)C_a_i_cons(&a,2,lf[240],C_SCHEME_END_OF_LIST);
+t68=(C_word)C_a_i_cons(&a,2,lf[245],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[9],t69);
+t71=(C_word)C_a_i_cons(&a,2,lf[255],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[26],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[139],t76);
+t78=(C_word)C_a_i_cons(&a,2,lf[234],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[9],t79);
+t81=(C_word)C_a_i_cons(&a,2,lf[256],C_SCHEME_END_OF_LIST);
+t82=(C_word)C_a_i_cons(&a,2,lf[245],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[9],t83);
+t85=(C_word)C_a_i_cons(&a,2,t84,lf[257]);
+t86=(C_word)C_a_i_cons(&a,2,t81,t85);
+t87=(C_word)C_a_i_cons(&a,2,lf[18],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[258],t88);
+t90=(C_word)C_a_i_cons(&a,2,t80,t89);
+t91=(C_word)C_a_i_cons(&a,2,lf[259],t90);
+t92=(C_word)C_a_i_cons(&a,2,lf[10],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[11],t95);
+t97=(C_word)C_a_i_cons(&a,2,lf[257],C_SCHEME_END_OF_LIST);
+t98=(C_word)C_a_i_cons(&a,2,lf[256],t97);
+t99=(C_word)C_a_i_cons(&a,2,lf[258],t98);
+t100=(C_word)C_a_i_cons(&a,2,lf[259],t99);
+t101=(C_word)C_a_i_cons(&a,2,lf[255],t100);
+t102=(C_word)C_a_i_cons(&a,2,lf[245],t101);
+t103=(C_word)C_a_i_cons(&a,2,lf[240],t102);
+t104=(C_word)C_a_i_cons(&a,2,lf[234],t103);
+t105=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_14014,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[244],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[70],t110);
+t112=(C_word)C_a_i_cons(&a,2,lf[260],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[11],t114);
+t116=(C_word)C_a_i_cons(&a,2,lf[260],C_SCHEME_END_OF_LIST);
+t117=(C_word)C_a_i_cons(&a,2,lf[244],t116);
+t118=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13613,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[234],C_SCHEME_END_OF_LIST);
+t123=(C_word)C_a_i_cons(&a,2,lf[240],C_SCHEME_END_OF_LIST);
+t124=(C_word)C_a_i_cons(&a,2,t123,lf[261]);
+t125=(C_word)C_a_i_cons(&a,2,lf[139],t124);
+t126=(C_word)C_a_i_cons(&a,2,lf[234],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[9],t127);
+t129=(C_word)C_a_i_cons(&a,2,lf[235],C_SCHEME_END_OF_LIST);
+t130=(C_word)C_a_i_cons(&a,2,lf[72],t129);
+t131=(C_word)C_a_i_cons(&a,2,t128,t130);
+t132=(C_word)C_a_i_cons(&a,2,lf[259],t131);
+t133=(C_word)C_a_i_cons(&a,2,lf[10],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[11],t136);
+t138=(C_word)C_a_i_cons(&a,2,lf[235],C_SCHEME_END_OF_LIST);
+t139=(C_word)C_a_i_cons(&a,2,lf[72],t138);
+t140=(C_word)C_a_i_cons(&a,2,lf[259],t139);
+t141=(C_word)C_a_i_cons(&a,2,lf[261],t140);
+t142=(C_word)C_a_i_cons(&a,2,lf[240],t141);
+t143=(C_word)C_a_i_cons(&a,2,lf[234],t142);
+t144=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13465,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);
+C_trace("optimizer.scm: 474 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[123]))(5,*((C_word*)lf[123]+1),t2,*((C_word*)lf[22]+1),lf[11],t148);}
+
+/* a13464 in k6168 in k3978 in k3704 in k3701 */
+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 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_13465,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
+if(C_truep((C_word)C_i_equalp(t4,C_retrieve(lf[252])))){
+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_13511,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);
+C_trace("optimizer.scm: 633 get-list");
+((C_proc5)C_retrieve_symbol_proc(lf[118]))(5,*((C_word*)lf[118]+1),t9,t2,t3,lf[76]);}}
+
+/* k13509 in a13464 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13511(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_13511,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[35],lf[139],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[35],lf[10],t9,t7));}
+else{
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13613(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_13613,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_13623,a[2]=t2,a[3]=t7,tmp=(C_word)a,a+=4,tmp));
+t9=((C_word*)t7)[1];
+f_13623(t9,t1,t5,t4);}
+
+/* loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_13623(C_word t0,C_word 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_13623,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[11]);
+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_13960,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);
+C_trace("optimizer.scm: 572 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t12,((C_word*)t0)[2],t13,lf[100]);}
+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);}}
+
+/* k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13960(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_13960,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_13952,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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]);
+C_trace("optimizer.scm: 573 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t2,((C_word*)t0)[2],t3,lf[76]);}}
+
+/* k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+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 t4;
+C_word 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_13952,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[70]);
+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]);
+C_trace("optimizer.scm: 578 loop1");
+t10=((C_word*)((C_word*)t0)[3])[1];
+f_13623(t10,((C_word*)t0)[7],t8,t9);}
+else{
+t7=(C_word)C_eqp(t5,lf[16]);
+if(C_truep(t7)){
+t8=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13729,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);
+C_trace("optimizer.scm: 580 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+1),t8,((C_word*)t0)[4]);}
+else{
+t8=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_FALSE);}}}}
+
+/* k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13729(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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_13729,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_13758,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_13758(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 k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_13758(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_13758,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_13789,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[11]);
+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_13928,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);
+C_trace("optimizer.scm: 591 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t14,((C_word*)t0)[2],t15,lf[100]);}
+else{
+t14=t11;
+f_13789(t14,C_SCHEME_FALSE);}}
+else{
+t13=t11;
+f_13789(t13,C_SCHEME_FALSE);}}
+
+/* k13926 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13928(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_13928,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[6];
+f_13789(t2,C_SCHEME_FALSE);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13920,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]);
+C_trace("optimizer.scm: 592 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t2,((C_word*)t0)[2],t3,lf[76]);}}
+
+/* k13918 in k13926 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13920(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_13789(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[16],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_13789(t9,(C_word)C_eqp(t5,t8));}
+else{
+t5=((C_word*)t0)[4];
+f_13789(t5,C_SCHEME_FALSE);}}
+else{
+t2=((C_word*)t0)[4];
+f_13789(t2,C_SCHEME_FALSE);}}}
+
+/* k13787 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_13789(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_13789,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]);
+C_trace("optimizer.scm: 596 loop2");
+t8=((C_word*)((C_word*)t0)[5])[1];
+f_13758(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_13832,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_13842,tmp=(C_word)a,a+=2,tmp);
+C_trace("##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);}}}
+
+/* a13841 in k13787 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13842(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_13842,4,t0,t1,t2,t3);}
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,(C_truep(t3)?t2:C_SCHEME_FALSE));}
+
+/* a13831 in k13787 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13832(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_13832,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13840,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],a[4]=t1,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 601 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+1),t2,((C_word*)t0)[2]);}
+
+/* k13838 in a13831 in k13787 in loop2 in k13727 in k13950 in k13958 in loop1 in a13612 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13840(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 601 reorganize-recursive-bindings");
+((C_proc5)C_retrieve_symbol_proc(lf[124]))(5,*((C_word*)lf[124]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* a14013 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14014(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_14014,11,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9,t10);}
+if(C_truep((C_word)C_i_equalp(t4,C_retrieve(lf[252])))){
+t11=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_14027,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);
+C_trace("optimizer.scm: 542 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[254]))(3,*((C_word*)lf[254]+1),t11,t6);}
+else{
+t11=t1;
+((C_proc2)(void*)(*((C_word*)t11+1)))(2,t11,C_SCHEME_FALSE);}}
+
+/* k14025 in a14013 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14027(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_14027,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14069,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("optimizer.scm: 543 get-list");
+((C_proc5)C_retrieve_symbol_proc(lf[118]))(5,*((C_word*)lf[118]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],lf[76]);}
+else{
+t2=((C_word*)t0)[8];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k14067 in k14025 in a14013 in k6168 in k3978 in k3704 in k3701 */
+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 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_14069,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_14049,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_14053,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);
+C_trace("optimizer.scm: 547 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t7,((C_word*)t0)[2]);}
+else{
+t4=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* k14051 in k14067 in k14025 in a14013 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14053(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_14053,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_14057,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("optimizer.scm: 548 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2]);}
+
+/* k14055 in k14051 in k14067 in k14025 in a14013 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14057(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 547 cons*");
+((C_proc6)C_retrieve_symbol_proc(lf[158]))(6,*((C_word*)lf[158]+1),((C_word*)t0)[5],((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k14047 in k14067 in k14025 in a14013 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14049(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_14049,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[35],lf[18],((C_word*)t0)[2],t1));}
+
+/* a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14235(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_14235,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[252])))){
+t14=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14248,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);
+C_trace("optimizer.scm: 515 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[254]))(3,*((C_word*)lf[254]+1),t14,t7);}
+else{
+t14=t1;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_SCHEME_FALSE);}}
+
+/* k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14248(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_14248,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_14254,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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("optimizer.scm: 516 immediate?");
+((C_proc3)C_retrieve_symbol_proc(lf[254]))(3,*((C_word*)lf[254]+1),t2,((C_word*)t0)[7]);}
+else{
+t2=((C_word*)t0)[8];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14254(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_14254,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_14306,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);
+C_trace("optimizer.scm: 517 get-list");
+((C_proc5)C_retrieve_symbol_proc(lf[118]))(5,*((C_word*)lf[118]+1),t2,((C_word*)t0)[4],((C_word*)t0)[2],lf[76]);}
+else{
+t2=((C_word*)t0)[8];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k14304 in k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14306(C_word c,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_14306,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_14298,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("optimizer.scm: 518 get-list");
+((C_proc5)C_retrieve_symbol_proc(lf[118]))(5,*((C_word*)lf[118]+1),t4,((C_word*)t0)[3],((C_word*)t0)[2],lf[76]);}
+else{
+t4=((C_word*)t0)[7];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* k14296 in k14304 in k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14298(C_word c,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_14298,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_14282,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("optimizer.scm: 522 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t4,((C_word*)t0)[2]);}
+else{
+t4=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,C_SCHEME_FALSE);}}
+
+/* k14280 in k14296 in k14304 in k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14282(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_14282,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14286,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);
+C_trace("optimizer.scm: 523 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2]);}
+
+/* k14284 in k14280 in k14296 in k14304 in k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14286(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_14286,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_14290,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);
+C_trace("optimizer.scm: 525 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2]);}
+
+/* k14288 in k14284 in k14280 in k14296 in k14304 in k14252 in k14246 in a14234 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_14290(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_14290,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[35],lf[18],lf[253],t2));}
+
+/* k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_6173(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_6173,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6176,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t3=(C_word)C_a_i_cons(&a,2,lf[234],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[9],t4);
+t6=(C_word)C_a_i_cons(&a,2,lf[235],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[236],t7);
+t9=(C_word)C_a_i_cons(&a,2,lf[15],t8);
+t10=(C_word)C_a_i_cons(&a,2,lf[234],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[9],t11);
+t13=(C_word)C_a_i_cons(&a,2,lf[237],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[238],t14);
+t16=(C_word)C_a_i_cons(&a,2,lf[15],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[72],t18);
+t20=(C_word)C_a_i_cons(&a,2,lf[239],t19);
+t21=(C_word)C_a_i_cons(&a,2,lf[10],t20);
+t22=(C_word)C_a_i_cons(&a,2,lf[234],C_SCHEME_END_OF_LIST);
+t23=(C_word)C_a_i_cons(&a,2,lf[237],t22);
+t24=(C_word)C_a_i_cons(&a,2,lf[235],t23);
+t25=(C_word)C_a_i_cons(&a,2,lf[72],t24);
+t26=(C_word)C_a_i_cons(&a,2,lf[238],t25);
+t27=(C_word)C_a_i_cons(&a,2,lf[236],t26);
+t28=(C_word)C_a_i_cons(&a,2,lf[239],t27);
+t29=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13302,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[240],C_SCHEME_END_OF_LIST);
+t34=(C_word)C_a_i_cons(&a,2,lf[241],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[26],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[72],t37);
+t39=(C_word)C_a_i_cons(&a,2,t33,t38);
+t40=(C_word)C_a_i_cons(&a,2,lf[139],t39);
+t41=(C_word)C_a_i_cons(&a,2,lf[237],C_SCHEME_END_OF_LIST);
+t42=(C_word)C_a_i_cons(&a,2,lf[235],t41);
+t43=(C_word)C_a_i_cons(&a,2,t40,t42);
+t44=(C_word)C_a_i_cons(&a,2,lf[239],t43);
+t45=(C_word)C_a_i_cons(&a,2,lf[10],t44);
+t46=(C_word)C_a_i_cons(&a,2,lf[237],C_SCHEME_END_OF_LIST);
+t47=(C_word)C_a_i_cons(&a,2,lf[235],t46);
+t48=(C_word)C_a_i_cons(&a,2,lf[241],t47);
+t49=(C_word)C_a_i_cons(&a,2,lf[72],t48);
+t50=(C_word)C_a_i_cons(&a,2,lf[240],t49);
+t51=(C_word)C_a_i_cons(&a,2,lf[239],t50);
+t52=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_13106,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);
+C_trace("optimizer.scm: 474 ##sys#hash-table-set!");
+((C_proc5)C_retrieve_symbol_proc(lf[123]))(5,*((C_word*)lf[123]+1),t2,*((C_word*)lf[22]+1),lf[10],t56);}
+
+/* a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13106(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_13106,9,t0,t1,t2,t3,t4,t5,t6,t7,t8);}
+t9=(C_word)C_i_assoc(t4,C_retrieve(lf[242]));
+if(C_truep(t9)){
+if(C_truep((C_word)C_i_listp(t6))){
+t10=(C_word)C_i_length(t6);
+t11=C_retrieve(lf[243]);
+if(C_truep((C_word)C_fixnum_lessp(t10,t11))){
+t12=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13128,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);
+C_trace("optimizer.scm: 671 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[84]))(2,*((C_word*)lf[84]+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);}}
+
+/* k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13128(C_word c,C_word t0,C_word t1){
+C_word 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_13128,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_13164,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_13166,a[2]=t1,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t7=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13208,a[2]=((C_word*)t0)[2],a[3]=t6,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 688 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t7,C_SCHEME_FALSE);}
+
+/* k13206 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13208(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 680 fold-right");
+((C_proc5)C_retrieve_symbol_proc(lf[126]))(5,*((C_word*)lf[126]+1),((C_word*)t0)[4],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* a13165 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13166(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_13166,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13200,a[2]=t2,a[3]=t1,a[4]=t3,a[5]=((C_word*)t0)[3],tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 685 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t4,((C_word*)t0)[2]);}
+
+/* k13198 in a13165 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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[6],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13200,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13204,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);
+C_trace("optimizer.scm: 685 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t2,((C_word*)t0)[2]);}
+
+/* k13202 in k13198 in a13165 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13204(C_word c,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_13204,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[35],lf[139],((C_word*)t0)[4],t2);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_13192,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=t3,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 686 qnode");
+((C_proc3)C_retrieve_symbol_proc(lf[37]))(3,*((C_word*)lf[37]+1),t4,C_SCHEME_TRUE);}
+
+/* k13190 in k13202 in k13198 in a13165 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13192(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_13192,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[35],lf[17],C_SCHEME_END_OF_LIST,t2));}
+
+/* k13162 in k13126 in a13105 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_13164,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[35],lf[10],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[35],lf[11],((C_word*)t0)[2],t5));}
+
+/* a13301 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13302(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_13302,10,t0,t1,t2,t3,t4,t5,t6,t7,t8,t9);}
+if(C_truep(C_retrieve(lf[138]))){
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13322,a[2]=t4,a[3]=t1,a[4]=t8,a[5]=t7,a[6]=t6,tmp=(C_word)a,a+=7,tmp);
+C_trace("optimizer.scm: 656 varnode");
+((C_proc3)C_retrieve_symbol_proc(lf[47]))(3,*((C_word*)lf[47]+1),t10,t9);}
+else{
+t10=t1;
+((C_proc2)(void*)(*((C_word*)t10+1)))(2,t10,C_SCHEME_FALSE);}}
+
+/* k13320 in a13301 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13322(C_word c,C_word t0,C_word 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_13322,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[35],lf[17],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[35],lf[15],t6,t4));}
+
+/* k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_6176(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_6176,2,t0,t1);}
+t2=C_mutate((C_word*)lf[124]+1 /* (set! reorganize-recursive-bindings ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6178,tmp=(C_word)a,a+=2,tmp));
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_6665,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+C_trace("optimizer.scm: 783 make-vector");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[233]+1)))(4,*((C_word*)lf[233]+1),t3,C_fix(301),C_SCHEME_END_OF_LIST);}
+
+/* k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_6665(C_word c,C_word t0,C_word 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_6665,2,t0,t1);}
+t2=C_mutate((C_word*)lf[135]+1 /* (set! substitution-table ...) */,t1);
+t3=C_mutate((C_word*)lf[136]+1 /* (set! rewrite ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6667,tmp=(C_word)a,a+=2,tmp));
+t4=C_mutate((C_word*)lf[137]+1 /* (set! simplify-named-call ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_6687,tmp=(C_word)a,a+=2,tmp));
+t5=C_mutate((C_word*)lf[180]+1 /* (set! transform-direct-lambdas! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_9102,tmp=(C_word)a,a+=2,tmp));
+t6=C_mutate((C_word*)lf[209]+1 /* (set! perform-lambda-lifting! ...) */,(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10487,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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10487(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_10487,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_10490,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_10596,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_10884,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_11017,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_11298,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_11609,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_12018,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_12546,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_12744,a[2]=t2,tmp=(C_word)a,a+=3,tmp));
+t33=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12985,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);
+C_trace("optimizer.scm: 1759 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t33,lf[20],lf[232]);}
+
+/* k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12985(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_12985,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12988,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);
+C_trace("optimizer.scm: 1760 find-lifting-candidates");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_10490(t3,t2);}
+
+/* k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12988(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_12988,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12991,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);
+C_trace("optimizer.scm: 1761 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[231]);}
+
+/* k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12991(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_12991,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12994,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);
+C_trace("optimizer.scm: 1762 build-call-graph");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_10596(t3,t2,((C_word*)t0)[3]);}
+
+/* k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12994(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_12994,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_12997,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);
+C_trace("optimizer.scm: 1763 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[230]);}
+
+/* k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12997(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_12997,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13000,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);
+C_trace("optimizer.scm: 1764 eliminate");
+t3=((C_word*)((C_word*)t0)[4])[1];
+f_10884(t3,t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13000(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_13000,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13003,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_13077,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1765 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t3,lf[222],lf[229]);}
+
+/* k13075 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13077(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("optimizer.scm: 1765 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[221]))(3,*((C_word*)lf[221]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_13003(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 ab[10],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13003,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_13006,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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("optimizer.scm: 1766 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[228]);}
+
+/* k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13006(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_13006,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13009,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("optimizer.scm: 1767 collect-accessibles");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11017(t3,t2,((C_word*)t0)[3]);}
+
+/* k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13009(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_13009,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13012,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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_13071,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1768 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t3,lf[222],lf[227]);}
+
+/* k13069 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13071(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("optimizer.scm: 1768 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[221]))(3,*((C_word*)lf[221]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_13012(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13012(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_13012,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_13015,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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("optimizer.scm: 1769 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[226]);}
+
+/* k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13015(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_13015,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13018,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_13068,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("optimizer.scm: 1770 eliminate4");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11298(t4,t3,((C_word*)t0)[2]);}
+
+/* k13066 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13068(C_word c,C_word t0,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_13068,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_11264,a[2]=t4,tmp=(C_word)a,a+=3,tmp));
+t6=((C_word*)t4)[1];
+f_11264(t6,((C_word*)t0)[2],t1,t2);}
+
+/* loop in k13066 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11264(C_word 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_11264,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11268,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_11282,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+C_trace("optimizer.scm: 1564 filter");
+((C_proc4)C_retrieve_symbol_proc(lf[131]))(4,*((C_word*)lf[131]+1),t4,t5,t2);}
+
+/* a11281 in loop in k13066 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11282(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_11282,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_11288,a[2]=((C_word*)t0)[2],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_i_cddr(t2);
+C_trace("optimizer.scm: 1564 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),t1,t3,t4);}
+
+/* a11287 in a11281 in loop in k13066 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11288(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_11288,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]));}
+
+/* k11266 in loop in k13066 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11268(C_word c,C_word 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{
+C_trace("optimizer.scm: 1568 loop");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_11264(t5,((C_word*)t0)[3],t1,t2);}}
+
+/* k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13018(C_word c,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_13018,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13021,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);
+t3=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13058,a[2]=t2,tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|2,a[1]=(C_word)f_13060,a[2]=t1,tmp=(C_word)a,a+=3,tmp);
+C_trace("##sys#make-promise");
+t5=*((C_word*)lf[206]+1);
+((C_proc3)(void*)(*((C_word*)t5+1)))(3,t5,t3,t4);}
+
+/* a13059 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13060(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_13060,2,t0,t1);}
+C_trace("optimizer.scm: 1771 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[205]))(3,*((C_word*)lf[205]+1),t1,((C_word*)t0)[2]);}
+
+/* k13056 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13058(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1771 debugging");
+((C_proc5)C_retrieve_symbol_proc(lf[6]))(5,*((C_word*)lf[6]+1),((C_word*)t0)[2],lf[7],lf[225],t1);}
+
+/* k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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[8],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13021,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13024,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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("optimizer.scm: 1772 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[224]);}
+
+/* k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13024(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_13024,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13027,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("optimizer.scm: 1773 compute-extra-variables");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_11609(t3,t2,((C_word*)t0)[5]);}
+
+/* k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13027(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_13027,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13030,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_13051,a[2]=t1,a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1774 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t3,lf[222],lf[223]);}
+
+/* k13049 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13051(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+if(C_truep(t1)){
+C_trace("optimizer.scm: 1774 pretty-print");
+((C_proc3)C_retrieve_symbol_proc(lf[221]))(3,*((C_word*)lf[221]+1),((C_word*)t0)[3],((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+f_13030(2,t2,C_SCHEME_UNDEFINED);}}
+
+/* k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13030(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_13030,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_13033,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],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("optimizer.scm: 1775 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[220]);}
+
+/* k13031 in k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13033(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_13033,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13036,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("optimizer.scm: 1776 extend-call-sites!");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12546(t3,t2,((C_word*)t0)[4]);}
+
+/* k13034 in k13031 in k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_13036,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_13039,a[2]=((C_word*)t0)[2],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("optimizer.scm: 1777 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[219]);}
+
+/* k13037 in k13034 in k13031 in k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13039(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_13039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13042,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("optimizer.scm: 1778 remove-local-bindings!");
+t3=((C_word*)((C_word*)t0)[2])[1];
+f_12744(t3,t2,((C_word*)t0)[4]);}
+
+/* k13040 in k13037 in k13034 in k13031 in k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13042(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_13042,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_13045,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("optimizer.scm: 1779 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t2,lf[20],lf[218]);}
+
+/* k13043 in k13040 in k13037 in k13034 in k13031 in k13028 in k13025 in k13022 in k13019 in k13016 in k13013 in k13010 in k13007 in k13004 in k13001 in k12998 in k12995 in k12992 in k12989 in k12986 in k12983 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_13045(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1780 reconstruct!");
+t2=((C_word*)((C_word*)t0)[5])[1];
+f_12018(t2,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12744(C_word 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_12744,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_12750,a[2]=t4,a[3]=t2,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_12750(t6,t1,((C_word*)t0)[2]);}
+
+/* walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12750(C_word t0,C_word 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_12750,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[11]);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12784,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_12875,a[2]=((C_word*)t0)[2],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
+t16=((C_word*)t14)[1];
+f_12875(t16,t10,t12);}
+else{
+t10=(C_word)C_eqp(t4,lf[16]);
+if(C_truep(t10)){
+t11=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12905,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_12935,a[2]=((C_word*)t0)[2],a[3]=t15,tmp=(C_word)a,a+=4,tmp));
+t17=((C_word*)t15)[1];
+f_12935(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_12961,a[2]=((C_word*)t0)[2],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
+t14=((C_word*)t12)[1];
+f_12961(t14,t1,t8);}}}
+
+/* loop3627 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12961(C_word 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_12961,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_12971,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));
+C_trace("g36343635");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12750(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12969 in loop3627 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12971(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_12961(t3,((C_word*)t0)[2],t2);}
+
+/* loop3606 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12935(C_word 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_12935,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_12945,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));
+C_trace("g36133614");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12750(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12943 in loop3606 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12945(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_12935(t3,((C_word*)t0)[2],t2);}
+
+/* k12903 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12905(C_word c,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_12905,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_12914,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1754 node-class-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[193]))(4,*((C_word*)lf[193]+1),t3,((C_word*)t0)[2],lf[70]);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12912 in k12903 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12914(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_12914,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12917,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1755 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k12915 in k12912 in k12903 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12917(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1756 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* loop3569 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12875(C_word 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_12875,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_12885,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));
+C_trace("g35763577");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12750(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12883 in loop3569 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12885(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_12875(t3,((C_word*)t0)[2],t2);}
+
+/* k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12784(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12784,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_12789,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_12789(t9,((C_word*)t0)[4],((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* doloop3585 in k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12789(C_word t0,C_word 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_12789,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);
+C_trace("optimizer.scm: 1744 copy-node!");
+((C_proc4)C_retrieve_symbol_proc(lf[189]))(4,*((C_word*)lf[189]+1),t1,t4,((C_word*)t0)[5]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12812,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_12827,a[2]=((C_word*)t0)[5],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1746 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+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;}}}
+
+/* k12825 in doloop3585 in k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12827(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1746 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12810 in doloop3585 in k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12812(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_12812,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12819,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_12823,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1747 reverse");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[115]+1)))(3,*((C_word*)lf[115]+1),t3,((C_word*)((C_word*)t0)[2])[1]);}
+
+/* k12821 in k12810 in doloop3585 in k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12823(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1747 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k12817 in k12810 in doloop3585 in k12782 in walk in remove-local-bindings! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12819(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1747 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12546(C_word 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_12546,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_12552,a[2]=t2,a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_12552(t6,t1,((C_word*)t0)[2]);}
+
+/* walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12552(C_word t0,C_word 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_12552,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[15]);
+if(C_truep(t9)){
+t10=(C_word)C_i_car(t8);
+t11=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12589,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[9],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_12647,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_12651,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_12661,a[2]=t20,a[3]=t26,a[4]=t22,tmp=(C_word)a,a+=5,tmp));
+t28=((C_word*)t26)[1];
+f_12661(t28,t23,t24);}
+else{
+t17=C_SCHEME_UNDEFINED;
+t18=t11;
+f_12589(2,t18,t17);}}
+else{
+t14=t11;
+f_12589(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_12721,a[2]=((C_word*)t0)[3],a[3]=t11,tmp=(C_word)a,a+=4,tmp));
+t13=((C_word*)t11)[1];
+f_12721(t13,t1,t8);}}
+
+/* loop3535 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12721(C_word 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_12721,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_12731,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));
+C_trace("g35423543");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12552(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12729 in loop3535 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_12721(t3,((C_word*)t0)[2],t2);}
+
+/* loop3494 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12661(C_word t0,C_word 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_12661,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[47]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12690,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));
+C_trace("g35103511");
+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);}}
+
+/* k12688 in loop3494 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12690(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12690,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));
+C_trace("loop34943507");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12661(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));
+C_trace("loop34943507");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12661(t6,((C_word*)t0)[3],t5);}}
+
+/* k12649 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12651(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]);
+C_trace("optimizer.scm: 1726 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),((C_word*)t0)[2],t1,t2);}
+
+/* k12645 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12647(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12647,2,t0,t1);}
+t2=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[4],t1);
+C_trace("optimizer.scm: 1724 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k12587 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12589(C_word c,C_word t0,C_word 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_12589,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_12603,a[2]=((C_word*)t0)[3],a[3]=t5,tmp=(C_word)a,a+=4,tmp));
+t7=((C_word*)t5)[1];
+f_12603(t7,((C_word*)t0)[2],t3);}
+
+/* loop3518 in k12587 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12603(C_word 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_12603,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_12613,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));
+C_trace("g35253526");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12552(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12611 in loop3518 in k12587 in walk in extend-call-sites! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12613(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_12603(t3,((C_word*)t0)[2],t2);}
+
+/* reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12018(C_word t0,C_word 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_12018,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_12030,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_12032,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);
+C_trace("optimizer.scm: 1660 fold-right");
+((C_proc5)C_retrieve_symbol_proc(lf[126]))(5,*((C_word*)lf[126]+1),t4,t5,t8,t2);}
+
+/* a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12032(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_12032,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t2);
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12039,a[2]=t1,a[3]=t3,a[4]=((C_word*)t0)[3],a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 1663 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t5,((C_word*)t0)[2],t4,lf[45]);}
+
+/* k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12039(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_12039,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12042,a[2]=((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("optimizer.scm: 1664 hide-variable");
+((C_proc3)C_retrieve_symbol_proc(lf[217]))(3,*((C_word*)lf[217]+1),t2,((C_word*)t0)[5]);}
+
+/* k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12042(C_word c,C_word t0,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_12042,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_12051,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);
+C_trace("optimizer.scm: 1665 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),((C_word*)t0)[2],t4,t5);}
+
+/* a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12051(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_12051,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_12058,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_12203,a[2]=t8,a[3]=t13,a[4]=t10,tmp=(C_word)a,a+=5,tmp));
+t15=((C_word*)t13)[1];
+f_12203(t15,t11,t6);}
+
+/* loop3268 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12203(C_word t0,C_word 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_12203,NULL,3,t0,t1,t2);}
+if(C_truep((C_word)C_i_pairp(t2))){
+t3=C_retrieve(lf[84]);
+t4=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_12232,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));
+C_trace("g32843285");
+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);}}
+
+/* k12230 in loop3268 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12232(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_12232,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));
+C_trace("loop32683281");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12203(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));
+C_trace("loop32683281");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_12203(t6,((C_word*)t0)[3],t5);}}
+
+/* k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12058(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12058,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_12061,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_12154,a[2]=t3,a[3]=t8,a[4]=t5,tmp=(C_word)a,a+=5,tmp));
+t10=((C_word*)t8)[1];
+f_12154(t10,t6,((C_word*)t0)[5],t1);}
+
+/* loop3292 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12154(C_word t0,C_word 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_12154,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[134]+1);
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_12187,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));
+C_trace("g33123313");
+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);}}
+
+/* k12185 in loop3292 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 ab[11],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12187,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_12167,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_12167(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_12167(t5,t4);}}
+
+/* k12165 in k12185 in loop3292 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12167(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));
+C_trace("loop32923306");
+t5=((C_word*)((C_word*)t0)[3])[1];
+f_12154(t5,((C_word*)t0)[2],t3,t4);}
+
+/* k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12061(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12061,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12064,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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_12267,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_12282,a[2]=t6,a[3]=t8,tmp=(C_word)a,a+=4,tmp));
+t10=((C_word*)t8)[1];
+f_12282(t10,t2,t5);}
+
+/* walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12282(C_word t0,C_word 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_12282,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[11]);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12316,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_12346,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_12348,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_12348(t19,t15,t6);}
+else{
+t10=(C_word)C_eqp(t4,lf[9]);
+if(C_truep(t10)){
+t11=(C_word)C_i_car(t6);
+t12=f_12267(((C_word*)t0)[2],t11);
+t13=(C_word)C_a_i_list(&a,1,t12);
+C_trace("optimizer.scm: 1699 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),t1,t2,t13);}
+else{
+t11=(C_word)C_eqp(t4,lf[16]);
+if(C_truep(t11)){
+t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_12411,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_12267(((C_word*)t0)[2],t13);
+t15=(C_word)C_a_i_list(&a,1,t14);
+C_trace("optimizer.scm: 1701 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),t12,t2,t15);}
+else{
+t12=(C_word)C_eqp(t4,lf[13]);
+if(C_truep(t12)){
+t13=(C_word)C_i_car(t6);
+t14=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12464,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);
+C_trace("optimizer.scm: 1704 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+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_12523,a[2]=((C_word*)t0)[3],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
+t16=((C_word*)t14)[1];
+f_12523(t16,t1,t8);}}}}}
+
+/* loop3447 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 ab[5],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_12523,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_12533,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));
+C_trace("g34543455");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12282(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12531 in loop3447 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12533(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_12523(t3,((C_word*)t0)[2],t2);}
+
+/* a12463 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12464(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_12464,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_12479,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_12483,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_12485,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_12485(t14,t10,t2);}
+
+/* loop3423 in a12463 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 t7;
+C_word 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_12485,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_12267(((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));
+C_trace("loop34233436");
+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));
+C_trace("loop34233436");
+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);}}
+
+/* k12481 in a12463 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12483(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1707 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[57]))(5,*((C_word*)lf[57]+1),((C_word*)t0)[4],t1,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12477 in a12463 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12479(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]);
+C_trace("optimizer.scm: 1708 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_12282(t4,((C_word*)t0)[2],t3);}
+
+/* k12409 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12411(C_word c,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_12411,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_12416,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_12416(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3406 in k12409 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12416(C_word 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_12416,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_12426,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));
+C_trace("g34133414");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12282(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12424 in loop3406 in k12409 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12426(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_12416(t3,((C_word*)t0)[2],t2);}
+
+/* loop3369 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12348(C_word t0,C_word 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_12348,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_12267(((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));
+C_trace("loop33693382");
+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));
+C_trace("loop33693382");
+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);}}
+
+/* k12344 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12346(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1696 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k12314 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12316(C_word c,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_12316,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_12321,a[2]=((C_word*)t0)[4],a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t5=((C_word*)t3)[1];
+f_12321(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3392 in k12314 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_12321(C_word 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_12321,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_12331,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));
+C_trace("g33993400");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_12282(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k12329 in loop3392 in k12314 in walk in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12331(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_12321(t3,((C_word*)t0)[2],t2);}
+
+/* rename in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static C_word C_fcall f_12267(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);}}
+
+/* k12062 in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12064(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_12064,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_12139,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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("optimizer.scm: 1673 gensym");
+((C_proc3)C_retrieve_symbol_proc(lf[84]))(3,*((C_word*)lf[84]+1),t2,lf[85]);}
+
+/* k12137 in k12062 in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12139(C_word c,C_word t0,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_12139,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_12123,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_12127,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);
+C_trace("optimizer.scm: 1679 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k12125 in k12137 in k12062 in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 *a;
+t2=(C_word)C_i_length(((C_word*)t0)[5]);
+t3=(C_word)C_fixnum_plus(((C_word*)t0)[4],t2);
+C_trace("optimizer.scm: 1679 build-lambda-list");
+((C_proc5)C_retrieve_symbol_proc(lf[57]))(5,*((C_word*)lf[57]+1),((C_word*)t0)[3],t1,t3,((C_word*)t0)[2]);}
+
+/* k12121 in k12137 in k12062 in k12059 in k12056 in a12050 in k12040 in k12037 in a12031 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12123(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_12123,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[35],lf[13],t2,t4);
+t6=(C_word)C_a_i_list(&a,1,t5);
+t7=(C_word)C_a_i_record(&a,4,lf[35],lf[16],((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[35],lf[11],((C_word*)t0)[2],t8));}
+
+/* k12028 in reconstruct! in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_12030(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word ab[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_12030,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+C_trace("optimizer.scm: 1657 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11609(C_word t0,C_word 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_11609,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_11735,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_11970,a[2]=t4,a[3]=t9,a[4]=t6,tmp=(C_word)a,a+=5,tmp));
+t11=((C_word*)t9)[1];
+f_11970(t11,t7,t2);}
+
+/* loop3123 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11970(C_word t0,C_word 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_11970,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));
+C_trace("loop31233136");
+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));
+C_trace("loop31233136");
+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);}}
+
+/* k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11735(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_11735,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_11737,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_11868,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_11947,a[2]=t5,a[3]=t9,tmp=(C_word)a,a+=4,tmp));
+t11=((C_word*)t9)[1];
+f_11947(t11,t7,((C_word*)t0)[4]);}
+
+/* loop3147 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11947(C_word 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_11947,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_11957,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));
+C_trace("g32103211");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_11737(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11955 in loop3147 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11957(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_11947(t3,((C_word*)t0)[2],t2);}
+
+/* k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11868(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11868,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_11873,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_11873(t9,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11873(C_word t0,C_word 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_11873,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_11900,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_11941,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));
+C_trace("g32323233");
+t6=t3;
+f_11900(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11939 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11941(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_11941,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));
+C_trace("loop32163229");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11873(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));
+C_trace("loop32163229");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_11873(t6,((C_word*)t0)[3],t5);}}
+
+/* g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11900(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_11900,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11938,a[2]=t2,a[3]=((C_word*)t0)[3],a[4]=t3,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 1646 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t4,((C_word*)t0)[2],t3,lf[45]);}
+
+/* k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11938(C_word c,C_word t0,C_word t1){
+C_word 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_11938,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_11616,a[2]=((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_11618,a[2]=t6,a[3]=t3,tmp=(C_word)a,a+=4,tmp));
+t8=((C_word*)t6)[1];
+f_11618(t8,t4,t1);}
+
+/* walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_11618,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[11]);
+if(C_truep(t9)){
+t10=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11653,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);
+C_trace("optimizer.scm: 1622 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t10,t6,((C_word*)((C_word*)t0)[3])[1]);}
+else{
+t10=(C_word)C_eqp(t4,lf[13]);
+if(C_truep(t10)){
+t11=(C_word)C_i_car(t6);
+t12=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11694,a[2]=((C_word*)t0)[2],a[3]=t8,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1625 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+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_11711,a[2]=((C_word*)t0)[2],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
+t14=((C_word*)t12)[1];
+f_11711(t14,t1,t8);}}}
+
+/* loop3106 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11711(C_word 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_11711,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_11721,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));
+C_trace("g31133114");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_11618(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11719 in loop3106 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11721(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_11711(t3,((C_word*)t0)[2],t2);}
+
+/* a11693 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11694(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_11694,5,t0,t1,t2,t3,t4);}
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11699,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("optimizer.scm: 1628 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t5,t2,((C_word*)((C_word*)t0)[4])[1]);}
+
+/* k11697 in a11693 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11699(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]);
+C_trace("optimizer.scm: 1629 walk");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11618(t4,((C_word*)t0)[2],t3);}
+
+/* k11651 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11653(C_word c,C_word t0,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_11653,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_11658,a[2]=((C_word*)t0)[4],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_11658(t6,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3088 in k11651 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11658(C_word 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_11658,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_11668,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));
+C_trace("g30953096");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_11618(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11666 in loop3088 in k11651 in walk in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11668(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_11658(t3,((C_word*)t0)[2],t2);}
+
+/* k11614 in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 t6;
+C_word t7;
+C_word ab[12],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11616,2,t0,t1);}
+t2=((C_word*)((C_word*)t0)[6])[1];
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_11914,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_11916,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_11930,a[2]=t4,a[3]=t3,tmp=(C_word)a,a+=4,tmp);
+t6=(C_word)C_i_cdr(((C_word*)t0)[2]);
+C_trace("optimizer.scm: 1652 delete-duplicates");
+((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),t5,t6,*((C_word*)lf[34]+1));}
+
+/* k11928 in k11614 in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11930(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1648 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[170]))(4,*((C_word*)lf[170]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* a11915 in k11614 in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11916(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_11916,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])));}
+
+/* k11912 in k11614 in k11936 in g3232 in loop3216 in k11866 in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11914(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_11914,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 k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11737(C_word 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_11737,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_car(t2);
+t4=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11859,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_11861,a[2]=t3,tmp=(C_word)a,a+=3,tmp);
+C_trace("optimizer.scm: 1637 count");
+((C_proc4)C_retrieve_symbol_proc(lf[216]))(4,*((C_word*)lf[216]+1),t4,t5,((C_word*)((C_word*)t0)[5])[1]);}
+
+/* a11860 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11861(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_11861,3,t0,t1,t2);}
+t3=*((C_word*)lf[34]+1);
+C_trace("g31643165");
+t4=t3;
+((C_proc4)C_retrieve_proc(t4))(4,t4,t1,((C_word*)t0)[2],t2);}
+
+/* k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_11859,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_11757,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_11825,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_11825(t9,t5,t4);}}
+
+/* loop3169 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11825(C_word t0,C_word 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_11825,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_11833,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_11844,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));
+C_trace("g31763177");
+t6=t3;
+f_11833(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11842 in loop3169 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11844(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_11825(t3,((C_word*)t0)[2],t2);}
+
+/* g3176 in loop3169 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11833(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_11833,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_assq(t2,((C_word*)t0)[3]);
+C_trace("optimizer.scm: 1640 walk");
+t4=((C_word*)((C_word*)t0)[2])[1];
+f_11737(t4,t1,t3);}
+
+/* k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11757(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word 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_11757,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_11767,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_11775,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_11779,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_11781,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_11781(t14,t10,((C_word*)t0)[2]);}
+
+/* loop3184 in k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11781(C_word t0,C_word 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_11781,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_11808,a[2]=((C_word*)t0)[5],tmp=(C_word)a,a+=3,tmp);
+t4=(C_word)C_slot(t2,C_fix(0));
+t5=f_11808(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));
+C_trace("loop31843197");
+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));
+C_trace("loop31843197");
+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);}}
+
+/* g3200 in loop3184 in k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static C_word C_fcall f_11808(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));}
+
+/* k11777 in k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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("optimizer.scm: 1642 concatenate");
+((C_proc3)C_retrieve_symbol_proc(lf[215]))(3,*((C_word*)lf[215]+1),((C_word*)t0)[2],t1);}
+
+/* k11773 in k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11775(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1642 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11765 in k11755 in k11857 in walk in k11733 in compute-extra-variables in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11767(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11298(C_word t0,C_word 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_11298,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_11302,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_11304,a[2]=t3,a[3]=t6,tmp=(C_word)a,a+=4,tmp));
+t8=((C_word*)t6)[1];
+f_11304(t8,t4,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11304(C_word t0,C_word 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_11304,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[9]);
+t11=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_11338,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_11338(t12,t10);}
+else{
+t12=(C_word)C_eqp(t5,lf[26]);
+if(C_truep(t12)){
+t13=t11;
+f_11338(t13,t12);}
+else{
+t13=(C_word)C_eqp(t5,lf[70]);
+if(C_truep(t13)){
+t14=t11;
+f_11338(t14,t13);}
+else{
+t14=(C_word)C_eqp(t5,lf[213]);
+t15=t11;
+f_11338(t15,(C_truep(t14)?t14:(C_word)C_eqp(t5,lf[160])));}}}}
+
+/* k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11338(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11338,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[11]);
+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_11349,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_11349(t6,((C_word*)t0)[8],((C_word*)t0)[5],((C_word*)t0)[3]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[7],lf[13]);
+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_11400,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);
+C_trace("optimizer.scm: 1587 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),((C_word*)t0)[8],t4,t5);}
+else{
+t4=(C_word)C_eqp(((C_word*)t0)[7],lf[15]);
+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_11424,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_11457,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[2],a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1593 call-with-current-continuation");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[19]+1)))(3,*((C_word*)lf[19]+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_11560,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_11560(t8,((C_word*)t0)[8],((C_word*)t0)[3]);}}}}}
+
+/* loop3049 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11560(C_word t0,C_word 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_11560,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_11568,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_11575,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));
+C_trace("g30563057");
+t6=t3;
+f_11568(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11573 in loop3049 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11575(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_11560(t3,((C_word*)t0)[2],t2);}
+
+/* g3056 in loop3049 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11568(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_11568,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1608 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11304(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11457(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_11457,3,t0,t1,t2);}
+t3=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t4=(C_word)C_eqp(lf[9],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_11473,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_11473(t12,t1,t8);}
+else{
+t5=C_SCHEME_UNDEFINED;
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,t5);}}
+
+/* loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11473(C_word t0,C_word 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_11473,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_11493,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_11526,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);
+C_trace("optimizer.scm: 1602 lset<=");
+((C_proc5)C_retrieve_symbol_proc(lf[129]))(5,*((C_word*)lf[129]+1),t7,*((C_word*)lf[34]+1),t8,((C_word*)t0)[2]);}
+else{
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_UNDEFINED);}}}
+
+/* k11524 in loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11526(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_11526,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[5];
+f_11493(2,t2,C_SCHEME_UNDEFINED);}
+else{
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_11530,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);
+C_trace("optimizer.scm: 1604 delete!");
+((C_proc5)C_retrieve_symbol_proc(lf[214]))(5,*((C_word*)lf[214]+1),t2,((C_word*)t0)[2],((C_word*)((C_word*)t0)[4])[1],*((C_word*)lf[34]+1));}}
+
+/* k11528 in k11524 in loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11530(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("optimizer.scm: 1605 return");
+t3=((C_word*)t0)[3];
+((C_proc3)C_retrieve_proc(t3))(3,t3,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k11491 in loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11493(C_word c,C_word t0,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_11493,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_11502,a[2]=((C_word*)t0)[3],a[3]=t4,tmp=(C_word)a,a+=4,tmp));
+t6=((C_word*)t4)[1];
+f_11502(t6,((C_word*)t0)[2],t2);}
+
+/* loop3015 in k11491 in loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11502(C_word 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_11502,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_11512,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));
+C_trace("g30223023");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_11473(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11510 in loop3015 in k11491 in loop in a11456 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11512(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_11502(t3,((C_word*)t0)[2],t2);}
+
+/* k11422 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 t4;
+C_word t5;
+C_word ab[7],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_11424,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_11429,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_11429(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop3034 in k11422 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11429(C_word t0,C_word 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_11429,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_11437,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_11444,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));
+C_trace("g30413042");
+t6=t3;
+f_11437(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11442 in loop3034 in k11422 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11444(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_11429(t3,((C_word*)t0)[2],t2);}
+
+/* g3041 in loop3034 in k11422 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11437(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_11437,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1607 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11304(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* a11399 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11400(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_11400,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_11412,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1590 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t6,t2,((C_word*)t0)[2]);}
+
+/* k11410 in a11399 in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11412(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1590 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11304(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11349(C_word t0,C_word 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_11349,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_11367,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1582 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t5,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11370,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);
+C_trace("optimizer.scm: 1584 walk");
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_11304(t6,t4,t5,((C_word*)t0)[3]);}}
+
+/* k11368 in loop in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11370(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]);
+C_trace("optimizer.scm: 1585 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11349(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k11365 in loop in k11336 in walk in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11367(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1582 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11304(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11300 in eliminate4 in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11302(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11017(C_word t0,C_word 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_11017,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_11021,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_11023,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_11023(t9,t5,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11023(C_word t0,C_word 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_11023,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[9]);
+t11=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_11057,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_11057(t12,t10);}
+else{
+t12=(C_word)C_eqp(t5,lf[26]);
+if(C_truep(t12)){
+t13=t11;
+f_11057(t13,t12);}
+else{
+t13=(C_word)C_eqp(t5,lf[70]);
+if(C_truep(t13)){
+t14=t11;
+f_11057(t14,t13);}
+else{
+t14=(C_word)C_eqp(t5,lf[213]);
+t15=t11;
+f_11057(t15,(C_truep(t14)?t14:(C_word)C_eqp(t5,lf[160])));}}}}
+
+/* k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11057(C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word t5;
+C_word t6;
+C_word t7;
+C_word 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_11057,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[11]);
+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_11068,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_11068(t6,((C_word*)t0)[11],((C_word*)t0)[8],((C_word*)t0)[6]);}
+else{
+t3=(C_word)C_eqp(((C_word*)t0)[10],lf[13]);
+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_11116,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_11150,a[2]=t5,a[3]=((C_word*)t0)[2],tmp=(C_word)a,a+=4,tmp);
+t8=(C_word)C_i_cdr(t4);
+C_trace("optimizer.scm: 1539 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+1),t7,t8,((C_word*)t0)[7],((C_word*)((C_word*)t0)[2])[1]);}
+else{
+t7=C_SCHEME_UNDEFINED;
+t8=t5;
+f_11116(t8,t7);}}
+else{
+t6=t5;
+f_11116(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_11159,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_11159(t7,((C_word*)t0)[11],((C_word*)t0)[6]);}}}}
+
+/* loop2913 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11159(C_word t0,C_word 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_11159,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_11167,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_11174,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));
+C_trace("g29202921");
+t6=t3;
+f_11167(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k11172 in loop2913 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11174(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_11159(t3,((C_word*)t0)[2],t2);}
+
+/* g2920 in loop2913 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11167(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_11167,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1545 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_11023(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* k11148 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 *a;
+t2=C_mutate(((C_word *)((C_word*)t0)[3])+1,t1);
+t3=((C_word*)t0)[2];
+f_11116(t3,t2);}
+
+/* k11114 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11116(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_11116,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_11125,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("optimizer.scm: 1540 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),((C_word*)t0)[2],t2,t3);}
+
+/* a11124 in k11114 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11125(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_11125,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_11137,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1543 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t6,t2,((C_word*)t0)[2]);}
+
+/* k11135 in a11124 in k11114 in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11137(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1543 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11023(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_11068(C_word t0,C_word 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_11068,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_11086,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1530 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t5,((C_word*)t0)[4],((C_word*)t0)[3]);}
+else{
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_11089,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);
+C_trace("optimizer.scm: 1532 walk");
+t6=((C_word*)((C_word*)t0)[5])[1];
+f_11023(t6,t4,t5,((C_word*)t0)[3]);}}
+
+/* k11087 in loop in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11089(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]);
+C_trace("optimizer.scm: 1533 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_11068(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k11084 in loop in k11055 in walk in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11086(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1530 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_11023(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k11019 in collect-accessibles in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11021(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10884(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_10884,NULL,4,t0,t1,t2,t3);}
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10890,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1500 remove");
+((C_proc4)C_retrieve_symbol_proc(lf[170]))(4,*((C_word*)lf[170]+1),t1,t4,t3);}
+
+/* a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10890(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_10890,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10924,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_10934,a[2]=t4,a[3]=t3,a[4]=t5,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1510 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[205]))(3,*((C_word*)lf[205]+1),t6,t5);}
+
+/* k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10934(C_word c,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_10934,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_10939,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_10939(t5,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10939(C_word t0,C_word 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_10939,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_10946,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);
+C_trace("optimizer.scm: 1513 lset-difference");
+((C_proc6)C_retrieve_symbol_proc(lf[192]))(6,*((C_word*)lf[192]+1),t5,*((C_word*)lf[34]+1),t6,t3,((C_word*)t0)[2]);}
+
+/* k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10946(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_10946,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11007,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]);
+C_trace("optimizer.scm: 1514 delete-duplicates");
+((C_proc4)C_retrieve_symbol_proc(lf[212]))(4,*((C_word*)lf[212]+1),t2,t3,*((C_word*)lf[34]+1));}
+
+/* k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11007(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_11007,2,t0,t1);}
+t2=(C_word)C_i_length(t1);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_11003,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);
+C_trace("optimizer.scm: 1515 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t3,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k11001 in k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_11003(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word 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_11003,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_10959,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_10961,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_10961(t11,t7,((C_word*)t0)[2]);}
+
+/* loop2831 in k11001 in k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10961(C_word t0,C_word 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_10961,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_10988,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_10995,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));
+C_trace("g28472848");
+t6=t3;
+f_10988(t6,t4,t5);}
+else{
+t3=((C_word*)((C_word*)t0)[2])[1];
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10993 in loop2831 in k11001 in k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_10995,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));
+C_trace("loop28312844");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10961(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));
+C_trace("loop28312844");
+t6=((C_word*)((C_word*)t0)[4])[1];
+f_10961(t6,((C_word*)t0)[3],t5);}}
+
+/* g2847 in loop2831 in k11001 in k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10988(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_10988,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1516 count");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10939(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* k10957 in k11001 in k11005 in k10944 in count in k10932 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10959(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1516 fold");
+((C_proc5)C_retrieve_symbol_proc(lf[127]))(5,*((C_word*)lf[127]+1),((C_word*)t0)[3],*((C_word*)lf[211]+1),((C_word*)t0)[2],t1);}
+
+/* k10922 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10924(C_word c,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_10924,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_10902,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]);
+C_trace("optimizer.scm: 1503 any");
+((C_proc4)C_retrieve_symbol_proc(lf[30]))(4,*((C_word*)lf[30]+1),((C_word*)t0)[5],t3,t4);}}
+
+/* a10901 in k10922 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10902(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_10902,3,t0,t1,t2);}
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10909,a[2]=t1,a[3]=((C_word*)t0)[3],a[4]=t2,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1504 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t3,((C_word*)t0)[2],t2,lf[75]);}
+
+/* k10907 in a10901 in k10922 in a10889 in eliminate in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10909(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10596(C_word t0,C_word 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_10596,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_10599,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_10807,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_10809,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_10809(t16,t12,t2);}
+
+/* loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10809(C_word t0,C_word 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_10809,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_10817,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_10871,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));
+C_trace("g27842785");
+t6=t3;
+f_10817(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10869 in loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 *a;
+t2=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10809(t3,((C_word*)t0)[2],t2);}
+
+/* g2784 in loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10817(C_word t0,C_word 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_10817,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_10832,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_10842,a[2]=((C_word*)t0)[2],a[3]=t4,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1489 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t9,t6,t10);}
+
+/* a10841 in g2784 in loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10842(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_10842,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);
+C_trace("optimizer.scm: 1492 walk");
+t7=((C_word*)((C_word*)t0)[2])[1];
+f_10599(t7,t1,t6,t2);}
+
+/* k10830 in g2784 in loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10832(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_10832,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10836,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]);
+C_trace("optimizer.scm: 1493 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+1),t2,((C_word*)t0)[2],t3,((C_word*)((C_word*)t0)[6])[1]);}
+
+/* k10834 in k10830 in g2784 in loop2703 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10836(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);}
+
+/* k10805 in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10807(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10599(C_word t0,C_word 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_10599,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[9]);
+t11=(C_truep(t10)?t10:(C_word)C_eqp(t5,lf[16]));
+if(C_truep(t11)){
+t12=(C_word)C_i_car(t7);
+t13=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10639,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_10686,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_10686(2,t16,t14);}
+else{
+C_trace("optimizer.scm: 1465 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t15,((C_word*)t0)[2],t12,lf[102]);}}
+else{
+t12=(C_word)C_eqp(t5,lf[11]);
+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_10704,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_10704(t16,t1,t7,t9);}
+else{
+t13=(C_word)C_eqp(t5,lf[13]);
+if(C_truep(t13)){
+t14=(C_word)C_i_car(t7);
+t15=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10758,a[2]=t3,a[3]=((C_word*)t0)[6],a[4]=t9,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1477 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+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_10775,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_10775(t17,t1,t9);}}}}
+
+/* loop2770 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10775(C_word t0,C_word 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_10775,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_10783,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_10790,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));
+C_trace("g27772778");
+t6=t3;
+f_10783(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10788 in loop2770 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10790(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_10775(t3,((C_word*)t0)[2],t2);}
+
+/* g2777 in loop2770 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10783(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_10783,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1480 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10599(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* a10757 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10758(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_10758,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_10770,a[2]=t5,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1479 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t6,t2,((C_word*)t0)[2]);}
+
+/* k10768 in a10757 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10770(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1479 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_10599(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10704(C_word t0,C_word 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_10704,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_10722,a[2]=t4,a[3]=t1,a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1472 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+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_10728,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);
+C_trace("optimizer.scm: 1474 walk");
+t7=((C_word*)((C_word*)t0)[5])[1];
+f_10599(t7,t5,t6,((C_word*)t0)[3]);}}
+
+/* k10726 in loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10728(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]);
+C_trace("optimizer.scm: 1475 loop");
+t4=((C_word*)((C_word*)t0)[3])[1];
+f_10704(t4,((C_word*)t0)[2],t2,t3);}
+
+/* k10720 in loop in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10722(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1472 walk");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_10599(t2,((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10684 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10686(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_10686,2,t0,t1);}
+if(C_truep(t1)){
+t2=((C_word*)t0)[4];
+f_10639(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_10639(t4,t3);}}
+
+/* k10637 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10639(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_10639,NULL,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10642,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_10642(t5,t4);}
+else{
+t3=t2;
+f_10642(t3,C_SCHEME_UNDEFINED);}}
+
+/* k10640 in k10637 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10642(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_10642,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_10647,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_10647(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop2745 in k10640 in k10637 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10647(C_word t0,C_word 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_10647,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_10655,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_10662,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));
+C_trace("g27522753");
+t6=t3;
+f_10655(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10660 in loop2745 in k10640 in k10637 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10662(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_10647(t3,((C_word*)t0)[2],t2);}
+
+/* g2752 in loop2745 in k10640 in k10637 in walk in build-call-graph in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10655(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_10655,NULL,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1468 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_10599(t3,t1,t2,((C_word*)t0)[2]);}
+
+/* find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10490(C_word t0,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_10490,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_10494,a[2]=t3,a[3]=t1,tmp=(C_word)a,a+=4,tmp);
+t5=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10496,a[2]=t3,a[3]=((C_word*)t0)[3],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1436 ##sys#hash-table-for-each");
+((C_proc4)C_retrieve_symbol_proc(lf[210]))(4,*((C_word*)lf[210]+1),t4,t5,((C_word*)t0)[2]);}
+
+/* a10495 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10496(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_10496,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_assq(lf[45],t3);
+if(C_truep(t4)){
+t5=(C_word)C_i_assq(lf[76],t3);
+if(C_truep(t5)){
+t6=(C_word)C_i_assq(lf[120],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_10527,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[77],t3))){
+t10=t9;
+f_10527(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[13],t11);
+if(C_truep(t12)){
+if(C_truep((C_word)C_i_assq(lf[102],t3))){
+t13=t9;
+f_10527(t13,C_SCHEME_FALSE);}
+else{
+t13=(C_word)C_i_cdr(t6);
+t14=(C_word)C_i_length(t13);
+t15=t9;
+f_10527(t15,(C_word)C_eqp(t8,t14));}}
+else{
+t13=t9;
+f_10527(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);}}
+
+/* k10525 in a10495 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10527(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_10527,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10531,a[2]=((C_word*)t0)[2],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]);
+C_trace("optimizer.scm: 1447 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+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);}}
+
+/* k10529 in k10525 in a10495 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 ab[4],*a=ab;
+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)[6])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10535,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]);
+C_trace("optimizer.scm: 1448 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+1),t3,((C_word*)t0)[2],t4,((C_word*)((C_word*)t0)[5])[1]);}
+
+/* k10533 in k10529 in k10525 in a10495 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10535(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);}
+
+/* k10492 in find-lifting-candidates in ##compiler#perform-lambda-lifting! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10494(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9102(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_9102,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_9105,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_9304,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_9758,a[2]=t3,a[3]=t5,tmp=(C_word)a,a+=4,tmp));
+t21=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10482,a[2]=t2,a[3]=t13,a[4]=t5,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 1415 debugging");
+((C_proc4)C_retrieve_symbol_proc(lf[6]))(4,*((C_word*)lf[6]+1),t21,lf[20],lf[208]);}
+
+/* k10480 in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10482(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_10482,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10485,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1416 walk");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9105(t3,t2,C_SCHEME_FALSE,((C_word*)t0)[2],C_SCHEME_FALSE);}
+
+/* k10483 in k10480 in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10485(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 k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9758(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_9758,NULL,8,t0,t1,t2,t3,t4,t5,t6,t7);}
+t8=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9762,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_10470,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_10472,a[2]=t5,tmp=(C_word)a,a+=3,tmp);
+C_trace("##sys#make-promise");
+t11=*((C_word*)lf[206]+1);
+((C_proc3)(void*)(*((C_word*)t11+1)))(3,t11,t9,t10);}
+else{
+C_trace("optimizer.scm: 1306 debugging");
+((C_proc6)C_retrieve_symbol_proc(lf[6]))(6,*((C_word*)lf[6]+1),t8,lf[7],lf[207],t3,t7);}}
+
+/* a10471 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10472(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_10472,2,t0,t1);}
+C_trace("optimizer.scm: 1305 unzip1");
+((C_proc3)C_retrieve_symbol_proc(lf[205]))(3,*((C_word*)lf[205]+1),t1,((C_word*)t0)[2]);}
+
+/* k10468 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10470(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1305 debugging");
+((C_proc7)C_retrieve_symbol_proc(lf[6]))(7,*((C_word*)lf[6]+1),((C_word*)t0)[4],lf[7],lf[204],((C_word*)t0)[3],t1,((C_word*)t0)[2]);}
+
+/* k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9762(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word 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_9762,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_9777,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);
+C_trace("optimizer.scm: 1311 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t9,((C_word*)t0)[2],((C_word*)t0)[4],lf[120]);}
+
+/* k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9777(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9777,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_9786,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_9786(t9,(C_word)C_i_listp(t8));}
+else{
+t8=t5;
+f_9786(t8,C_SCHEME_FALSE);}}
+else{
+t6=t5;
+f_9786(t6,C_SCHEME_FALSE);}}
+
+/* k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9786(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_9786,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_9792,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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);
+C_trace("optimizer.scm: 1315 caaddr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[202]+1)))(3,*((C_word*)lf[202]+1),t3,((C_word*)t0)[13]);}
+else{
+C_trace("optimizer.scm: 1413 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[178]))(4,*((C_word*)lf[178]+1),((C_word*)t0)[10],lf[203],((C_word*)t0)[13]);}}
+
+/* k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9792(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_9792,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|15,a[1]=(C_word)f_9795,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);
+C_trace("optimizer.scm: 1316 cdaddr");
+((C_proc3)C_retrieve_proc(*((C_word*)lf[201]+1)))(3,*((C_word*)lf[201]+1),t2,((C_word*)t0)[14]);}
+
+/* k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 ab[15],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9795,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_9801,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],a[5]=((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("optimizer.scm: 1320 node-class-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[193]))(4,*((C_word*)lf[193]+1),t4,((C_word*)t0)[5],lf[182]);}
+
+/* k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9801(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_9801,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|10,a[1]=(C_word)f_9804,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_10084,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_10084(t9,t2,t5);}
+
+/* rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10084(C_word t0,C_word 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_10084,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[15]);
+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[9],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_10153,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);
+C_trace("optimizer.scm: 1334 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+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_10306,a[2]=t2,a[3]=t1,a[4]=t6,tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1359 node-class-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[193]))(4,*((C_word*)lf[193]+1),t20,t2,lf[199]);}
+else{
+C_trace("optimizer.scm: 1362 bomb");
+((C_proc3)C_retrieve_symbol_proc(lf[178]))(3,*((C_word*)lf[178]+1),t1,lf[200]);}}}
+else{
+t16=t1;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_UNDEFINED);}}
+else{
+t10=(C_word)C_eqp(t8,lf[11]);
+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_10358,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);
+C_trace("optimizer.scm: 1367 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+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_10373,a[2]=((C_word*)t0)[3],a[3]=t14,tmp=(C_word)a,a+=4,tmp));
+t16=((C_word*)t14)[1];
+f_10373(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_10399,a[2]=((C_word*)t0)[3],a[3]=t12,tmp=(C_word)a,a+=4,tmp));
+t14=((C_word*)t12)[1];
+f_10399(t14,t1,t6);}}}
+
+/* loop2538 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10399(C_word 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_10399,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_10409,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));
+C_trace("g25452546");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_10084(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10407 in loop2538 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10409(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_10399(t3,((C_word*)t0)[2],t2);}
+
+/* loop2525 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10373(C_word 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_10373,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_10383,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));
+C_trace("g25322533");
+t5=((C_word*)((C_word*)t0)[2])[1];
+f_10084(t5,t3,t4);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10381 in loop2525 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10383(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_10373(t3,((C_word*)t0)[2],t2);}
+
+/* k10356 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10358(C_word c,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_10358,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[6])+1,t1);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10361,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)C_i_cadr(((C_word*)t0)[2]);
+C_trace("optimizer.scm: 1368 copy-node!");
+((C_proc4)C_retrieve_symbol_proc(lf[189]))(4,*((C_word*)lf[189]+1),t3,t4,((C_word*)t0)[3]);}
+
+/* k10359 in k10356 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10361(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1369 rec");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_10084(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10304 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10306(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_10306,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10309,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("optimizer.scm: 1360 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),t2,((C_word*)t0)[2],C_SCHEME_END_OF_LIST);}
+
+/* k10307 in k10304 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10309(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]);
+C_trace("optimizer.scm: 1361 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10153(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word t3;
+C_word t4;
+C_word 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*)tr2,(void*)f_10153,2,t0,t1);}
+t2=C_mutate(((C_word *)((C_word*)t0)[12])+1,t1);
+t3=(C_word)C_i_car(((C_word*)t0)[11]);
+t4=(C_word)C_eqp(((C_word*)t0)[10],t3);
+if(C_truep(t4)){
+t5=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10162,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);
+t6=(C_word)C_i_cdr(((C_word*)t0)[9]);
+t7=(C_word)C_i_length(t6);
+t8=(C_word)C_eqp(((C_word*)t0)[5],t7);
+if(C_truep(t8)){
+t9=t5;
+f_10162(2,t9,C_SCHEME_UNDEFINED);}
+else{
+C_trace("optimizer.scm: 1337 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[190]))(4,*((C_word*)lf[190]+1),t5,lf[195],((C_word*)t0)[4]);}}
+else{
+t5=(C_word)C_i_car(((C_word*)t0)[11]);
+t6=(C_word)C_i_assq(t5,((C_word*)((C_word*)t0)[3])[1]);
+if(C_truep(t6)){
+t7=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10200,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],a[4]=((C_word*)t0)[7],a[5]=((C_word*)t0)[9],a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[2],tmp=(C_word)a,a+=8,tmp);
+C_trace("g24872488");
+t8=t7;
+f_10200(t8,((C_word*)t0)[8],t6);}
+else{
+C_trace("optimizer.scm: 1357 bomb");
+((C_proc4)C_retrieve_symbol_proc(lf[178]))(4,*((C_word*)lf[178]+1),((C_word*)t0)[8],lf[198],((C_word*)t0)[11]);}}}
+
+/* g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_10200(C_word t0,C_word 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_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_10200,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cdr(t2);
+t4=(C_word)C_slot(t3,C_fix(3));
+t5=(C_word)C_i_car(t4);
+t6=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10210,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],a[5]=((C_word*)t0)[6],a[6]=t5,a[7]=t1,a[8]=((C_word*)t0)[7],tmp=(C_word)a,a+=9,tmp);
+t7=(C_word)C_i_cdr(((C_word*)t0)[5]);
+t8=(C_word)C_i_length(t7);
+t9=(C_word)C_eqp(((C_word*)t0)[3],t8);
+if(C_truep(t9)){
+t10=t6;
+f_10210(2,t10,C_SCHEME_UNDEFINED);}
+else{
+C_trace("optimizer.scm: 1348 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[190]))(4,*((C_word*)lf[190]+1),t6,lf[197],((C_word*)t0)[2]);}}
+
+/* k10208 in g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10210(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_10210,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|8,a[1]=(C_word)f_10213,a[2]=((C_word*)t0)[2],a[3]=((C_word*)t0)[3],a[4]=((C_word*)t0)[4],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("optimizer.scm: 1351 node-class-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[193]))(4,*((C_word*)lf[193]+1),t2,((C_word*)t0)[3],lf[11]);}
+
+/* k10211 in k10208 in g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_10213,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_10216,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=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_10247,a[2]=((C_word*)t0)[3],a[3]=t2,tmp=(C_word)a,a+=4,tmp);
+t4=(C_word)C_slot(((C_word*)t0)[2],C_fix(2));
+t5=(C_word)C_i_caddr(t4);
+C_trace("optimizer.scm: 1352 take");
+((C_proc4)C_retrieve_symbol_proc(lf[196]))(4,*((C_word*)lf[196]+1),t3,t5,C_fix(1));}
+
+/* k10245 in k10211 in k10208 in g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10247(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1352 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),((C_word*)t0)[3],((C_word*)t0)[2],t1);}
+
+/* k10214 in k10211 in k10208 in g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 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_10216,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10219,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_a_i_list(&a,2,C_SCHEME_FALSE,((C_word*)t0)[4]);
+t4=(C_word)C_i_cddr(((C_word*)t0)[3]);
+t5=(C_word)C_a_i_record(&a,4,lf[35],lf[194],t3,t4);
+t6=(C_word)C_a_i_list(&a,2,t5,((C_word*)t0)[5]);
+C_trace("optimizer.scm: 1353 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),t2,((C_word*)t0)[2],t6);}
+
+/* k10217 in k10214 in k10211 in k10208 in g2487 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10219(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1356 rec");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_10084(t2,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* k10160 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10162(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_10162,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_10165,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("optimizer.scm: 1340 node-class-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[193]))(4,*((C_word*)lf[193]+1),t2,((C_word*)t0)[3],lf[194]);}
+
+/* k10163 in k10160 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10165(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_10165,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_10168,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_a_i_list(&a,2,C_SCHEME_TRUE,((C_word*)t0)[2]);
+C_trace("optimizer.scm: 1341 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),t2,((C_word*)t0)[3],t3);}
+
+/* k10166 in k10163 in k10160 in k10151 in rec in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 *a;
+t2=(C_word)C_i_cddr(((C_word*)t0)[4]);
+C_trace("optimizer.scm: 1342 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9804(C_word c,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_9804,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9807,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);
+t3=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9975,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*)t0)[7],tmp=(C_word)a,a+=7,tmp);
+t4=(*a=C_CLOSURE_TYPE|1,a[1]=(C_word)f_10066,tmp=(C_word)a,a+=2,tmp);
+C_trace("optimizer.scm: 1390 lset-difference");
+((C_proc5)C_retrieve_symbol_proc(lf[192]))(5,*((C_word*)lf[192]+1),t3,t4,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1]);}
+
+/* a10065 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10066(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_10066,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_cdr(t2);
+t5=(C_word)C_i_cdr(t3);
+t6=t1;
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,(C_word)C_eqp(t4,t5));}
+
+/* k9973 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9975(C_word c,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_9975,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_9977,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],tmp=(C_word)a,a+=7,tmp));
+t5=((C_word*)t3)[1];
+f_9977(t5,((C_word*)t0)[2],t1);}
+
+/* loop2555 in k9973 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9977(C_word t0,C_word 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_9977,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_9985,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_10053,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));
+C_trace("g25622563");
+t6=t3;
+f_9985(t6,t4,t5);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k10051 in loop2555 in k9973 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10053(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_9977(t3,((C_word*)t0)[2],t2);}
+
+/* g2562 in loop2555 in k9973 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9985(C_word t0,C_word 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_9985,NULL,3,t0,t1,t2);}
+t3=(C_word)C_i_cdr(t2);
+t4=(C_word)C_slot(t3,C_fix(3));
+t5=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_10000,a[2]=t3,a[3]=t1,a[4]=((C_word*)t0)[4],a[5]=((C_word*)t0)[5],a[6]=t4,tmp=(C_word)a,a+=7,tmp);
+t6=(C_word)C_i_cdr(t4);
+t7=(C_word)C_i_length(t6);
+t8=(C_word)C_eqp(((C_word*)t0)[3],t7);
+if(C_truep(t8)){
+t9=t5;
+f_10000(2,t9,C_SCHEME_UNDEFINED);}
+else{
+C_trace("optimizer.scm: 1380 quit");
+((C_proc4)C_retrieve_symbol_proc(lf[190]))(4,*((C_word*)lf[190]+1),t5,lf[191],((C_word*)t0)[2]);}}
+
+/* k9998 in g2562 in loop2555 in k9973 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_10000(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word 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_10000,2,t0,t1);}
+t2=(C_word)C_i_cadr(((C_word*)t0)[6]);
+t3=(C_word)C_a_i_list(&a,4,C_SCHEME_TRUE,C_SCHEME_FALSE,((C_word*)t0)[5],((C_word*)t0)[4]);
+t4=(C_word)C_i_car(((C_word*)t0)[6]);
+t5=(C_word)C_i_cddr(((C_word*)t0)[6]);
+t6=(C_word)C_a_i_cons(&a,2,t4,t5);
+t7=(C_word)C_a_i_record(&a,4,lf[35],lf[186],t3,t6);
+t8=(C_word)C_a_i_list(&a,2,t2,t7);
+C_trace("optimizer.scm: 1383 node-subexpressions-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[114]))(4,*((C_word*)lf[114]+1),((C_word*)t0)[3],((C_word*)t0)[2],t8);}
+
+/* k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9807(C_word c,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_9807,2,t0,t1);}
+t2=(C_truep(((C_word*)t0)[4])?(C_word)C_i_pairp(((C_word*)t0)[3]):C_SCHEME_FALSE);
+if(C_truep(t2)){
+t3=(C_word)C_a_i_record(&a,4,lf[35],C_SCHEME_FALSE,C_SCHEME_FALSE,C_SCHEME_FALSE);
+t4=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9824,a[2]=t3,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[3],a[5]=((C_word*)t0)[2],tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 1395 copy-node!");
+((C_proc4)C_retrieve_symbol_proc(lf[189]))(4,*((C_word*)lf[189]+1),t4,((C_word*)t0)[4],t3);}
+else{
+t3=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,C_SCHEME_UNDEFINED);}}
+
+/* k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9824(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_9824,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9827,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|1,a[1]=(C_word)f_9895,tmp=(C_word)a,a+=2,tmp);
+C_trace("optimizer.scm: 1397 fold-right");
+((C_proc5)C_retrieve_symbol_proc(lf[126]))(5,*((C_word*)lf[126]+1),t2,t3,((C_word*)t0)[2],((C_word*)t0)[4]);}
+
+/* a9894 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9895(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[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_9895,4,t0,t1,t2,t3);}
+t4=(C_word)C_i_car(t2);
+t5=(C_word)C_a_i_list(&a,1,t4);
+t6=(C_word)C_i_cdr(t2);
+t7=(C_word)C_slot(t6,C_fix(3));
+t8=(C_word)C_i_car(t7);
+t9=(C_word)C_slot(t8,C_fix(1));
+t10=(C_word)C_slot(t8,C_fix(2));
+t11=(C_word)C_slot(t8,C_fix(3));
+t12=(C_word)C_a_i_record(&a,4,lf[35],t9,t10,t11);
+t13=(C_word)C_a_i_list(&a,2,t12,t3);
+t14=t1;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,(C_word)C_a_i_record(&a,4,lf[35],lf[11],t5,t13));}
+
+/* k9825 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9827(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_9827,2,t0,t1);}
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9830,a[2]=((C_word*)t0)[3],a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1406 copy-node!");
+((C_proc4)C_retrieve_symbol_proc(lf[189]))(4,*((C_word*)lf[189]+1),t2,t1,((C_word*)t0)[2]);}
+
+/* k9828 in k9825 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9830(C_word c,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_9830,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_9835,a[2]=t3,tmp=(C_word)a,a+=3,tmp));
+t5=((C_word*)t3)[1];
+f_9835(t5,((C_word*)t0)[3],((C_word*)t0)[2]);}
+
+/* loop2621 in k9828 in k9825 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9835(C_word t0,C_word 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_9835,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=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9850,a[2]=t1,a[3]=((C_word*)t0)[2],a[4]=t2,a[5]=t4,tmp=(C_word)a,a+=6,tmp);
+t6=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9879,a[2]=t4,a[3]=t5,tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1410 gensym");
+((C_proc2)C_retrieve_symbol_proc(lf[84]))(2,*((C_word*)lf[84]+1),t6);}
+else{
+t3=C_SCHEME_UNDEFINED;
+t4=t1;
+((C_proc2)(void*)(*((C_word*)t4+1)))(2,t4,t3);}}
+
+/* k9877 in loop2621 in k9828 in k9825 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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[3],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)tr2,(void*)f_9879,2,t0,t1);}
+t2=(C_word)C_a_i_list(&a,1,t1);
+C_trace("optimizer.scm: 1410 node-parameters-set!");
+((C_proc4)C_retrieve_symbol_proc(lf[116]))(4,*((C_word*)lf[116]+1),((C_word*)t0)[3],((C_word*)t0)[2],t2);}
+
+/* k9848 in loop2621 in k9828 in k9825 in k9822 in k9805 in k9802 in k9799 in k9793 in k9790 in k9784 in k9775 in k9760 in transform in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9850(C_word c,C_word t0,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_9850,2,t0,t1);}
+t2=(C_word)C_slot(((C_word*)t0)[5],C_fix(3));
+t3=(C_word)C_a_i_record(&a,4,lf[35],lf[70],C_SCHEME_END_OF_LIST,C_SCHEME_END_OF_LIST);
+t4=(C_word)C_i_set_car(t2,t3);
+t5=(C_word)C_slot(((C_word*)t0)[4],C_fix(1));
+t6=((C_word*)((C_word*)t0)[3])[1];
+f_9835(t6,((C_word*)t0)[2],t5);}
+
+/* scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9304(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 ab[25],*a=ab;
+if(!C_stack_probe(&a)){
+C_save_and_reclaim((void*)trf_9304,NULL,7,t0,t1,t2,t3,t4,t5,t6);}
+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=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|12,a[1]=(C_word)f_9307,a[2]=t3,a[3]=((C_word*)t0)[2],a[4]=t4,a[5]=((C_word*)t0)[3],a[6]=t5,a[7]=t12,a[8]=t8,a[9]=((C_word*)t0)[4],a[10]=((C_word*)t0)[5],a[11]=t10,a[12]=t6,tmp=(C_word)a,a+=13,tmp));
+t14=C_set_block_item(((C_word*)t0)[2],0,C_SCHEME_END_OF_LIST);
+t15=C_set_block_item(((C_word*)t0)[3],0,C_SCHEME_END_OF_LIST);
+t16=C_set_block_item(((C_word*)t0)[5],0,C_fix(0));
+t17=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9749,a[2]=((C_word*)t0)[2],a[3]=t3,a[4]=t8,a[5]=t1,tmp=(C_word)a,a+=6,tmp);
+C_trace("optimizer.scm: 1300 rec");
+t18=((C_word*)t12)[1];
+f_9307(t18,t17,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,t6);}
+
+/* k9747 in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9749(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_9749,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9756,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1301 delete");
+((C_proc5)C_retrieve_symbol_proc(lf[188]))(5,*((C_word*)lf[188]+1),t2,((C_word*)t0)[3],((C_word*)((C_word*)t0)[2])[1],*((C_word*)lf[34]+1));}
+else{
+t2=((C_word*)t0)[5];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k9754 in k9747 in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9756(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1301 lset=");
+((C_proc5)C_retrieve_symbol_proc(lf[187]))(5,*((C_word*)lf[187]+1),((C_word*)t0)[3],*((C_word*)lf[34]+1),((C_word*)((C_word*)t0)[2])[1],t1);}
+
+/* rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9307(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 *a;
+loop:
+a=C_alloc(9);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_9307,NULL,6,t0,t1,t2,t3,t4,t5);}
+t6=t2;
+t7=(C_word)C_slot(t6,C_fix(2));
+t8=t2;
+t9=(C_word)C_slot(t8,C_fix(3));
+t10=t2;
+t11=(C_word)C_slot(t10,C_fix(1));
+t12=(C_word)C_eqp(t11,lf[9]);
+if(C_truep(t12)){
+t13=(C_word)C_i_car(t7);
+t14=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9371,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=((C_word*)t0)[12],a[5]=t13,a[6]=t1,tmp=(C_word)a,a+=7,tmp);
+C_trace("optimizer.scm: 1232 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t14,((C_word*)t0)[9],t13,lf[181]);}
+else{
+t13=(C_word)C_eqp(t11,lf[54]);
+if(C_truep(t13)){
+if(C_truep(t3)){
+t14=(C_word)C_i_caddr(t7);
+t15=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9389,a[2]=t5,a[3]=((C_word*)t0)[7],a[4]=t9,a[5]=((C_word*)t0)[8],a[6]=t3,tmp=(C_word)a,a+=7,tmp);
+C_trace("optimizer.scm: 1240 decompose-lambda-list");
+((C_proc4)C_retrieve_symbol_proc(lf[61]))(4,*((C_word*)lf[61]+1),t1,t14,t15);}
+else{
+t14=t1;
+((C_proc2)(void*)(*((C_word*)t14+1)))(2,t14,C_SCHEME_FALSE);}}
+else{
+t14=(C_word)C_eqp(t11,lf[89]);
+if(C_truep(t14)){
+t15=((C_word*)((C_word*)t0)[11])[1];
+if(C_truep(t15)){
+t16=t1;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_FALSE);}
+else{
+t16=(C_word)C_i_cadr(t7);
+t17=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[10])[1],t16);
+t18=C_mutate(((C_word *)((C_word*)t0)[10])+1,t17);
+t19=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9426,a[2]=t5,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1249 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),t1,t19,t9);}}
+else{
+t15=(C_word)C_eqp(t11,lf[182]);
+if(C_truep(t15)){
+if(C_truep(t4)){
+if(C_truep(((C_word*)t0)[6])){
+t16=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9460,a[2]=t4,a[3]=t3,a[4]=t1,a[5]=((C_word*)t0)[5],tmp=(C_word)a,a+=6,tmp);
+t17=(C_word)C_i_car(t9);
+C_trace("optimizer.scm: 1252 scan-used-variables");
+((C_proc4)C_retrieve_symbol_proc(lf[133]))(4,*((C_word*)lf[133]+1),t16,t17,t5);}
+else{
+t16=t1;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_FALSE);}}
+else{
+t16=t1;
+((C_proc2)(void*)(*((C_word*)t16+1)))(2,t16,C_SCHEME_FALSE);}}
+else{
+t16=(C_word)C_eqp(t11,lf[183]);
+if(C_truep(t16)){
+t17=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9476,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=t9,a[5]=t1,a[6]=t5,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t18=(C_word)C_i_cadr(t7);
+C_trace("optimizer.scm: 1257 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[184]))(3,*((C_word*)lf[184]+1),t17,t18);}
+else{
+t17=(C_word)C_eqp(t11,lf[185]);
+if(C_truep(t17)){
+t18=(*a=C_CLOSURE_TYPE|7,a[1]=(C_word)f_9517,a[2]=((C_word*)t0)[10],a[3]=((C_word*)t0)[11],a[4]=t9,a[5]=t1,a[6]=t5,a[7]=((C_word*)t0)[7],tmp=(C_word)a,a+=8,tmp);
+t19=(C_word)C_i_car(t7);
+C_trace("optimizer.scm: 1265 estimate-foreign-result-size");
+((C_proc3)C_retrieve_symbol_proc(lf[184]))(3,*((C_word*)lf[184]+1),t18,t19);}
+else{
+t18=(C_word)C_eqp(t11,lf[15]);
+if(C_truep(t18)){
+t19=(C_word)C_i_car(t9);
+t20=(C_word)C_slot(t19,C_fix(1));
+t21=(C_word)C_eqp(lf[9],t20);
+if(C_truep(t21)){
+t22=(C_word)C_slot(t19,C_fix(2));
+t23=(C_word)C_i_car(t22);
+t24=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9570,a[2]=t1,a[3]=t9,a[4]=t5,a[5]=((C_word*)t0)[7],tmp=(C_word)a,a+=6,tmp);
+t25=(C_word)C_eqp(t23,((C_word*)t0)[4]);
+if(C_truep(t25)){
+t26=(C_word)C_eqp(((C_word*)((C_word*)t0)[10])[1],C_fix(0));
+if(C_truep(t26)){
+t27=(C_word)C_i_cadr(t9);
+t28=(C_word)C_slot(t27,C_fix(1));
+t29=(C_word)C_eqp(lf[9],t28);
+if(C_truep(t29)){
+t30=(C_word)C_slot(t27,C_fix(2));
+t31=(C_word)C_i_car(t30);
+t32=(C_word)C_a_i_cons(&a,2,t31,((C_word*)((C_word*)t0)[3])[1]);
+t33=C_mutate(((C_word *)((C_word*)t0)[3])+1,t32);
+t34=C_set_block_item(((C_word*)t0)[11],0,C_SCHEME_TRUE);
+t35=t24;
+f_9570(t35,C_SCHEME_TRUE);}
+else{
+t30=C_set_block_item(((C_word*)t0)[11],0,C_SCHEME_TRUE);
+t31=t24;
+f_9570(t31,C_SCHEME_TRUE);}}
+else{
+t27=t24;
+f_9570(t27,C_SCHEME_FALSE);}}
+else{
+t26=t24;
+f_9570(t26,(C_word)C_eqp(t23,((C_word*)t0)[2]));}}
+else{
+t22=t1;
+((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,C_SCHEME_FALSE);}}
+else{
+t19=(C_word)C_eqp(t11,lf[186]);
+if(C_truep(t19)){
+t20=(C_word)C_i_cadddr(t7);
+t21=(C_word)C_eqp(t20,C_fix(0));
+if(C_truep(t21)){
+t22=t1;
+((C_proc2)(void*)(*((C_word*)t22+1)))(2,t22,t21);}
+else{
+t22=((C_word*)((C_word*)t0)[11])[1];
+if(C_truep(t22)){
+t23=t1;
+((C_proc2)(void*)(*((C_word*)t23+1)))(2,t23,C_SCHEME_FALSE);}
+else{
+t23=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[10])[1],t20);
+t24=C_mutate(((C_word *)((C_word*)t0)[10])+1,t23);
+t25=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9679,a[2]=t5,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1291 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),t1,t25,t9);}}}
+else{
+t20=(C_word)C_eqp(t11,lf[16]);
+if(C_truep(t20)){
+t21=(C_word)C_i_car(t9);
+t22=(C_word)C_i_car(t7);
+C_trace("optimizer.scm: 1292 rec");
+t67=t1;
+t68=t21;
+t69=t22;
+t70=C_SCHEME_FALSE;
+t71=t5;
+t1=t67;
+t2=t68;
+t3=t69;
+t4=t70;
+t5=t71;
+goto loop;}
+else{
+t21=(C_word)C_eqp(t11,lf[11]);
+if(C_truep(t21)){
+t22=(*a=C_CLOSURE_TYPE|6,a[1]=(C_word)f_9712,a[2]=t5,a[3]=t7,a[4]=t1,a[5]=((C_word*)t0)[7],a[6]=t9,tmp=(C_word)a,a+=7,tmp);
+t23=(C_word)C_i_car(t9);
+t24=(C_word)C_i_car(t7);
+C_trace("optimizer.scm: 1294 rec");
+t67=t22;
+t68=t23;
+t69=t24;
+t70=t2;
+t71=t5;
+t1=t67;
+t2=t68;
+t3=t69;
+t4=t70;
+t5=t71;
+goto loop;}
+else{
+t22=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9736,a[2]=t5,a[3]=((C_word*)t0)[7],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1296 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),t1,t22,t9);}}}}}}}}}}}
+
+/* a9735 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9736(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_9736,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1296 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k9710 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9712(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_9712,2,t0,t1);}
+if(C_truep(t1)){
+t2=(C_word)C_i_cadr(((C_word*)t0)[6]);
+t3=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9723,a[2]=t2,a[3]=((C_word*)t0)[4],a[4]=((C_word*)t0)[5],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1295 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),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);}}
+
+/* k9721 in k9710 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9723(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1295 rec");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_9307(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE,t1);}
+
+/* a9678 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9679(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_9679,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1291 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k9568 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9570(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_9570,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9575,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)[3]);
+C_trace("optimizer.scm: 1284 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),((C_word*)t0)[2],t2,t3);}
+else{
+t2=((C_word*)t0)[2];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* a9574 in k9568 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9575(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_9575,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1284 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k9515 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9517(C_word c,C_word t0,C_word 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_9517,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9523,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(t2)){
+t4=t3;
+f_9523(t4,t2);}
+else{
+t4=((C_word*)((C_word*)t0)[3])[1];
+if(C_truep(t4)){
+t5=t3;
+f_9523(t5,C_SCHEME_FALSE);}
+else{
+t5=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],t1);
+t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
+t7=t3;
+f_9523(t7,C_SCHEME_TRUE);}}}
+
+/* k9521 in k9515 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9523(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_9523,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9528,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1271 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* a9527 in k9521 in k9515 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9528(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_9528,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1271 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k9474 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9476(C_word c,C_word t0,C_word 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_9476,2,t0,t1);}
+t2=(C_word)C_eqp(t1,C_fix(0));
+t3=(*a=C_CLOSURE_TYPE|5,a[1]=(C_word)f_9482,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(t2)){
+t4=t3;
+f_9482(t4,t2);}
+else{
+t4=((C_word*)((C_word*)t0)[3])[1];
+if(C_truep(t4)){
+t5=t3;
+f_9482(t5,C_SCHEME_FALSE);}
+else{
+t5=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],t1);
+t6=C_mutate(((C_word *)((C_word*)t0)[2])+1,t5);
+t7=t3;
+f_9482(t7,C_SCHEME_TRUE);}}}
+
+/* k9480 in k9474 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9482(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_9482,NULL,2,t0,t1);}
+if(C_truep(t1)){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9487,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1263 every");
+((C_proc4)C_retrieve_symbol_proc(lf[41]))(4,*((C_word*)lf[41]+1),((C_word*)t0)[3],t2,((C_word*)t0)[2]);}
+else{
+t2=((C_word*)t0)[3];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* a9486 in k9480 in k9474 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9487(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_9487,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1263 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* k9458 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9460(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_9460,2,t0,t1);}
+if(C_truep((C_word)C_i_nullp(t1))){
+t2=(*a=C_CLOSURE_TYPE|3,a[1]=(C_word)f_9456,a[2]=((C_word*)t0)[4],a[3]=((C_word*)t0)[5],tmp=(C_word)a,a+=4,tmp);
+C_trace("optimizer.scm: 1254 alist-cons");
+((C_proc5)C_retrieve_symbol_proc(lf[27]))(5,*((C_word*)lf[27]+1),t2,((C_word*)t0)[3],((C_word*)t0)[2],((C_word*)((C_word*)t0)[5])[1]);}
+else{
+t2=((C_word*)t0)[4];
+((C_proc2)(void*)(*((C_word*)t2+1)))(2,t2,C_SCHEME_FALSE);}}
+
+/* k9454 in k9458 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9456(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_SCHEME_TRUE);}
+
+/* a9425 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9426(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_9426,3,t0,t1,t2);}
+C_trace("optimizer.scm: 1249 rec");
+t3=((C_word*)((C_word*)t0)[3])[1];
+f_9307(t3,t1,t2,C_SCHEME_FALSE,C_SCHEME_FALSE,((C_word*)t0)[2]);}
+
+/* a9388 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9389(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[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_9389,5,t0,t1,t2,t3,t4);}
+t5=(C_word)C_a_i_cons(&a,2,((C_word*)t0)[6],((C_word*)((C_word*)t0)[5])[1]);
+t6=C_mutate(((C_word *)((C_word*)t0)[5])+1,t5);
+t7=(C_word)C_i_car(((C_word*)t0)[4]);
+t8=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9405,a[2]=t7,a[3]=t1,a[4]=((C_word*)t0)[3],tmp=(C_word)a,a+=5,tmp);
+C_trace("optimizer.scm: 1244 append");
+((C_proc4)C_retrieve_proc(*((C_word*)lf[12]+1)))(4,*((C_word*)lf[12]+1),t8,t2,((C_word*)t0)[2]);}
+
+/* k9403 in a9388 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_ccall f_9405(C_word c,C_word t0,C_word t1){
+C_word tmp;
+C_word t2;
+C_word *a;
+C_trace("optimizer.scm: 1244 rec");
+t2=((C_word*)((C_word*)t0)[4])[1];
+f_9307(t2,((C_word*)t0)[3],((C_word*)t0)[2],C_SCHEME_FALSE,C_SCHEME_FALSE,t1);}
+
+/* k9369 in rec in scan in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+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 t6;
+C_word t7;
+C_word t8;
+C_word *a;
+t2=(C_word)C_i_not(t1);
+if(C_truep(t2)){
+t3=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t3+1)))(2,t3,t2);}
+else{
+t3=(C_word)C_i_memq(((C_word*)t0)[5],((C_word*)t0)[4]);
+t4=(C_word)C_i_not(t3);
+if(C_truep(t4)){
+t5=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t5+1)))(2,t5,t4);}
+else{
+t5=((C_word*)((C_word*)t0)[3])[1];
+if(C_truep(t5)){
+t6=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t6+1)))(2,t6,C_SCHEME_FALSE);}
+else{
+t6=(C_word)C_fixnum_plus(((C_word*)((C_word*)t0)[2])[1],C_fix(2));
+t7=C_mutate(((C_word *)((C_word*)t0)[2])+1,t6);
+t8=((C_word*)t0)[6];
+((C_proc2)(void*)(*((C_word*)t8+1)))(2,t8,C_SCHEME_TRUE);}}}}
+
+/* walk in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9105(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 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(22);
+if(!C_stack_probe(a)){
+C_save_and_reclaim((void*)trf_9105,NULL,5,t0,t1,t2,t3,t4);}
+t5=t3;
+t6=(C_word)C_slot(t5,C_fix(2));
+t7=t3;
+t8=(C_word)C_slot(t7,C_fix(3));
+t9=t3;
+t10=(C_word)C_slot(t9,C_fix(1));
+t11=(C_word)C_eqp(t10,lf[54]);
+if(C_truep(t11)){
+t12=(C_word)C_i_caddr(t6);
+t13=(*a=C_CLOSURE_TYPE|11,a[1]=(C_word)f_9145,a[2]=((C_word*)t0)[4],a[3]=t8,a[4]=((C_word*)t0)[5],a[5]=t4,a[6]=((C_word*)t0)[6],a[7]=((C_word*)t0)[7],a[8]=t2,a[9]=t3,a[10]=t1,a[11]=((C_word*)t0)[8],tmp=(C_word)a,a+=12,tmp);
+if(C_truep(t2)){
+if(C_truep((C_word)C_i_cadr(t6))){
+t14=(*a=C_CLOSURE_TYPE|9,a[1]=(C_word)f_9230,a[2]=((C_word*)t0)[2],a[3]=t4,a[4]=((C_word*)t0)[3],a[5]=t2,a[6]=t8,a[7]=t3,a[8]=t12,a[9]=t13,tmp=(C_word)a,a+=10,tmp);
+C_trace("optimizer.scm: 1207 get");
+((C_proc5)C_retrieve_symbol_proc(lf[25]))(5,*((C_word*)lf[25]+1),t14,((C_word*)t0)[2],t2,lf[77]);}
+else{
+t14=t13;
+f_9145(2,t14,C_SCHEME_FALSE);}}
+else{
+t14=t13;
+f_9145(2,t14,C_SCHEME_FALSE);}}
+else{
+t12=(C_word)C_eqp(t10,lf[16]);
+if(C_truep(t12)){
+t13=(C_word)C_i_car(t6);
+t14=(C_word)C_i_car(t8);
+C_trace("optimizer.scm: 1217 walk");
+t26=t1;
+t27=t13;
+t28=t14;
+t29=C_SCHEME_FALSE;
+t1=t26;
+t2=t27;
+t3=t28;
+t4=t29;
+goto loop;}
+else{
+t13=(C_word)C_eqp(t10,lf[11]);
+if(C_truep(t13)){
+t14=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9256,a[2]=t1,a[3]=((C_word*)t0)[4],a[4]=t8,tmp=(C_word)a,a+=5,tmp);
+t15=(C_word)C_i_car(t6);
+t16=(C_word)C_i_car(t8);
+C_trace("optimizer.scm: 1219 walk");
+t26=t14;
+t27=t15;
+t28=t16;
+t29=t3;
+t1=t26;
+t2=t27;
+t3=t28;
+t4=t29;
+goto loop;}
+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|3,a[1]=(C_word)f_9276,a[2]=t15,a[3]=((C_word*)t0)[4],tmp=(C_word)a,a+=4,tmp));
+t17=((C_word*)t15)[1];
+f_9276(t17,t1,t8);}}}}
+
+/* loop2261 in walk in ##compiler#transform-direct-lambdas! in k6663 in k6174 in k6171 in k6168 in k3978 in k3704 in k3701 */
+static void C_fcall f_9276(C_word t0,C_word 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_9276,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_9284,a[2]=((C_word*)t0)[3],tmp=(C_word)a,a+=3,tmp);
+t4=(*a=C_CLOSURE_TYPE|4,a[1]=(C_word)f_9291,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));
+C_trace("g22682269"